git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7296 8c9fc860-2736-0410-a75d-ab315db34111
@@ -627,7 +627,7 @@ MODULE GfxPaths; (** portable *) (* eos *)
END
END Scan;
- PROCEDURE- get (VAR x, y: REAL);
+ PROCEDURE get (VAR x, y: REAL);
BEGIN
IF SELF.cpos = CoordBlockSize THEN
SELF.curCB := SELF.curCB.next; SELF.cpos := 0