equal
deleted
inserted
replaced
1124 self ensureRequiredPackagesAreLoaded. |
1124 self ensureRequiredPackagesAreLoaded. |
1125 self resources do: [:each | each availableFor: self]. |
1125 self resources do: [:each | each availableFor: self]. |
1126 |
1126 |
1127 [ |
1127 [ |
1128 didSetup := false. |
1128 didSetup := false. |
1129 self setUp. |
1129 Error handle:[:ex | |
|
1130 Transcript showCR:'error in setup: ',ex description. |
|
1131 ex reject. |
|
1132 ] do:[ |
|
1133 self setUp. |
|
1134 ]. |
1130 didSetup := true. |
1135 didSetup := true. |
1131 self performTest. |
1136 self performTest. |
1132 ] ensure: [ |
1137 ] ensure: [ |
1133 didSetup |
1138 didSetup |
1134 ifTrue:[ self safeTearDown ] |
1139 ifTrue:[ self safeTearDown ] |