There are two consequences:
- the thrown object is now a windows-error, previously it was a string;
- if GetLastError returns zero, nothing is thrown. Previously the string
"The operation completed successfully." was thrown in that case.
win32-error-string throw ;
: check-invalid-handle ( handle -- handle )
win32-error-string throw ;
: check-invalid-handle ( handle -- handle )
- dup INVALID_HANDLE_VALUE = [ throw-win32-error ] when ;
+ dup INVALID_HANDLE_VALUE = [ win32-error ] when ;
CONSTANT: expected-io-errors
${
CONSTANT: expected-io-errors
${