cc65/libsrc/telestrat/close.s

; jede jede@oric.org 2017-01-22

    .export         _close

    .import         addysp,popax

    .include        "zeropage.inc"
    .include        "telestrat.inc"
    .include        "errno.inc"
    .include        "fcntl.inc"

; int open (const char* name, int flags, ...);    /* May take a mode argument */
.proc _close
    BRK_TELEMON XCLOSE  ; launch primitive ROM
    rts
.endproc
Merge telemon24 and telemon30 into telestrat target. Cleaning, and replace tab to spaces Converting hex lowercase value into uppercase char. Changing := and = when it was needed 2017-01-31 22:09:14 +01:00			`; jede jede@oric.org 2017-01-22`

			`.export _close`
remove TABs 2019-02-05 23:27:52 +01:00
			`.import addysp,popax`

			`.include "zeropage.inc"`
Merge telemon24 and telemon30 into telestrat target. Cleaning, and replace tab to spaces Converting hex lowercase value into uppercase char. Changing := and = when it was needed 2017-01-31 22:09:14 +01:00			`.include "telestrat.inc"`
Correcting alignment 2017-02-02 00:05:50 +01:00			`.include "errno.inc"`
remove TABs 2019-02-05 23:27:52 +01:00			`.include "fcntl.inc"`

Merge telemon24 and telemon30 into telestrat target. Cleaning, and replace tab to spaces Converting hex lowercase value into uppercase char. Changing := and = when it was needed 2017-01-31 22:09:14 +01:00			`; int open (const char* name, int flags, ...); /* May take a mode argument */`
			`.proc _close`
remove TABs 2019-02-05 23:27:52 +01:00			`BRK_TELEMON XCLOSE ; launch primitive ROM`
Merge telemon24 and telemon30 into telestrat target. Cleaning, and replace tab to spaces Converting hex lowercase value into uppercase char. Changing := and = when it was needed 2017-01-31 22:09:14 +01:00			`rts`
			`.endproc`