steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

windows.errors: fix #987

db4
Björn Lindqvist 2014-02-11 18:56:09 +01:00 committed by John Benediktsson
parent 2fe03b6711
commit 3715bb6b9a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/windows/errors/errors.factor
View File

@ -706,7 +706,7 @@ CONSTANT: FORMAT_MESSAGE_MAX_WIDTH_MASK 0x000000FF
:: n>win32-error-string ( id -- string ) :: n>win32-error-string ( id -- string )
flags{ flags{
FORMAT_MESSAGE_FROM_SYSTEM FORMAT_MESSAGE_FROM_SYSTEM
FORMAT_MESSAGE_ARGUMENT_ARRAY FORMAT_MESSAGE_IGNORE_INSERTS
} }
f f
id id
@ -739,7 +739,7 @@ ERROR: windows-error n string ;
] [ ] [
dup n>win32-error-string windows-error dup n>win32-error-string windows-error
] if ; ] if ;
: throw-win32-error ( -- * ) : throw-win32-error ( -- * )
win32-error-string throw ; win32-error-string throw ;