1.0.0.11:
[sbcl.git] / src / runtime / win32-os.c
index 02c6704..9161889 100644 (file)
@@ -334,9 +334,9 @@ extern boolean internal_errors_enabled;
  * unwinding in Lisp.
  */
 
-EXCEPTION_DISPOSITION 
+EXCEPTION_DISPOSITION
 sigtrap_emulator(CONTEXT *context,
-                struct lisp_exception_frame *exception_frame)
+                 struct lisp_exception_frame *exception_frame)
 {
     if (*((char *)context->Eip + 1) == trap_ContextRestore) {
         /* This is the cleanup for what is immediately below, and
@@ -425,22 +425,22 @@ void sigtrap_wrapper(void)
 /*     set_seh_frame(handler.handler[0]); */
 }
 
-EXCEPTION_DISPOSITION 
+EXCEPTION_DISPOSITION
 handle_exception(EXCEPTION_RECORD *exception_record,
-                struct lisp_exception_frame *exception_frame,
-                CONTEXT *context,
-                void *dc) /* FIXME: What's dc again? */
+                 struct lisp_exception_frame *exception_frame,
+                 CONTEXT *context,
+                 void *dc) /* FIXME: What's dc again? */
 {
     /* For EXCEPTION_ACCESS_VIOLATION only. */
     void *fault_address = (void *)exception_record->ExceptionInformation[1];
 
-    if (single_stepping && 
-       exception_record->ExceptionCode == EXCEPTION_SINGLE_STEP) {
-       /* We are doing a displaced instruction. At least function
-        * end breakpoints uses this. */
-       restore_breakpoint_from_single_step(context);
-       return ExceptionContinueExecution;
-    }    
+    if (single_stepping &&
+        exception_record->ExceptionCode == EXCEPTION_SINGLE_STEP) {
+        /* We are doing a displaced instruction. At least function
+         * end breakpoints uses this. */
+        restore_breakpoint_from_single_step(context);
+        return ExceptionContinueExecution;
+    }
 
     if (exception_record->ExceptionCode == EXCEPTION_BREAKPOINT) {
         /* Pick off sigtrap case first. */