|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1536 (0x600)
Types: TextFile
Names: »careainp«
└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ. Detaljer om "HC8000" projekt.
└─⟦0364f57e3⟧
└─⟦8c6b0f8fa⟧ »cdes«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦8c6b0f8fa⟧ »cdes«
└─⟦this⟧
*pl 297,21,240,13,4*
*pn 0,0**lw 170* *ld 12* *ps*
*qr*
1978-03-01
Anders Lindgård
*nl1*
*ct*
boolean procedure cleararea
*nl1*
*rj**np*
Every word of a file describing a backing store area is set to zero.
*nl2*
Call: cleararea(file)*nl*
*lm55*
*mt 1, cleararea**cm 6 spaces*(return value, boolean).
true if file is cleared, false otherwise.*nl*
*mt 1, file*(call value, string). The name of
the file.
*np*
The string file must contain the name of an existing backing store file.
*np*
The procedure checks that file is a catalog entry
and describes a backing store area and
that it may be used for exclusive access.
In case of an error an errormessage is written on
current output, but the program is not terminated.
*lm0**nl2*
*ns 1,2,Language: ALGOL*
---------*nl*
*ns 1,2,Maintenance level: user*
------------------*nl*
*ef*
▶EOF◀