48 

    48 

    49 

    49 

    50 implementation

    50 implementation

    51 uses typinfo, Math, uConsts, uVariables, SysUtils;

    51 uses typinfo, Math, uConsts, uVariables, SysUtils;

    52 

    52 

    56 {$ENDIF}

    55 {$ENDIF}

    57 

    56 

    58 // should this include "strtolower()" for the split string?

    57 // should this include "strtolower()" for the split string?

    59 procedure SplitBySpace(var a, b: shortstring);

    58 procedure SplitBySpace(var a, b: shortstring);

    60 var i, t: LongInt;

    59 var i, t: LongInt;