[Oberon] SystemV - Integer2String, String2Integer

Tomas Kral thomas.kral at email.cz
Thu Jan 17 11:01:38 CET 2019

Chris, Joerg,

Thank you. I currently need to draw only small integers, and I do with
inline code. When it gets bigger I may put it in its own module.

    VAR s: ARRAY 4 OF CHAR; (*reverse*)    
    REPEAT s[i] := CHR(n MOD 10 + 30H); n := n DIV 10; INC(i) UNTIL n = 0;

Tomas Kral <thomas.kral at email.cz>

More information about the Oberon mailing list