home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Crawly Crypt Collection 1
/
crawlyvol1.bin
/
program
/
compiler
/
nasm20b
/
nasm_src
/
immasm.c
< prev
next >
Wrap
C/C++ Source or Header
|
1993-01-19
|
1KB
|
40 lines
/* ---------------------------------------------------------------------- */
/* Copyright (C) 1991 by Natürlich! */
/* This file is copyrighted! */
/* Refer to the documentation for details. */
/* ---------------------------------------------------------------------- */
/* This Source is ... */
/* this Source is ... */
/* this Source is Technotronic */
/* ---------------------------------------------------------- */
#include "defines.h"
#include "nasm.h"
#include "debug.h"
#include "imm.h"
#include "op.h"
extern imm huge *cip,
huge *hip;
extern seg huge *sp;
static char lossage[] = "Expression must be preceded by '<' or '>'";
void save_patch( where, type, value)
word where, value;
byte type;
{
register imm huge *p = imm_alloc();
ENTER("save_patch");
if( ! (p->type = ((type &= O_BITS) == O_MSB)))
if( type != O_LSB)
nerror( lossage);
p->offset = where;
p->block = sp;
p->val = value;
p->next = (imm huge *) 0;
cip = hip ? (cip->next = p) : (hip = p);
LEAVE();
}