/
Boolean.extension.st
52 lines (41 loc) · 1.48 KB
/
Boolean.extension.st
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
Extension { #name : #Boolean }
{ #category : #'*VMMaker-interpreter simulator' }
Boolean >> asBooleanObj [
^(Notification new tag: #getInterpreter; signal)
ifNotNil: [:interpreter| interpreter booleanObjectOf: self]
ifNil: [self]
]
{ #category : #'*VMMaker-C translation' }
Boolean >> asCCodeInlineStrategy [
^ CCodeGeneratorInlineStrategy from: self
]
{ #category : #'*VMMaker-plugin generation' }
Boolean class >> ccg: cg generateCoerceToOopFrom: aNode on: aStream [
"N.B. The is used both for generation and simulation so answer the result (for interpretation)"
^cg generateCoerceToBooleanObjectFrom: aNode on: aStream
]
{ #category : #'*VMMaker-plugin generation' }
Boolean class >> ccg: cg generateCoerceToValueFrom: aNode on: aStream [
"N.B. The could be used both for generation and simulation so answer the result (for interpretation)"
^cg generateCoerceToBooleanValueFrom: aNode on: aStream
]
{ #category : #'*VMMaker-plugin generation' }
Boolean class >> ccg: cg prolog: aBlock expr: aString index: anInteger [
^cg ccgLoad: aBlock expr: aString asBooleanValueFrom: anInteger
]
{ #category : #'*VMMaker-interpreter simulator' }
Boolean >> isBreakpointFor: address [
^self
]
{ #category : #'*VMMaker-interpreter simulator' }
Boolean >> menuPrompt [
^' (CLICK STEPPING!!)'
]
{ #category : #'*VMMaker-interpreter simulator' }
Boolean >> shouldStopIfAtPC: address [
^self
]
{ #category : #'*VMMaker-interpreter simulator' }
Boolean >> singleStepRequiredToTriggerIn: aCogit [
^self
]