Browse Source

* convert some vars from longint -> byte

carl 23 years ago
parent
commit
4d9e00f251
1 changed files with 6 additions and 2 deletions
  1. 6 2
      compiler/pdecvar.pas

+ 6 - 2
compiler/pdecvar.pas

@@ -120,8 +120,9 @@ implementation
          tconstsym : ttypedconstsym;
          tconstsym : ttypedconstsym;
          { maxsize contains the max. size of a variant }
          { maxsize contains the max. size of a variant }
          { startvarrec contains the start of the variant part of a record }
          { startvarrec contains the start of the variant part of a record }
+         maxsize, startvarrecsize : longint;
          usedalign,
          usedalign,
-         maxsize,minalignment,maxalignment,startvarrecalign,startvarrecsize : longint;
+         minalignment,maxalignment,startvarrecalign : byte;
          pt : tnode;
          pt : tnode;
          vs    : tvarsym;
          vs    : tvarsym;
          srsym : tsym;
          srsym : tsym;
@@ -587,7 +588,10 @@ implementation
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.41  2002-11-29 22:31:19  carl
+  Revision 1.42  2002-12-07 14:04:59  carl
+   * convert some vars from longint -> byte
+
+  Revision 1.41  2002/11/29 22:31:19  carl
     + unimplemented hint directive added
     + unimplemented hint directive added
     * hint directive parsing implemented
     * hint directive parsing implemented
     * warning on these directives
     * warning on these directives