* out and var are reserved words

utils/h2pas/h2pas.pas

@@ -203,7 +203,7 @@ program h2pas;
     }
     function FixId(const s:string):string;
     const
-     maxtokens = 14;
+     maxtokens = 16;
      reservedid: array[1..maxtokens] of string[14] =
        (
          'CLASS',
@@ -212,6 +212,7 @@ program h2pas;
          'FALSE',
          'LABEL',
          'NEW',
+         'OUT',
          'PROPERTY',
          'PROCEDURE',
          'RECORD',
@@ -219,7 +220,8 @@ program h2pas;
          'STRING',
          'TYPE',
          'TRUE',
-         'UNTIL'
+         'UNTIL',
+         'VAR'
        );
       var
         b : boolean;

utils/h2pas/h2pas.y

@@ -199,7 +199,7 @@ program h2pas;
     }
     function FixId(const s:string):string;
     const
-     maxtokens = 14;
+     maxtokens = 16;
      reservedid: array[1..maxtokens] of string[14] =
        (
          'CLASS',
@@ -208,6 +208,7 @@ program h2pas;
          'FALSE',
          'LABEL',
          'NEW',
+         'OUT',
          'PROPERTY',
          'PROCEDURE',
          'RECORD',
@@ -215,7 +216,8 @@ program h2pas;
          'STRING',
          'TYPE',
          'TRUE',
-         'UNTIL'
+         'UNTIL',
+         'VAR'
        );
       var
         b : boolean;