0.7.6:
[sbcl.git] / src / runtime / alpha-linux-os.h
index c270f2e..c765e08 100644 (file)
@@ -4,7 +4,9 @@
 typedef struct ucontext os_context_t;
 
 static inline os_context_t *arch_os_get_context(void **void_context) {
-  return (os_context_t *) *void_context;
+    return (os_context_t *) *void_context;
 }
 
+unsigned long os_context_fp_control(os_context_t *context);
+
 #endif /* _ALPHA_LINUX_OS_H */