Ignore:
Timestamp:
Aug 10, 2010, 3:41:49 PM (14 years ago)
Author:
george
Message:

Slightly enhanced parsing of unit.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/Transpascal/Project/System.pas

    r55 r58  
    44
    55type
    6   Void = System;
    7   Byte = System;
    8   ShortInt = System;
    9   Word = System;
    10   SmallInt = System;
    11   Cardinal = System;
     6  Void = internal;
     7  Byte = internal;
     8  ShortInt = internal;
     9  Word = internal;
     10  SmallInt = internal;
     11  Cardinal = internal;
    1212  DWord = Cardinal;
    13   Integer = System;
    14   QWord = System;
    15   Int64 = System;
    16   Char = System;
     13  Integer = internal;
     14  QWord = internal;
     15  Int64 = internal;
     16  Char = internal;
    1717  String = array of Char;
    1818
    1919
    20 procedure Exit; system;
    21 procedure Break; system;
    22 procedure Continue; system;
     20procedure Exit; internal;
     21procedure Break; internal;
     22procedure Continue; internal;
    2323
    2424implementation
Note: See TracChangeset for help on using the changeset viewer.