Browse Source

patched fingerprinter bug with nil value.

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6579 8c9fc860-2736-0410-a75d-ab315db34111
felixf 9 năm trước cách đây
mục cha
commit
a87f529875
1 tập tin đã thay đổi với 4 bổ sung0 xóa
  1. 4 0
      source/FoxFingerPrinter.Mod

+ 4 - 0
source/FoxFingerPrinter.Mod

@@ -823,6 +823,10 @@ TYPE
 			ELSE FPLongReal(SELF.fp,x.value)
 			END;
 		END VisitRealValue;
+		
+		PROCEDURE VisitNilValue(x: SyntaxTree.NilValue);
+		BEGIN IF x.type.sizeInBits = 64 THEN FPHugeInt(SELF.fp, 0) ELSE FPNumber(SELF.fp, 0) END;
+		END VisitNilValue;
 
 		(* fp = fp & String *)
 		PROCEDURE VisitStringValue(x: SyntaxTree.StringValue);