add functional notation for operators.

diff --git a/src/prolog/io.rs b/src/prolog/io.rs
index 85e5330ce07a623323a6e2292fa577c6a0ec2424..1b005bd349b00f11c6c54b91b5abe37e43f7966b 100644 (file)
--- a/src/prolog/io.rs
+++ b/src/prolog/io.rs
@@ -679,6 +679,7 @@ pub fn compile_listing(wam: &mut Machine, src_str: &str) -> EvalSession
                         .or_insert(CodeIndex::default());
 
                     index.0.set(IndexPtr::Index(p));
+                    index.1 = module_name;
                 }
                 
                 decl_info.label_clauses(p, &mut code_dir, &mut decl_code);

diff --git a/src/prolog/parser b/src/prolog/parser
index 0e9dd3a01f21c6457bd1bcb35518ccdb502c82bd..1b3bcc77f2b9d264c9753653ae87bfa3b4c11081 160000 (submodule)
--- a/src/prolog/parser
+++ b/src/prolog/parser
@@ -1 +1 @@
-Subproject commit 0e9dd3a01f21c6457bd1bcb35518ccdb502c82bd
+Subproject commit 1b3bcc77f2b9d264c9753653ae87bfa3b4c11081