From cd820d07248dcce1106cbcd5e18bd4831b570f76 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 16 Mar 2008 16:22:14 +0000
Subject: 	* lisp/Makefile.in (void_type): New. 	(char_type): Likewise.
 	(int_type): Likewise. 	(float_type): Likewise. 	(double_type):
 Likewise. 	(string_type): Likewise. 	(pointer_type): Likewise. 
 (edit): Use them. 	* interp/wi1.boot (ppFull): Tidy.  Don't set
 *PRINT-DEPTH*. 	* interp/vmlisp.lisp (gcmsg): Define when SBCL. 
 * interp/template.boot (measureCommon): Fix thinko. 	*
 interp/sys-utility.boot: Move basic type definition from 	g-util.boot to
 here. 	* interp/g-util.boot (augProplistOf): Fix signature declaration. 
 * interp/daase.lisp: Tidy. 	* interp/c-util.boot (displayComp): Remove
 assignment to 	$X,$M,$F. 	* interp/boot-pkg.lisp: Tidy. 	*
 interp/axext_l.lisp: Likewise. 	* interp/Makefile.pamphlet
 (makeint.lisp): Call GBC only when GCL. 
 ($(axiom_targetdir)/algebra/exposed.$(FASLEXT)): Tidy. 
 (patches.$(FASLEXT)): Require debug.$(FASLEXT), g-timer.$(FASLEXT). 
 (wi2.$(FASLEXT)): Require define.$(FASLEXT). 	(spad.$(FASLEXT)): Require
 postpar.$(FASLEXT), debug.$(FASLEXT). 	* boot/translator.boot
 (genImportDeclaration): Include translation 	for SBCL. 	*
 boot/parser.boot (bpMapping): Tidy. 	* boot/ast.boot (coreSymbol): New. 
 (bootSymbol): Likewise. 	(bootSymbol): Likewise. 	*
 lisp/core.lisp.in (|$NativeTypeTable|): New. Export. 	*
 algebra/Makefile.pamphlet (COMPILE_LISP): Use $(INTERPSYS). 	*
 algebra/exposed.lsp.pamphlet: Tidy.

---
 configure.ac | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

(limited to 'configure.ac')

diff --git a/configure.ac b/configure.ac
index 6016198d..98dd46d9 100644
--- a/configure.ac
+++ b/configure.ac
@@ -510,6 +510,32 @@ AC_SUBST(CCF)
 AC_SUBST(LDF)
 AC_SUBST(LISP)
 AC_SUBST(GCLOPTS)
+void_type='void'
+char_type='char'
+int_type='int'
+float_type='float'
+double_type='double'
+string_type='string'
+pointer_type='object'
+case $axiom_lisp_flavor in
+   gcl)
+      ;;
+   sbcl)
+      string_type='c-string'
+      pointer_type='system-area-pointer'
+      ;;
+   *)
+      AC_MSG_ERROR([We do not know how to translate native types for this Lisp])
+      ;;
+esac
+AC_SUBST(void_type)
+AC_SUBST(char_type)
+AC_SUBST(int_type)
+AC_SUBST(float_type)
+AC_SUBST(double_type)
+AC_SUBST(string_type)
+AC_SUBST(pointer_type)
+
 AXIOM_MAKEFILE([Makefile])
 AXIOM_MAKEFILE([src/Makefile])
 AXIOM_MAKEFILE([src/lib/Makefile])
-- 
cgit v1.2.3