[Oberon] SystemV - Integer2String, String2Integer

[Tomas Kral]

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>