diff --git a/aldor/aldor/src/genlisp.c b/aldor/aldor/src/genlisp.c
index c9c1835e5..4a326879a 100644
--- a/aldor/aldor/src/genlisp.c
+++ b/aldor/aldor/src/genlisp.c
@@ -1073,7 +1073,9 @@ gl0UseEnv(Foam foam)
 	}
 	
 	if (glvLexFormats == NULL) {
+#if 0
 		printf("Internal warning: Use Env called outside gl0Prog (glvLexFormats is NULL)\n");
+#endif
 		return;
 	}
 	if (glvActualLexFormats->foamDEnv.argv[level] == emptyFormatSlot