24.12.2013 Views

TOPS-10 Monitor Calls Manual Volume 2 AA-K039D ... - Trailing-Edge

TOPS-10 Monitor Calls Manual Volume 2 AA-K039D ... - Trailing-Edge

TOPS-10 Monitor Calls Manual Volume 2 AA-K039D ... - Trailing-Edge

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

TMPCOR [CALLI 44]<br />

3<br />

4<br />

. TCRWF<br />

.TCRRD<br />

Writes the contents of the buffer into a file .<br />

The requested length of the file is the value of<br />

buflen~th. If there is already a file of the<br />

specif~ed name, it is deleted and the space is<br />

reclaimed.<br />

The requested size of the file "is specified by<br />

buflength. If there is not enough space to write<br />

the entire file, nothing is written, the ac is set<br />

to the number of free words of space available to<br />

the user, and the error return is taken.<br />

If there is enough space, the file is written.<br />

The ac is set to the amount of space left after<br />

the file has been written and the skip return is<br />

taken.<br />

If insufficient space is available, none of the<br />

file is written, the error return occurs, and the<br />

number of free words available to your program is<br />

returned in the ac.<br />

Reads a directory. The number of .TMP files in<br />

your directory is returned in the ac, and their<br />

file names are written into the buffer for the<br />

call. You can check for truncation of the<br />

directory list by comparing the ac to buflength.<br />

Each entry in the buffer is of the form:<br />

XWD<br />

'nam',length<br />

In the argument word:<br />

o<br />

o<br />

length is the length of the file in words.<br />

nam is the file name.<br />

5<br />

EXAMPLES<br />

. TCRDD<br />

The error return occurs only if the call is not<br />

implemented.<br />

Reads and deletes from directory. This performs<br />

all the same functions as .TCRRD and in addition<br />

deletes all files from your directory.<br />

ARGLST:<br />

BUFFER:<br />

BUFEND:<br />

CONTIN:<br />

MOVE TI, [XWD . TCRWF,ARGLST]<br />

TMPCOR TI,<br />

JRST TMCERR<br />

JRST CONTIN<br />

XWD 'XYZ',O<br />

IOWD ,BUFFER<br />

ASCIZ /THIS IS THE TEXT FOR THE FILE./<br />

This example writes the text at BUFFER into the file XYZ if space<br />

available.<br />

is<br />

22-437

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!