diff options
| author | Charles Forsyth <charles.forsyth@gmail.com> | 2013-06-08 13:01:41 +0000 |
|---|---|---|
| committer | Charles Forsyth <charles.forsyth@gmail.com> | 2013-06-08 13:01:41 +0000 |
| commit | 7b590743a1afb502dbc0a78299ff767c65860cd5 (patch) | |
| tree | f74d969e1e72ceee4912d845670c056b2b360d44 | |
| parent | 94a2f8e42889df31bbca30bcb31e39b583e6cd40 (diff) | |
use Runemax
| -rw-r--r-- | appl/cmd/tr.b | 11 | ||||
| -rw-r--r-- | dis/tr.dis | bin | 3429 -> 3429 bytes |
2 files changed, 5 insertions, 6 deletions
diff --git a/appl/cmd/tr.b b/appl/cmd/tr.b index 60d4aa6c..73ffe28a 100644 --- a/appl/cmd/tr.b +++ b/appl/cmd/tr.b @@ -47,10 +47,9 @@ BITSET(a: array of byte, c: int): int return int (a[c>>3] & bits[c&7]); } -MAXRUNE: con 16rFFFF; -f := array[(MAXRUNE+1)/8] of byte; -t := array[(MAXRUNE+1)/8] of byte; +f := array[(Sys->Runemax+1)/8] of byte; +t := array[(Sys->Runemax+1)/8] of byte; pto, pfrom: ref Pcb; @@ -128,7 +127,7 @@ delete() SETBIT(t, c); } - last := MAXRUNE+1; + last := Sys->Runemax+1; while ((c := ib.getc()) >= 0) { if(!BITSET(f, c) && (c != last || !BITSET(t,c))) { last = c; @@ -164,7 +163,7 @@ complement() p[i] = i; } if (sflag){ - lastc = MAXRUNE+1; + lastc = Sys->Runemax+1; while ((from = ib.getc()) >= 0) { if (from > high) from = cto; @@ -211,7 +210,7 @@ translit() while ((cto := pto.canon()) >= 0) SETBIT(t,cto); if (sflag){ - lastc = MAXRUNE+1; + lastc = Sys->Runemax+1; while ((from = ib.getc()) >= 0) { if (from <= high) from = p[from]; Binary files differ |
