Bug fix in ZRL decoding

1989-12-08 15:04:37 +00:00
parent 0795da732f
commit fc5cc52e75
2 changed files with 4 additions and 1 deletions
--- a/util/int/do_incdec.c
+++ b/util/int/do_incdec.c
@@ -280,7 +280,7 @@ DoZRLn2(arg)

 	LOG(("@Z6 DoZRLn2(%ld)", l));
 	spoilFRA();
-	l = arg_l(arg);
+	l = arg_l(l);
 	st_stw(loc_addr(l), 0L);
 }