diff --git a/src/machine/machine_errors.rs b/src/machine/machine_errors.rs
index 16ab4b60..cb4edba8 100644
--- a/src/machine/machine_errors.rs
+++ b/src/machine/machine_errors.rs
@@ -785,7 +785,7 @@ impl CompilationError {
                 functor!(atom!("inadmissible_query_term"))
             }
             CompilationError::InvalidDirective(_) => {
-                functor!(atom!("declaration_error"))
+                functor!(atom!("directive_error"))
             }
             CompilationError::InvalidMetaPredicateDecl => {
                 functor!(atom!("invalid_meta_predicate_decl"))