--- p/util.c.orig	Thu May  9 19:44:08 2002
+++ p/util.c	Fri Jul  9 15:49:30 2004
@@ -2583,7 +2583,7 @@
     {"Read",              p_READ,                "-,",     0, FUNCTION_DECL, ANY_PASCAL},
     {"WriteLn",           p_WRITELN,             "-,",     0, FUNCTION_DECL, ANY_PASCAL},
     {"ReadLn",            p_READLN,              "-,",     0, FUNCTION_DECL, ANY_PASCAL},
-    {"Page",              p_PAGE,                "-,F",    0, FUNCTION_DECL, E_O_G_PASCAL},
+    {"Page",              p_PAGE,                "-,F",    0, FUNCTION_DECL, S_E_O_G_PASCAL},
     {"EOF",               p_EOF,                 "b,f",    0, FUNCTION_DECL, ANY_PASCAL},
     {"EOLn",              p_EOLN,                "b,j",    0, FUNCTION_DECL, ANY_PASCAL},