Changeset 2019 for cobra/trunk/Samples/forth.cobra

Timestamp:

04/16/09 22:18:35 (3 years ago)

Author:

Chuck.Esterbrook

Message:

Introduce .typeOf as a cross platform means of getting the type of an object.

Files:

• cobra/trunk/Samples/forth.cobra (modified) (3 diffs)

cobra/trunk/Samples/forth.cobra

@@ -146 +146 @@
                 methodName = word.toString['built-in:'.length:]
                 methodName = methodName[0].toString.toUpper + methodName[1:] # because at run-time, method names are capped for compatibility with C# and VB
-                method = .getType.getMethod(methodName)
+                method = .typeOf.getMethod(methodName)
                 method.invoke(this, nil)
             else
@@ -396 +396 @@
         branch _which
             on WordType.String
-                if _s == ''
-                    return '(EMPTY-STRING)'
-                if _s.trim == ''
-                    return '(BLANK-STRING)'
+                if _s == '', return '(EMPTY-STRING)'
+                if _s.trim == '', return '(BLANK-STRING)'
                 return _s to !
             on WordType.Int
@@ -407 +405 @@
     def toTechString as String
         branch _which
-            on WordType.String, return '[.getType.name](string, "[_s]")'
-            on WordType.Int, return '[.getType.name](int, "[_i]")'
+            on WordType.String, return '[.typeOf.name](string, "[_s]")'
+            on WordType.Int, return '[.typeOf.name](int, "[_i]")'
         throw FallThroughException(_which)