diff options
Diffstat (limited to 'src/interp/nrunopt.boot')
| -rw-r--r-- | src/interp/nrunopt.boot | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot index 12b07154..32adc79f 100644 --- a/src/interp/nrunopt.boot +++ b/src/interp/nrunopt.boot @@ -345,7 +345,7 @@ testBitVector(vec,i) == bitsOf n == n = 0 => 0 - 1 + bitsOf QUOTIENT(n,2) + 1 + bitsOf(n quo 2) --======================================================================= -- Generate Slot 4 Constructor Vectors @@ -639,7 +639,7 @@ dcData con == dcData1 vec == n := MAXINDEX vec - tens := QUOTIENT(n,10) + tens := n quo 10 for i in 0..tens repeat start := 10*i sayBrightlyNT rightJustifyString(STRINGIMAGE start,6) @@ -725,7 +725,7 @@ nodeSize(n) == 12 * n vectorSize(n) == 4 * (1 + n) halfWordSize(n) == - n < 128 => QUOTIENT(n,2) + n < 128 => n quo 2 n < 256 => n 2 * n |