equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1992 by Claus Gittinger |
4 COPYRIGHT (c) 1992 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
145 ] |
147 ] |
146 ] |
148 ] |
147 ] |
149 ] |
148 ] |
150 ] |
149 ] ensure:[ |
151 ] ensure:[ |
150 wasBlocked ifFalse:[ |
152 wasBlocked ifFalse:[ OperatingSystem unblockInterrupts] |
151 OperatingSystem unblockInterrupts |
|
152 ] |
|
153 ] |
153 ] |
154 |
154 |
155 "Modified: / 08-01-1997 / 23:40:30 / cg" |
155 "Modified: / 08-01-1997 / 23:40:30 / cg" |
156 "Modified (format): / 07-02-2018 / 11:27:16 / stefan" |
156 "Modified (format): / 07-02-2018 / 11:27:16 / stefan" |
157 ! |
157 ! |
248 dependents := nil |
248 dependents := nil |
249 ] |
249 ] |
250 ] |
250 ] |
251 ] |
251 ] |
252 ] ensure:[ |
252 ] ensure:[ |
253 wasBlocked ifFalse:[ |
253 wasBlocked ifFalse:[ OperatingSystem unblockInterrupts] |
254 OperatingSystem unblockInterrupts |
|
255 ] |
|
256 ] |
254 ] |
257 |
255 |
258 "Modified: 8.1.1997 / 23:41:39 / cg" |
256 "Modified: 8.1.1997 / 23:41:39 / cg" |
259 ! ! |
257 ! ! |
260 |
258 |