[Ecls-list] cinit.d

[Johan Bockgård]

Index: src/c/cinit.d
===================================================================
RCS file: /cvsroot/ecls/ecls/src/c/cinit.d,v
retrieving revision 1.22
diff -u -r1.22 cinit.d
--- src/c/cinit.d       26 May 2005 19:18:00 -0000      1.22
+++ src/c/cinit.d       25 Jun 2005 16:50:46 -0000
@@ -17,7 +17,7 @@
 #include "internal.h"
 
 extern cl_object
-cl_array_dimensions(int narg, cl_object array, ...)
+cl_array_dimensions(cl_narg narg, cl_object array, ...)
 {
        return funcall(2, @'ARRAY-DIMENSIONS', array);
 }


-- 
Johan Bockgård