瀏覽代碼

corrected behavior for missing module name (FoxTester trapped for first negative ompilation test)
Compilation tests ok for WinA2 32 bit

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7517 8c9fc860-2736-0410-a75d-ab315db34111

felixf 7 年之前
父節點
當前提交
7a4678c119
共有 1 個文件被更改,包括 5 次插入1 次删除
  1. 5 1
      source/FoxGlobal.Mod

+ 5 - 1
source/FoxGlobal.Mod

@@ -1190,7 +1190,11 @@ TYPE
 			Basic.GetString(name,s);
 			Strings.Append(n,"-");Strings.Append(n,s);
 		ELSE
-			Basic.GetString(name,n);
+			IF name # SyntaxTree.invalidIdentifier THEN 
+				Basic.GetString(name,n);
+			ELSE
+				n := ""
+			END
 		END;
 	END GetModuleSectionName;