Method.st
changeset 2262 4c4d810f006f
parent 2242 5037033b8002
child 2518 303563f538e3
equal deleted inserted replaced
2261:61096f935f76 2262:4c4d810f006f
   153         PrivateMethodSignal nameClass:self message:#privateMethodSignal.
   153         PrivateMethodSignal nameClass:self message:#privateMethodSignal.
   154         PrivateMethodSignal notifierString:'attempt to execute private/protected method'.
   154         PrivateMethodSignal notifierString:'attempt to execute private/protected method'.
   155     ].
   155     ].
   156 
   156 
   157     LastFileLock isNil ifTrue:[
   157     LastFileLock isNil ifTrue:[
   158         LastFileLock := Semaphore forMutualExclusion.
   158         LastFileLock := Semaphore forMutualExclusion name:'LastFileLock'.
   159         LastFileReference := WeakArray new:1.
   159         LastFileReference := WeakArray new:1.
   160         LastFileReference at:1 put:0.
   160         LastFileReference at:1 put:0.
   161     ].
   161     ].
   162 
   162 
   163     "Modified: 22.4.1996 / 16:34:38 / cg"
   163     "Modified: 22.4.1996 / 16:34:38 / cg"
  2767 ! !
  2767 ! !
  2768 
  2768 
  2769 !Method class methodsFor:'documentation'!
  2769 !Method class methodsFor:'documentation'!
  2770 
  2770 
  2771 version
  2771 version
  2772     ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.124 1997-01-23 12:42:23 cg Exp $'
  2772     ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.125 1997-01-24 22:09:40 cg Exp $'
  2773 ! !
  2773 ! !
  2774 Method initialize!
  2774 Method initialize!