completely new version
This commit is contained in:
13
modules/src/em_code/crucon.c
Normal file
13
modules/src/em_code/crucon.c
Normal file
@@ -0,0 +1,13 @@
|
||||
#include "em_private.h"
|
||||
|
||||
CC_crucon(op, v, s)
|
||||
char *v;
|
||||
arith s;
|
||||
{
|
||||
/* CON or ROM with argument UCON(v,z)
|
||||
*/
|
||||
PS(op);
|
||||
WCON(sp_ucon, v, s);
|
||||
CEND();
|
||||
NL();
|
||||
}
|
||||
Reference in New Issue
Block a user