Added increment operators

Author: lucascompython

CritLang/Content/Crit.g4

@@ -15,7 +15,9 @@ whileBlock: WHILE expression block ('else' elseIfBlock);
 
 WHILE: 'while' | 'until';
 
-assignment: IDENTIFIER '=' expression;
+assignment: IDENTIFIER assignmentOp expression;
+
+assignmentOp: '=' | '*=' | '/=' | '%=' | '+=' | '-=';
 
 functionCall: IDENTIFIER '(' (expression (',' expression)*)? ')';
 

CritLang/Content/test.crit

@@ -1,15 +1,25 @@
-ola = [1, "dois", 3, "quatro"];
+ola = 5;
 
 
-WriteLine(ola);
 
-Remove(ola, 1);
+ola *= 2;
 
-WriteLine("----------------");
-WriteLine(ola);
+ola /= 3;
 
+ola -= 1.3333;
 
-Add(ola, 69.420);
+ola += 3;
+
+ola %= 2
 
-WriteLine("----------------");
 WriteLine(ola);
+
+
+
+
+
+
+
+
+
+

CritLang/CritVisitor.cs

@@ -25,7 +25,7 @@ public CritVisitor()
     }
 
 
-    private object? RemoveArr(object?[] args)
+    private static object? RemoveArr(object?[] args)
     {
         if (args.Length != 2)
         {
@@ -172,6 +172,8 @@ public CritVisitor()
 
         var value = Visit(context.expression());
 
+        var op = context.assignmentOp().GetText();
+        
         if (varName.Contains('[') && varName.Contains(']'))
         {
             string[] variableHelper = varName.Replace("]", string.Empty).Split('[');
@@ -203,9 +205,42 @@ public CritVisitor()
             }
 
         }
-        else
+        
+        else switch (op)
         {
-            Variables[varName] = value;
+            case "*=":
+            {
+                var varValue = Convert.ToSingle(Variables[varName]!);
+                Variables[varName] = varValue * Convert.ToSingle(value!);
+                break;
+            }
+            case "/=":
+            {
+                var varValue = Convert.ToSingle(Variables[varName]!);
+                Variables[varName] = varValue / Convert.ToSingle(value!);
+                break;
+            }
+            case "%=":
+            {
+                var varValue = Convert.ToSingle(Variables[varName]!);
+                Variables[varName] = varValue % Convert.ToSingle(value!);
+                break;
+            }
+            case "+=":
+            {
+                var varValue = Convert.ToSingle(Variables[varName]!);
+                Variables[varName] = varValue + Convert.ToSingle(value!);
+                break;
+            }
+            case "-=":
+            {
+                var varValue = Convert.ToSingle(Variables[varName]!);
+                Variables[varName] = varValue - Convert.ToSingle(value!);
+                break;
+            }
+            default:
+                Variables[varName] = value;
+                break;
         }
 
 
@@ -331,7 +366,6 @@ public CritVisitor()
         };
     }
 
-
     private static object? Add(object? left, object? right) => (left, right) switch
     {
         (int l, int r) => l + r,

CritLang/Program.cs

@@ -2,7 +2,7 @@
 using CritLang;
 using CritLang.Content;
 
-string VERSION = "v0.1.5-beta";
+string VERSION = "v0.1.6-beta";
 
 string fileName = CommandLineArgs.Parse(args, VERSION);
 

CritLang/sieve.crit

@@ -8,7 +8,7 @@ i = 0;
 
 while i < rounds {
     total[i] = true;
-    i = i + 1;
+    i += 1;
 }
 
 #start of sieve
@@ -24,10 +24,10 @@ while num < Sqrt(rounds) {
 
         while j < rounds {
             total[j] = false;
-            j = j + num;
+            j += num;
         } 
     }
-    num = num + 1;
+    num += 1;
 }
 
 
@@ -37,7 +37,7 @@ while k < rounds {
     if total[k] == true {
         primes = primes + 1;
     }
-    k = k + 1;
+    k += 1;
 }
 composites = rounds - primes;
 WriteLine("Found " + primes + " and " + composites + " composites in " + rounds + " numbers!");