fix: CHR expects a CARDINAL parameter
This commit is contained in:
parent
bdfe2ec9cf
commit
e3a1bdee64
@ -75,7 +75,7 @@ MODULE StoreFetch;
|
||||
REPEAT
|
||||
INC(i);
|
||||
Remove(OrdOfChar);
|
||||
String[i] := CHR(OrdOfChar);
|
||||
String[i] := CHR(CARDINAL(OrdOfChar));
|
||||
UNTIL String[i] = eos;
|
||||
WriteLn;
|
||||
WriteString("After transfer: ");
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user