Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

+ Patch from Michalis Kamburelis to fix short type

michael 20 years ago
parent
aa58ef7fe9
commit
d691e34e3c
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      packages/base/ibase/ibase60types.inc

+ 1 - 1
packages/base/ibase/ibase60types.inc
View File 

@@ -14,7 +14,7 @@ type
 
 
 
   Int                  = LongInt;
 
   Int                  = LongInt;
 
   Long                 = LongInt;
 
   Long                 = LongInt;
 
-  Short                = Integer;
 
+  Short                = SmallInt;
 
   Float                = Single;
 
   Float                = Single;
 
 
 
   { Pointers to basic types }
 
   { Pointers to basic types }