From b2fe49704e26f7dd4ea41ce6cc2a09e23bd74e3b Mon Sep 17 00:00:00 2001 From: Erik Charlebois Date: Mon, 22 Feb 2010 10:39:50 -0800 Subject: [PATCH] Add some additional error masks and codes --- basis/windows/errors/errors.factor | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/basis/windows/errors/errors.factor b/basis/windows/errors/errors.factor index a7a41433f7..c5dedb090a 100644 --- a/basis/windows/errors/errors.factor +++ b/basis/windows/errors/errors.factor @@ -5,6 +5,12 @@ arrays literals windows.types specialized-arrays ; SPECIALIZED-ARRAY: TCHAR IN: windows.errors +CONSTANT: APPLICATION_ERROR_MASK HEX: 20000000 +CONSTANT: ERROR_SEVERITY_SUCCESS HEX: 00000000 +CONSTANT: ERROR_SEVERITY_INFORMATIONAL HEX: 40000000 +CONSTANT: ERROR_SEVERITY_WARNING HEX: 80000000 +CONSTANT: ERROR_SEVERITY_ERROR HEX: C0000000 + CONSTANT: ERROR_SUCCESS 0 CONSTANT: ERROR_INVALID_FUNCTION 1 CONSTANT: ERROR_FILE_NOT_FOUND 2 -- 2.34.1