Repository navigation
Expand file tree
/
Copy pathSDL_QuitEvent.cls
More file actions
66 lines (45 loc) · 1.75 KB
/
Copy pathSDL_QuitEvent.cls
File metadata and controls
66 lines (45 loc) · 1.75 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
"Filed out from Dolphin Smalltalk"!
SDL_Event subclass: #SDL_QuitEvent
instanceVariableNames: ''
classVariableNames: '_OffsetOf_reserved _OffsetOf_timestamp _OffsetOf_type'
poolDictionaries: ''
classInstanceVariableNames: ''!
SDL_QuitEvent guid: (GUID fromString: '{75ade90c-54ff-49b4-b62c-d908bf60e9a9}')!
SDL_QuitEvent addClassConstant: '_OffsetOf_reserved' value: 16r4!
SDL_QuitEvent addClassConstant: '_OffsetOf_timestamp' value: 16r8!
SDL_QuitEvent addClassConstant: '_OffsetOf_type' value: 16r0!
SDL_QuitEvent comment: ''!
!SDL_QuitEvent categoriesForClass!External-Data-Structured! !
!SDL_QuitEvent methodsFor!
timestamp
"Answer the <Integer> value of the receiver's 'timestamp' field."
^bytes qwordAtOffset: _OffsetOf_timestamp!
timestamp: anInteger
"Set the receiver's 'timestamp' field to the value of the argument, anInteger"
bytes qwordAtOffset: _OffsetOf_timestamp put: anInteger!
type
"Answer the <Integer> value of the receiver's 'type' field."
^bytes dwordAtOffset: _OffsetOf_type!
type: anInteger
"Set the receiver's 'type' field to the value of the argument, anInteger"
bytes dwordAtOffset: _OffsetOf_type put: anInteger! !
!SDL_QuitEvent categoriesForMethods!
timestamp!**compiled accessors**!public! !
timestamp:!**compiled accessors**!public! !
type!**compiled accessors**!public! !
type:!**compiled accessors**!public! !
!
!SDL_QuitEvent class methodsFor!
defineFields
"self compileDefinition"
self
defineField: #type type: DWORDField new;
defineField: #reserved type: DWORDField new beFiller;
defineField: #timestamp type: QWORDField new;
byteSize: 128!
getFieldNames
^#(#type #timestamp)! !
!SDL_QuitEvent class categoriesForMethods!
defineFields!public! !
getFieldNames!**compiled accessors**!constants!private! !
!