1 files changed, 16 insertions, 0 deletions
diff --git a/Testing/Semantic/t1-1b.p b/Testing/Semantic/t1-1b.p
new file mode 100644
index 0000000..5a16e62
--- /dev/null
+++ b/Testing/Semantic/t1-1b.p
@@ -0,0 +1,16 @@
+(* ERROR: variable redeclared *)
+program main( input, output );
+  var a: integer;
+
+  procedure boo;
+  begin
+  end;
+
+  function boo(b:integer):integer;
+  begin
+	boo := 1
+  end;
+
+begin
+end.
+