/*
- $Header$
-
This code was written as part of the CMU Common Lisp project at
Carnegie Mellon University, and has been placed in the public domain.
#include <stdio.h>
+#include "sbcl.h"
#include "runtime.h"
#include "arch.h"
-#include "sbcl.h"
#include "globals.h"
#include "validate.h"
#include "os.h"
undoably_install_low_level_interrupt_handler(SIGFPE,sigfpe_handler);
}
-void get_spinlock(lispobj *word, int value) {
- /* FIXME: dummy definition */
- *word = value;
-}
-
extern lispobj call_into_lisp(lispobj fun, lispobj *args, int nargs);
lispobj funcall0(lispobj function)