diff options
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/compiler.boot | 5 | ||||
| -rw-r--r-- | src/interp/sys-constants.boot | 7 |
2 files changed, 11 insertions, 1 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot index baea9aa2..f2ced87a 100644 --- a/src/interp/compiler.boot +++ b/src/interp/compiler.boot @@ -1331,8 +1331,11 @@ getBasicFFIType: %Mode -> %Symbol getBasicFFIType t == t = $Byte => bootDenotation "byte" t = $Int16 => bootDenotation "int16" + t = $UInt16 => bootDenotation "uint16" t = $Int32 => bootDenotation "int32" --- t = $Int64 => bootDenotation "int64" + t = $UInt32 => bootDenotation "uint32" + t = $Int64 => bootDenotation "int64" + t = $UInt64 => bootDenotation "uint64" t = $SingleInteger => bootDenotation "int" t = $SingleFloat => bootDenotation "float" t = $DoubleFloat => bootDenotation "double" diff --git a/src/interp/sys-constants.boot b/src/interp/sys-constants.boot index bb8c8575..02d6d4b2 100644 --- a/src/interp/sys-constants.boot +++ b/src/interp/sys-constants.boot @@ -373,9 +373,16 @@ $Boolean == '(Boolean) $Byte == '(Byte) + +++ Sized integer types, mostly for system-level programming. $Int16 == '(Int16) +$UInt16 == '(UInt16) + $Int32 == '(Int32) +$UInt32 == '(UInt32) + $Int64 == '(Int64) +$UInt64 == '(UInt64) ++ The SmallInteger domain constructor form $SmallInteger == |