From: Joe Groff <arcata@gmail.com>
Date: Thu, 22 Oct 2009 05:18:01 +0000 (-0500)
Subject: also print undocumented windows SSE exception codes
X-Git-Tag: 0.97~4971^2~84
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=9a91abe8a873e392e3e4f9b0395e732e4f4dfab5

also print undocumented windows SSE exception codes
---

diff --git a/basis/debugger/windows/windows.factor b/basis/debugger/windows/windows.factor
index 3485d96447..188b820788 100644
--- a/basis/debugger/windows/windows.factor
+++ b/basis/debugger/windows/windows.factor
@@ -30,6 +30,8 @@ CONSTANT: seh-names
         { $ STATUS_PRIVILEGED_INSTRUCTION     "STATUS_PRIVILEGED_INSTRUCTION"   }
         { $ STATUS_STACK_OVERFLOW             "STATUS_STACK_OVERFLOW"           }
         { $ STATUS_CONTROL_C_EXIT             "STATUS_CONTROL_C_EXIT"           }
+        { $ STATUS_FLOAT_MULTIPLE_FAULTS      "STATUS_FLOAT_MULTIPLE_FAULTS"    }
+        { $ STATUS_FLOAT_MULTIPLE_TRAPS       "STATUS_FLOAT_MULTIPLE_TRAPS"     }
     }
 
 : seh-name. ( n -- )
diff --git a/basis/windows/kernel32/kernel32.factor b/basis/windows/kernel32/kernel32.factor
index 4cf93f7836..54d3fe6f4d 100755
--- a/basis/windows/kernel32/kernel32.factor
+++ b/basis/windows/kernel32/kernel32.factor
@@ -784,6 +784,8 @@ CONSTANT: STATUS_INTEGER_OVERFLOW           HEX: C0000095
 CONSTANT: STATUS_PRIVILEGED_INSTRUCTION     HEX: C0000096
 CONSTANT: STATUS_STACK_OVERFLOW             HEX: C00000FD
 CONSTANT: STATUS_CONTROL_C_EXIT             HEX: C000013A
+CONSTANT: STATUS_FLOAT_MULTIPLE_FAULTS      HEX: C00002B4
+CONSTANT: STATUS_FLOAT_MULTIPLE_TRAPS       HEX: C00002B5
 
 LIBRARY: kernel32
 ! FUNCTION: _hread