aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compiler.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-09-05 20:48:21 +0000
committerdos-reis <gdr@axiomatics.org>2009-09-05 20:48:21 +0000
commit7fb7062638f05c3748a7aaace55d50cb1ac87fb0 (patch)
treef63ba60207cc11e322a9630e8c375c08428a3ef2 /src/interp/compiler.boot
parentc0477ca18e99fcf5e091d2bc4ffe8dd76eae36dd (diff)
downloadopen-axiom-7fb7062638f05c3748a7aaace55d50cb1ac87fb0.tar.gz
* algebra/data.spad.pamphlet: Cleanup.
* interp/compiler.boot (getBasicFFIType): Handle 64-bit integer types.
Diffstat (limited to 'src/interp/compiler.boot')
-rw-r--r--src/interp/compiler.boot5
1 files changed, 4 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"