diff --git a/binary.inc b/binary.inc index 5b88e02..045f1fc 100644 --- a/binary.inc +++ b/binary.inc @@ -1,3 +1,8 @@ +type + ByteString = String[2]; { String representing a u8. } + ShortString = String[4]; { String representing a u16. } + + function ValidHexDigit(bval: Byte): Boolean; var IsValid : Boolean = False; diff --git a/test.pas b/test.pas index e64b557..6b90725 100644 --- a/test.pas +++ b/test.pas @@ -1,8 +1,5 @@ program test; -type - ByteString = String[2]; - {$I 'binary.inc'} var