Updated interpreters

[projects/chimara/chimara.git] / interpreters / glulxe / gestalt.c

diff --git a/interpreters/glulxe/gestalt.c b/interpreters/glulxe/gestalt.c
index c1c933faeb025fd258dc2cb71a995b4b9a5f6032..87a8182e713f6ca5d13df12681d5bae1028c853f 100644 (file)
--- a/interpreters/glulxe/gestalt.c
+++ b/interpreters/glulxe/gestalt.c
@@ -12,10 +12,10 @@ glui32 do_gestalt(glui32 val, glui32 val2)
   switch (val) {
 
   case gestulx_GlulxVersion:
-    return 0x00030101; /* Glulx spec version 3.1.1 */
+    return 0x00030102; /* Glulx spec version 3.1.2 */
 
   case gestulx_TerpVersion:
-    return 0x00000404; /* Glulxe version 0.4.4 */
+    return 0x00000406; /* Glulxe version 0.4.6 */
 
   case gestulx_ResizeMem:
 #ifdef FIXED_MEMSIZE
@@ -63,6 +63,13 @@ glui32 do_gestalt(glui32 val, glui32 val2)
       return 1; /* We know this accelerated function. */
     return 0;
 
+  case gestulx_Float:
+#ifdef FLOAT_SUPPORT
+    return 1; /* We can do floating-point operations. */
+#else /* FLOAT_SUPPORT */
+    return 0; /* The floating-point opcodes are not compiled in. */
+#endif /* FLOAT_SUPPORT */
+
   default:
     return 0;