Changed calls to "setrandom" into calls to "setrand" and
authorkeie <none@none>
Mon, 21 Jan 1985 14:48:16 +0000 (14:48 +0000)
committerkeie <none@none>
Mon, 21 Jan 1985 14:48:16 +0000 (14:48 +0000)
calls to "randomize" inro calls to "randomi" to avoid
problems with routines compiled by C.

lang/basic/src.old/basic.yacc

index 8663a86..14eb16d 100644 (file)
@@ -362,10 +362,10 @@ printlist: expression                     { printstmt($1); $$=1;}
 pokestmt: POKESYM expression ',' expression    {pokestmt($2,$4);}
        ;
 randomizestmt: RANDOMIZESYM 
-                       { emcode("cal","$_randomize");}
+                       { emcode("cal","$_randomi");}
        |       RANDOMIZESYM expression
                         { conversion($2,INTTYPE);
-                         emcode("cal","$_setrandom");
+                         emcode("cal","$_setrand");
                          emcode("asp",EMINTSIZE);}
 
 readstmt:      READSYM {setchannel(0);} variable       { readelm($3);}