home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
17 Bit Software 1: Collection A
/
17Bit_Collection_A.iso
/
files
/
223.dms
/
223.adf
/
Source
/
kp.c
< prev
next >
Wrap
Text File
|
1988-07-25
|
1KB
|
46 lines
/*
* This is a debug library which interacts directly with the Serial
* port. If you have Manx 3.6a, you don't need this - the same
* functions are included in the standard library. - RRL
*
* Functions are:
* kprintf(fmt, arg1, arg2,....);
* kputchar(char);
* kputs(string);
*/
kprintf(fmt, args)
char *fmt;
int args;
{
int kputchar();
return(format(kputchar, fmt, &args));
}
kputs(str)
char *str;
{
while (*str)
kputchar(*str++);
kputchar('\n');
}
#asm
public _LVORawPutChar
public _kputchar
_kputchar
move.l 4,a6
move.w 4(sp),d0 ;make the 'w' an 'l' if using c32.lib
cmp.b #$a,d0
bne.s .1
jsr _LVORawPutChar(a6)
move.l #$d,d0
.1
jsr _LVORawPutChar(a6)
move.w 4(sp),d0
rts
#endasm