Browse Source

improved call to C_lin

ceriel 37 years ago
parent
commit
1fdfb2b738
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lang/cem/cemcom/code.c

+ 1 - 1
lang/cem/cemcom/code.c

@@ -494,7 +494,7 @@ code_expr(expr, val, code, tlbl, flbl)
 		lin instruction.  EVAL() is called directly.
 	*/
 	if (! options['L'])	/* profiling	*/
-		C_lin((arith)LineNumber);
+		C_lin((arith)(expr->ex_line));
 	EVAL(expr, val, code, tlbl, flbl);
 }