diff options
Diffstat (limited to 'src/main/stanza/bigint2.stanza')
| -rw-r--r-- | src/main/stanza/bigint2.stanza | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/main/stanza/bigint2.stanza b/src/main/stanza/bigint2.stanza index 4657878a..ebd01652 100644 --- a/src/main/stanza/bigint2.stanza +++ b/src/main/stanza/bigint2.stanza @@ -109,7 +109,7 @@ public defn BigIntLit (data:Int, num-bits:Int) -> BigInt : public defn BigIntLit (data:String) -> BigInt : val base = data[0] - val shamt = if base == 'b': 1 else if base == 'h': 4 else: 2 + val shamt = if base == 'b': 1 else if base == 'h': 4 else: error("Unsupported BigInt base.") val digits = substring(data, 1) val num-bits = length(digits) * shamt BigIntLit(digits,shamt,num-bits) |