projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1.0.31.22: improved SAP-{REF,SET}-* for x86-64
[sbcl.git]
/
src
/
runtime
/
win32-os.c
diff --git
a/src/runtime/win32-os.c
b/src/runtime/win32-os.c
index
eab029e
..
32ff6d0
100644
(file)
--- a/
src/runtime/win32-os.c
+++ b/
src/runtime/win32-os.c
@@
-418,7
+418,7
@@
handle_exception(EXCEPTION_RECORD *exception_record,
_clearfp();
/* Call into lisp to handle things. */
_clearfp();
/* Call into lisp to handle things. */
- funcall2(SymbolFunction(HANDLE_WIN32_EXCEPTION), context_sap,
+ funcall2(StaticSymbolFunction(HANDLE_WIN32_EXCEPTION), context_sap,
exception_record_sap);
/* If Lisp doesn't nlx, we need to put things back. */
exception_record_sap);
/* If Lisp doesn't nlx, we need to put things back. */
@@
-540,14
+540,9
@@
void scratch(void)
_get_osfhandle(0);
_pipe(0,0,0);
access(0,0);
_get_osfhandle(0);
_pipe(0,0,0);
access(0,0);
- acos(0);
- asin(0);
close(0);
close(0);
- cosh(0);
dup(0);
dup(0);
- hypot(0, 0);
isatty(0);
isatty(0);
- sinh(0);
strerror(42);
write(0, 0, 0);
RtlUnwind(0, 0, 0, 0);
strerror(42);
write(0, 0, 0);
RtlUnwind(0, 0, 0, 0);