home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast2.iso
/
awk
/
awk320sr.zip
/
AWKUTIL.C
< prev
next >
Wrap
C/C++ Source or Header
|
1991-04-25
|
637b
|
43 lines
#pragma inline
/*
* Awk stack push pop routines
*
* Copyright (C) 1988, 1989, 1990, 1991 by Rob Duff
* All rights reserved
*/
#include "awk.h"
void xpop(void far *dst)
{
_CX = sizeof(ITEM) / 2;
asm les di, dst
asm mov si, stackptr
asm rep movsw
stackptr++;
}
void xpush(void far *src)
{
stackptr--;
_CX = sizeof(ITEM) / 2;
asm push ds
asm mov ax,ds
asm mov es,ax
asm mov di, stackptr
asm lds si, src
asm rep movsw
asm pop ds
}
void xmove(void far *dst, void far *src)
{
_CX = sizeof(ITEM) / 2;
asm push ds
asm les di, dst
asm lds si, src
asm rep movsw
asm pop ds
}