To achieve fully portable code, it is necessary to fully specify the domains of all base types.
The Component Pascal base types are a superset of the Java base types.

Type   Size   Domain
SHORTCHAR   1 byte  Latin-1 character set
                    (first Unicode page and a superset of ASCII)
CHAR        2 byte  Unicode character set
BYTE        1 byte  signed integer
SHORTINT    2 byte  signed integer
INTEGER     4 byte  signed integer
LONGINT     8 byte  signed integer
SHORTREAL   32 bit  IEEE
REAL        64 bit  IEEE
SET         4 byte  bitset
BOOLEAN     1 byte  FALSE or TRUE

   PROCEDURE [ code ] Shortchar (b: BYTE): SHORTCHAR;   (* пустая процедура - бестелесная ) *)
   PROCEDURE P;
      VAR ch: SHORTCHAR; b: BYTE;
   BEGIN b := -1; ch := Shortchar(b); ch := SHORT(CHR(b MOD 100H))
   END P;

ch := Shortchar(b);
0000077FH:   8A 45 FE    mov  al, -2[ebp]
00000782H:   88 45 FF    mov  -1[ebp], al

ch := SHORT(CHR(b MOD 100H))
00000785H:   0F BE 45 FE    movsx  eax, byte ptr -2[ebp]
00000789H:   25 FF 00 00 00    and  eax, 000000FFH
0000078EH:   88 45 FF      mov  -1[ebp], al

ch := SHORT(CHR(b MOD 100H))
000007A2H:   0F BE 45 FE    movsx  eax, byte ptr -2[ebp]
000007A6H:   25 FF 00 00 00    and  eax, 000000FFH
000007ABH:   3D FF 00 00 00    cmp  eax, 255
000007B0H:   76 02      jbe  2  (000007B4H)
000007B2H:   8D E6       illegal  (TRAP -6)
000007B4H:   88 45 FF       mov  -1[ebp], al

PROCEDURE Shortchar (b: BYTE): SHORTCHAR;
BEGIN RETURN SHORT(CHR(b MOD 100H))
END Shortchar;