-
Notifications
You must be signed in to change notification settings - Fork 0
/
Cypress-Mocks.pck
executable file
·49 lines (39 loc) · 1.47 KB
/
Cypress-Mocks.pck
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
'From Cuis 4.0 of 21 April 2012 [latest update: #1294] on 6 June 2012 at 2:43:49 pm'!
'Description Mock package example. Should be cross-dialect.'!
!classDefinition: #CypressMockBasic category: #'Cypress-Mocks'!
Object subclass: #CypressMockBasic
instanceVariableNames: 'name'
classVariableNames: ''
poolDictionaries: ''
category: 'Cypress-Mocks'!
!classDefinition: 'CypressMockBasic class' category: #'Cypress-Mocks'!
CypressMockBasic class
instanceVariableNames: 'current'!
!CypressMockBasic commentStamp: 'dkh 4/24/2012 01:05' prior: 0!
This mock contains basic class and instance method selectors!
!CypressMockBasic methodsFor: 'accessing' stamp: 'dkh 4/24/2012 15:29'!
extra
"extra method"! !
!CypressMockBasic methodsFor: 'initialization' stamp: 'dkh 4/24/2012 00:33'!
initialize
super initialize.
self name: 'Unknown'! !
!CypressMockBasic methodsFor: 'accessing' stamp: 'dkh 4/24/2012 00:22'!
name
^name! !
!CypressMockBasic methodsFor: 'accessing' stamp: 'dkh 4/24/2012 15:29'!
name: aString
name := aString! !
!CypressMockBasic class methodsFor: 'accessing' stamp: 'dkh 4/24/2012 00:23'!
current
^current! !
!CypressMockBasic class methodsFor: 'accessing' stamp: 'dkh 4/24/2012 00:23'!
current: anObject
current := anObject! !
!CypressMockBasic class methodsFor: 'initialization' stamp: 'dkh 4/24/2012 00:23'!
initialize
self current: self new! !
!Object methodsFor: '*Cypress-Mocks' stamp: 'dkh 4/24/2012 15:29'!
isCypressMockBasic
^false! !
CypressMockBasic initialize!