From df4fac6bb2474dd807709dbc2f8142ca6c513337 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sat, 1 Jun 2013 16:28:58 +0000
Subject: 	* interp/category.boot (filterConditionalCategories): Fix
 thinko.

---
 config/open-axiom.m4 | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'config')

diff --git a/config/open-axiom.m4 b/config/open-axiom.m4
index 85a75690..57db43bd 100644
--- a/config/open-axiom.m4
+++ b/config/open-axiom.m4
@@ -415,6 +415,7 @@ case $axiom_lisp_flavor in
       float_type='float'
       double_type='double'
       string_type='string'
+      pointer_type='fixnum'  # well, this is from poking into GCL source code
       ;;
    sbcl)
       void_type='void'
@@ -423,6 +424,7 @@ case $axiom_lisp_flavor in
       float_type='float'
       double_type='double'
       string_type='c-string'
+      pointer_type='(* t)'
       ;;
    clisp)
       void_type='nil'
@@ -431,6 +433,7 @@ case $axiom_lisp_flavor in
       float_type='single-float'
       double_type='double-float'
       string_type='c-string'
+      pointer_type='c-pointer'
       ;;
    ecl)
       void_type=':void'
@@ -439,6 +442,7 @@ case $axiom_lisp_flavor in
       float_type=':float'
       double_type=':double'
       string_type=':cstring'
+      pointer_type=':pointer-void'
       ;;
    clozure)
       void_type=':void'
@@ -449,6 +453,7 @@ case $axiom_lisp_flavor in
       double_type=':double-float'
       # Clozure CL wants you to deal with your own mess
       string_type=':address'
+      pointer_type=':address'
       ;;
    *)
       AC_MSG_ERROR([We do not know how to translate native types for this Lisp])
-- 
cgit v1.2.3