1 files changed, 5 insertions, 6 deletions
diff --git a/testsuite/runnable/record_base_assignment.elna b/testsuite/runnable/record_base_assignment.elna
index c91383d..2a15d0f 100644
--- a/testsuite/runnable/record_base_assignment.elna
+++ b/testsuite/runnable/record_base_assignment.elna
@@ -6,17 +6,16 @@ type
     y: Word
   end
 
-proc f(): Int
+proc f()
 var
   r: R
 begin
   r.x := 3u;
   r.y := 2u;
 
-  assert(r.x = 3u & r.y = 2u);
+  assert(r.x = 3u & r.y = 2u)
+return
 
-  return 0
-end
-
-  return f()
+begin
+  f()
 end.