Merge branch 'master' of git://factorcode.org/git/factor

[factor.git] / basis / debugger / windows / windows.factor

diff --git a/basis/debugger/windows/windows.factor b/basis/debugger/windows/windows.factor
old mode 100644 (file)
new mode 100755 (executable)
index 188b820..319f100
--- a/basis/debugger/windows/windows.factor
+++ b/basis/debugger/windows/windows.factor
@@ -1,7 +1,7 @@
 ! Copyright (C) 2009 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: assocs debugger io kernel literals namespaces prettyprint
-sequences system windows.kernel32 ;
+USING: assocs debugger io kernel literals math.parser namespaces
+prettyprint sequences system windows.kernel32 ;
 IN: debugger.windows
 
 CONSTANT: seh-names
@@ -35,8 +35,8 @@ CONSTANT: seh-names
     }
 
 : seh-name. ( n -- )
-    seh-names get at [ " (" ")" surround write ] when* ;
+    seh-names at [ " (" ")" surround write ] when* ;
 
 M: windows signal-error.
     "Windows exception 0x" write
-    third [ .h ] [ seh-name. ] bi nl ;
+    third [ >hex write ] [ seh-name. ] bi nl ;