1
0
mirror of synced 2026-02-26 00:04:10 +00:00
Files
arnoldrobbins.qed-archive/visual-studio-1994/setaddr.c
2019-01-30 17:05:25 +02:00

33 lines
375 B
C

/*% cc -c -O %
*/
#include "vars.h"
extern noaddr;
setdot()
{
if (addr2 == 0)
addr1 = addr2 = dot;
if (addr1 > addr2)
error('$');
}
setall()
{
if (noaddr) {
addr1 = zero+1;
addr2 = dol;
if (dol==zero)
addr1 = zero;
}
setdot();
}
setnoaddr()
{
extern noaddr;
if (noaddr == FALSE)
error('$');
}
nonzero()
{
if (addr1<=zero || addr2>dol)
error('$');
}