#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Fri, 24 Jun 2016 22:01:06 +0200
changeset 20032 68dbfb9bf2c1
parent 20031 8de79de4b866
child 20033 3a2d8d2bcc8c
#REFACTORING by stefan class: Method changed: #initialize
Method.st
--- a/Method.st	Fri Jun 24 18:03:12 2016 +0200
+++ b/Method.st	Fri Jun 24 22:01:06 2016 +0200
@@ -193,18 +193,17 @@
     "create signals"
 
     PrivateMethodSignal isNil ifTrue:[
-	"EXPERIMENTAL"
-	PrivateMethodSignal := ExecutionError newSignalMayProceed:true.
-	PrivateMethodSignal nameClass:self message:#privateMethodSignal.
-	PrivateMethodSignal notifierString:'attempt to execute private/protected method'.
+        "EXPERIMENTAL"
+        PrivateMethodSignal := ExecutionError newSignalMayProceed:true.
+        PrivateMethodSignal nameClass:self message:#privateMethodSignal.
+        PrivateMethodSignal notifierString:'attempt to execute private/protected method'.
     ].
 
     LastFileLock isNil ifTrue:[
-	LastFileLock := RecursionLock new name:'Method-LastFile'.
-	LastMethodSourcesLock := RecursionLock new name:'Method-LastMethodSources'.
-
-	LastFileReference := WeakArray new:1.
-	LastFileReference at:1 put:nil.
+        LastFileLock := RecursionLock new name:'Method-LastFile'.
+        LastMethodSourcesLock := RecursionLock new name:'Method-LastMethodSources'.
+
+        LastFileReference := WeakArray new:1.
     ].
 
     CompilationLock := RecursionLock new name:'MethodCompilation'.
@@ -1057,7 +1056,6 @@
     "Modified (format): / 18-11-2011 / 14:47:06 / cg"
 ! !
 
-
 !Method methodsFor:'accessing-visibility'!
 
 isIgnored
@@ -3725,7 +3723,6 @@
     "Created: / 23-07-2012 / 11:16:36 / cg"
 ! !
 
-
 !Method methodsFor:'source management'!
 
 revisionInfo