all tasks

Task/Variables/Seed7/variables.seed7

@@ -0,0 +1,15 @@
+$ include "seed7_05.s7i";
+
+var integer: foo is 5;   # foo is global
+
+const proc: aFunc is func
+  local
+    var integer: bar is 10;   # bar is local to aFunc
+  begin
+    writeln("foo + bar = " <& foo + bar);
+  end func;
+
+const proc: main is func
+  begin
+    aFunc;
+  end func;