X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/a8f5615dcc9ab22080c4897babfad092885b1b6e..4f2379351847bdadd3fa6ff698dc381c6bee5bea:/csrc/pf_core.c

diff --git a/csrc/pf_core.c b/csrc/pf_core.c
index 235c0a2..19e75a8 100644
--- a/csrc/pf_core.c
+++ b/csrc/pf_core.c
@@ -496,13 +496,19 @@ cell_t pfDoForth( const char *DicFileName, const char *SourceName, cell_t IfInit
 			if( DicFileName )
 			{
 				pfDebugMessage("DicFileName = "); pfDebugMessage(DicFileName); pfDebugMessage("\n");
-				EMIT_CR;
+				if( !gVarQuiet )
+				{
+					EMIT_CR;
+				}
 				dic = pfLoadDictionary( DicFileName, &EntryPoint );
 			}
 			else
 			{
-				MSG(" (static)");
-				EMIT_CR;
+				if( !gVarQuiet )
+				{
+					MSG(" (static)");
+					EMIT_CR;
+				}
 				dic = pfLoadStaticDictionary();			
 			}
 		}