Pass arguments to repl/1

1 files changed, 2 insertions, 1 deletions

diff --git a/module.c b/module.c
index 1ac931e..7d23f85 100644
--- a/module.c
+++ b/module.c
@@ -51,7 +51,8 @@ parsemodule(char *file)
 				print("Module name should be an atom in: %S\n", prettyprint(directive, 0, 0, 0, nil));
 				return nil;
 			}
-			print("Public list for module '%S': %S\n", modulename->text, prettyprint(publiclist, 0, 0, 0, nil));
+			if(debug)
+				print("Public list for module '%S': %S\n", modulename->text, prettyprint(publiclist, 0, 0, 0, nil));
 			m = getmodule(modulename->text);
 		}
 		terms = terms->next;