Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Annotation of /sml/trunk/system/Basis/Implementation/Win32/windows-status.sml
ViewVC logotype

Annotation of /sml/trunk/system/Basis/Implementation/Win32/windows-status.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2943 - (view) (download)

1 : larsberg 2933 (* windows-status.sml
2 :     *
3 :     * COPYRIGHT (c) 2008 Fellowship of SML/NJ
4 :     *
5 :     * Structure with the windows status constants
6 :     *
7 :     *)
8 : larsberg 2943 local
9 :     structure SysWord = SysWordImp
10 :     in
11 : larsberg 2933 structure Windows_STATUS : WINDOWS_STATUS =
12 :     struct
13 : larsberg 2943 type status = SysWord.word
14 :     val accessViolation : status = 0wxC0000005
15 :     val arrayBoundsExceeded : status = 0wxC000008C
16 :     val breakpoint : status = 0wx80000003
17 :     val controlCExit : status = 0wxC000013A
18 :     val datatypeMisalignment : status = 0wx80000002
19 :     val floatDenormalOperand : status = 0wxC000008D
20 :     val floatDivideByZero : status = 0wxC000008E
21 :     val floatInexactResult : status = 0wxC000008F
22 :     val floatInvalidOperation : status = 0wxC0000090
23 :     val floatOverflow : status = 0wxC0000091
24 :     val floatStackCheck : status = 0wxC0000092
25 :     val floatUnderflow : status = 0wxC0000093
26 :     val guardPageViolation : status = 0wx80000001
27 :     val integerDivideByZero : status = 0wxC0000094
28 :     val integerOverflow : status = 0wxC0000095
29 :     val illegalInstruction : status = 0wxC000001D
30 :     val invalidDisposition : status = 0wxC0000026
31 :     val invalidHandle : status = 0wxC0000008
32 :     val inPageError : status = 0wxC0000006
33 :     val noncontinuableException : status = 0wxC0000025
34 :     val pending : status = 0wx00000103
35 :     val privilegedInstruction : status = 0wxC0000096
36 :     val singleStep : status = 0wx80000004
37 :     val stackOverflow : status = 0wxC00000FD
38 :     val timeout : status = 0wx00000102
39 :     val userAPC : status = 0wx000000C0
40 : larsberg 2933 end
41 : larsberg 2943 end

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0