Implemented for loops

src/ast/For.go

@@ -0,0 +1,9 @@
+package ast
+
+import "git.akyoto.dev/cli/q/src/expression"
+
+// For is a loop with a defined iteration limit.
+type For struct {
+	Head *expression.Expression
+	Body AST
+}

src/ast/Loop.go

@@ -1,9 +1,6 @@
 package ast
 
-import "git.akyoto.dev/cli/q/src/expression"
-
-// Loop represents a block of repeatable statements.
+// Loop is a block of infinitely repeating instructions.
 type Loop struct {
-	Head *expression.Expression
 	Body AST
 }

src/ast/parseKeyword.go

@@ -39,17 +39,21 @@ func parseKeyword(tokens token.List, source []byte, nodes AST) (Node, error) {
 		ifNode.Else = body
 		return nil, err
 
-	case token.Loop:
+	case token.For:
 		blockStart, _, body, err := block(tokens, source)
 		head := tokens[1:blockStart]
 
-		loop := &Loop{
+		loop := &For{
 			Head: expression.Parse(head),
 			Body: body,
 		}
 
 		return loop, err
 
+	case token.Loop:
+		_, _, body, err := block(tokens, source)
+		return &Loop{Body: body}, err
+
 	case token.Return:
 		if len(tokens) == 1 {
 			return &Return{}, nil