Ticket #8: forDeprec.patch

CobraParser.cobra

@@ -1857 +1857 @@
         deprecated 2008-03: the use of .. and ++ just doesn't relate to anything
         See forEnumerableStmt below.
         """
+        _warning("\nNumericForStatement by assignment (for var = start .. stop) deprecated 2008-03." + _
+                  " Please change to use new form (for var in start:stop:step) before 2009-03")
         .expect('ASSIGN')
         start = .expression
         .expect('DOTDOT')

CobraLang.cobra

@@ -924 +958 @@
             if obj.getType.name.startsWith('List`')
                 dobj = obj to dynamic
                 count = dobj.count to int
-                for j = 0 .. count
+                for j in 0:count
                     try
                         value = dobj[j]
                     catch exc as Exception
@@ -1061 +1095 @@
             _args = $sharp(r'(object[])args.Clone()')
             _locals = Dictionary<of String, dynamic?>()
             _localNamesInOrder = List<of String>()
-            for j = 0 .. _args.length ++ 2
+            for j in 0:_args.length:2
                 .setLocal(_args[j] to String, _args[j+1])
 
         def setLocal(name as String, value as dynamic?)
@@ -1073 +1107 @@
             nameWidth = 8
             tw.writeLine('\n    [i]. [this]')
             tw.writeLine('        args')
-            for j = 0 .. _args.length ++ 2
+            for j in 0:_args.length:2
                 tw.write(String.format('               {0} = ', (_args[j] to String).padRight(nameWidth)))
                 try
                     s = CobraCore.toTechString(_args[j+1])
@@ -1101 +1135 @@
             tw.writeLine('<tr class=frameHead> <td class=number> [i]. </td> <td class=qualifiedMember colspan=4> [_declClassName].[_methodName] </td> </tr> ')
             tw.writeLine('<tr class=frameDetails1> <td class=indent> &nbsp; </td> <td class=label width=1> at: </td> <td class=sourceLocation colspan=3> [SourceSite.htmlForAtArgs(_fileName, _lineNum)] </td> </tr>')
             rowNum = 1
-            for j = 0 .. _args.length ++ 2
+            for j in 0:_args.length:2
                 name = _args[j] to String
                 value = _args[j+1] to dynamic?
                 label = if(j==0, 'args:', '')