Allow multiple operations in with blocks

docs/language_spec.rst

@@ -368,15 +368,19 @@ with-Blocks
 ~~~~~~~~~~~
 Runs a statement in the context of an actor, an object or
 a performer. Only simple statements are allowed, no blocks
-or labels. The blocks can only contain exactly one statement.
+or labels.
 The keywords ``actor``, ``object`` or ``performer`` can be used
 to specify the type. As identifiers for their IDs integers and
 constants can be used.
+``with`` blocks can contain multiple operations for convenience,
+but unlike code in targeted routines, operations in the block are
+not executed concurrently.
 
 .. code:: ExplorerScript
 
     with (actor ACTOR_HELLO_WORLD) {
-        operation();
+        operation1();
+        operation2();
     }
 
 if-Blocks

explorerscript/antlr/ExplorerScript.g4

@@ -45,9 +45,8 @@ jump: JUMP AT IDENTIFIER;
 call: CALL AT IDENTIFIER;
 macro_call: MACRO_CALL OPEN_PAREN arglist? CLOSE_PAREN ';';
 
-// a ctx block needs exactly one simple statement, we enforce this on parser level.
 // warning: the parser also accepts labels, which isn't valid!
-ctx_block: WITH OPEN_PAREN ctx_header CLOSE_PAREN OPEN_BRACE simple_stmt CLOSE_BRACE;
+ctx_block: WITH OPEN_PAREN ctx_header CLOSE_PAREN OPEN_BRACE simple_stmt* CLOSE_BRACE;
 
 if_block: IF NOT? OPEN_PAREN if_header (OR if_header)* CLOSE_PAREN OPEN_BRACE stmt* CLOSE_BRACE elseif_block* else_block?;
 elseif_block: ELSEIF NOT? OPEN_PAREN if_header (OR if_header)* CLOSE_PAREN OPEN_BRACE stmt* CLOSE_BRACE;