* eval.c (SCM_CEVAL): Jump to badfun if trying to apply a struct

[bpt/guile.git] / qt / qt.h.in

diff --git a/qt/qt.h.in b/qt/qt.h.in
index 6e01fec..da45ff8 100644 (file)
--- a/qt/qt.h.in
+++ b/qt/qt.h.in
@@ -137,6 +137,8 @@ extern qt_t *qt_vargs (qt_t *sp, int nbytes, void *vargs,
 
 #endif
 
+extern void qt_null (void);
+extern void qt_error (void);
 
 /* Save the state of the thread and call the helper function
    using the stack of the new thread. */
@@ -147,7 +149,7 @@ typedef void *(qt_block_t)(qt_helper_t *helper, void *a0, void *a1,
 /* Rearrange the parameters so that things passed to the helper
    function are already in the right argument registers. */
 #ifndef QT_ABORT
-extern qt_abort (qt_helper_t *h, void *a0, void *a1, qt_t *newthread);
+extern void qt_abort (qt_helper_t *h, void *a0, void *a1, qt_t *newthread);
 /* The following does, technically, `return' a value, but the
    user had better not rely on it, since the function never
    returns. */