[Axiom-developer] Re: NULL_OR_ON_C_STACK macro invalid (was: noweb)

[Camm Maguire]

Greetings!

--- axiom-20050901.orig/src/interp/cfuns.lisp.pamphlet
+++ axiom-20050901/src/interp/cfuns.lisp.pamphlet
@@ -103,10 +103,10 @@
 
 #+(AND KCL (NOT ELF))
 (Clines
-"unsigned int MYCOMBINE(i,j)"
-"unsigned int i,j;"
+"int MYCOMBINE(i,j)"
+"int i,j;"
 "{"
-"return ( (((j & 16777215) << 6)+i) % 1073741789);"
+"return ( (((((unsigned int)j) & 16777215) << 6)+((unsigned int)i)) % 
1073741789);"
 "}"
 )
 #+(AND KCL (NOT ELF))
--- axiom-20050901.orig/src/interp/hash.lisp.pamphlet
+++ axiom-20050901/src/interp/hash.lisp.pamphlet
@@ -81,7 +81,7 @@
 (define-function 'HASHTABLE-CLASS #'system::hash-table-test)
 
 #+AKCL
-(clines "static int mem_value(x ,i)object x;int i; { return ((short *)x)[i];}")
+(clines "int mem_value(x ,i)object x;int i; { return ((short *)x)[i];}")
 #+AKCL
 (defentry memory-value-short(object int) (int "mem_value"))
 
--- axiom-20050901.orig/src/interp/sockio.lisp.pamphlet
+++ axiom-20050901/src/interp/sockio.lisp.pamphlet
@@ -78,7 +78,7 @@
   (defentry sock_send_int (int int) (int "sock_send_int"))
   (defentry sock_get_string_buf (int string int) (int "sock_get_string_buf"))
   (defentry sock_send_string_len (int string int) (int "sock_send_string_len"))
-  (defentry sock_get_float (int) (float "sock_get_float"))
+  (defentry sock_get_float (int) (double "sock_get_float"))
   (defentry sock_send_float (int float) (int "sock_send_float"))
   (defentry sock_send_wakeup (int int) (int "sock_send_wakeup"))
   (defentry server_switch () (int "server_switch"))


Please let me know if there is any problem with these.

Take care,

root <address@hidden> writes:

> Camm,
> 
> > I had to make the following modifications to 20050901 to work with the
> > latest 2.6.8pre:
> 
> Axiom has had several releases since 20050901.
> What do we need to do to bring it up to date?
> 
> t
> 
> 
> 

-- 
Camm Maguire                                            address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah