Explorar el Código

fix type of the returning value

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8479 8c9fc860-2736-0410-a75d-ab315db34111
eth.metacore hace 6 años
padre
commit
c8b6e9b323
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      source/I386.MPEGUtilities.Mod

+ 1 - 1
source/I386.MPEGUtilities.Mod

@@ -681,7 +681,7 @@ TYPE
 		PROCEDURE ReadMotionCode*(): LONGINT;
 		VAR
 			bits: LONGINT;
-			res: WORD;
+			res: LONGINT;
 
 		BEGIN
 			IF eof THEN RETURN 0 END;