Commit afd58881 authored by Erick's avatar Erick

NOP

parent 095af9f0
......@@ -2113,7 +2113,7 @@ fi
# Define the identity of the package.
PACKAGE=stklos
VERSION=0.98dev
VERSION=0.98
cat >>confdefs.h <<_ACEOF
......
......@@ -2,12 +2,12 @@ dnl configure.in for STklos
dnl
dnl Author: Erick Gallesio [eg@unice.fr]
dnl Creation date: 28-Dec-1999 21:19 (eg)
dnl Last file update: 3-May-2008 19:57 (eg)
dnl Last file update: 3-May-2008 22:42 (eg)
AC_INIT(src/stklos.c)
AC_PREREQ(2.52)
AM_INIT_AUTOMAKE(stklos, 0.98dev)
AM_INIT_AUTOMAKE(stklos, 0.98)
AM_CONFIG_HEADER(src/stklosconf.h)
AC_PROG_MAKE_SET
......
......@@ -40,7 +40,7 @@ subdir = doc
DIST_COMMON = $(srcdir)/Makefile.am $(srcdir)/Makefile.in \
$(srcdir)/stklos-compile.1.in $(srcdir)/stklos-config.1.in \
$(srcdir)/stklos-genlex.1.in $(srcdir)/stklos-install.1.in \
$(srcdir)/stklos-pkg.1.in $(srcdir)/stklos.1.in
$(srcdir)/stklos-pkg.1.in $(srcdir)/stklos.1.in TODO
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/configure.in
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
......
......@@ -39,7 +39,7 @@ PRE_UNINSTALL = :
POST_UNINSTALL = :
subdir = extensions
DIST_COMMON = README $(srcdir)/Makefile.am $(srcdir)/Makefile.in \
$(srcdir)/extconf.h.in
$(srcdir)/extconf.h.in TODO
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/configure.in
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
......
......@@ -40,7 +40,7 @@ PRE_UNINSTALL = :
POST_UNINSTALL = :
subdir = gtklos
DIST_COMMON = $(srcdir)/Makefile.am $(srcdir)/Makefile.in \
$(srcdir)/gtklosconf.h.in
$(srcdir)/gtklosconf.h.in TODO
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/configure.in
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
......
......@@ -40,7 +40,7 @@ POST_UNINSTALL = :
bin_PROGRAMS = stklos$(EXEEXT)
subdir = src
DIST_COMMON = $(srcdir)/Makefile.am $(srcdir)/Makefile.in \
$(srcdir)/extraconf.h.in $(srcdir)/stklosconf.h.in
$(srcdir)/extraconf.h.in $(srcdir)/stklosconf.h.in TODO
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/configure.in
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
......
/*
This file was automatically generated by make-C-boot
This is a dump of the image in file /misc/misc/Install/STklos/lib/boot.img3
This is a dump of the image in file /misc/home/eg/Projects/STklos/lib/boot.img3
***DO NOT EDIT BY HAND***
*/
......
This diff is collapsed.
......@@ -21,7 +21,7 @@
*
* Author: Erick Gallesio [eg@essi.fr]
* Creation date: 14-Jun-2007 09:19 (eg)
* Last file update: 3-May-2008 22:21 (eg)
* Last file update: 3-May-2008 22:39 (eg)
*/
#include <stklos.h>
......@@ -364,27 +364,11 @@ SCM STk_call_ext_function(SCM fct, int argc, SCM *argv)
if (! NULLP(params)) STk_error("not enough parameters in call");
/* Perform the call */
STk_debug("On va faire l'appel ");
ffi_call(&EXTFUNC_CIF(fct),
EXTFUNC_CODE(fct),
&retval,
p_args);
#ifdef XXX
{
char *s = STRING_CHARS(argv[0]);
void *values[1];
values[0] = &s;
ffi_call(&EXTFUNC_CIF(fct),
EXTFUNC_CODE(fct),
&retval,
values);
}
#endif
STk_debug("L'appel est fait ");
return c2scheme(retval, EXTFUNC_RETTYPE(fct));
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment