# HG changeset patch
# User mawalch
# Date 1471258355 -7200
# Node ID 68f3c2d9d4174ff9ea255c2a1e2d6bf844313764
# Parent  e5a0b5e13d5d780cebf1355d48bc9aee9c84d272
#OTHER by mawalch
occure -> occur
occurence -> occurrence
occures -> occurs
occured -> occurred

diff -r e5a0b5e13d5d -r 68f3c2d9d417 UnaryNode.st
--- a/UnaryNode.st	Mon Aug 15 12:51:30 2016 +0200
+++ b/UnaryNode.st	Mon Aug 15 12:52:35 2016 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libcomp' }"
 
+"{ NameSpace: Smalltalk }"
+
 MessageNode subclass:#UnaryNode
 	instanceVariableNames:''
 	classVariableNames:''
@@ -74,13 +76,13 @@
             "/ evaluate at compile time:
             "/      Character tab
             "/      Character cr
-            "/          ... 
+            "/          ...
             "/      Float pi
             "/      Float e
-            "/          ... 
+            "/          ...
             "/      String cr
             "/      String crlf
-            "/          ... 
+            "/          ...
             "/      #(...) asFloatArray
 
             r isGlobal ifTrue:[
@@ -115,7 +117,7 @@
 "/ However, the JIT compiler compensates for this ;-)
 "/                (globalName = 'Smalltalk') ifTrue:[
 "/                    ( #( isSmalltalkX isVisualWorks isSqueak
-"/                         isSmalltalkMT isDolphinSmalltalk isVisualAge 
+"/                         isSmalltalkMT isDolphinSmalltalk isVisualAge
 "/                         isSmalltalkV) includes:selector)
 "/                    ifTrue:[
 "/                        (recVal respondsTo:selector) ifTrue:[
@@ -144,19 +146,19 @@
                 "
                  we could do much more here - but then, we need a dependency from
                  the folded selectors method to the method we generate code for ...
-                 limit optimizations to those that will never change 
+                 limit optimizations to those that will never change
                  (or, if you change them, it will crash badly anyway ...)
                 "
                 recVal respondsToArithmetic ifTrue:[
                     (#( negated abs asPoint degreesToRadians radiansToDegrees
-                        exp ln log sqrt reciprocal 
+                        exp ln log sqrt reciprocal
                         arcCos arcSin arcTan sin cos tan) includes:selector)
                     ifTrue:[
                         canFold := true
                     ]
                 ].
                 recVal isCharacter ifTrue:[
-                    (#( asciiValue asInteger digitValue asString) includes:selector) 
+                    (#( asciiValue asInteger digitValue asString) includes:selector)
                     ifTrue:[
                         canFold := true
                     ]
@@ -194,7 +196,7 @@
                     ^ ConstantNode type:(ConstantNode typeOfConstant:result) value:result
                 ].
                 "when we reach here, something went wrong (something like 0.0 log)"
-                ^ ParseErrorNode errorString:'error occured while evaluating constant expression'
+                ^ ParseErrorNode errorString:'error occurred while evaluating constant expression'
             ].
         ].
     ].
@@ -381,10 +383,10 @@
 !UnaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.60 2013-10-19 23:05:27 vrany Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.60 2013-10-19 23:05:27 vrany Exp $'
+    ^ '$Header$'
 ! !