pascalabcnet/TestSuite/CompilationSamples/LambdaProc2.pas

begin
  Arr(1,2,3).ForEach(procedure(x) -> if x>1 then Print(x));
end.
-												Изменение грамматики - запрет условной операции как тела лямбды (во избежание конфликтов с условным оператором)

											
										
										
											2020-01-13 02:01:52 +03:00
+								begin
 								  Arr(1,2,3).ForEach(procedure(x) -> if x>1 then Print(x));
-												fix #138

											
										
										
											2016-04-18 15:15:49 +03:00
+								end.