fixed seg fault for non record function calls

tests/sprint2/test/sp2_carls_mistake.alpha

@@ -14,11 +14,11 @@ foo (x) := {
     return x * x;
 }
 
-bar1 (a) := {
-	return a.x * a.y;
+bar1 (x, y) := {
+	return x * y;
 }
 
-bar2 as (r,s) := {
+bar2 (r,s) := {
     return r * s;
 }