|
DataMuseum.dkPresents historical artifacts from the history of: Bogika Butler |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Bogika Butler Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 768 (0x300)
Types: TextFile
Names: »SAMP5.C«
└─⟦d3d1d07f5⟧ Bits:30009789/_.ft.Ibm2.50006621.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »SAMP5.C«
#include "auxfn.h"
#include "stdio.h"
main()
æ
char filenameÆ14Å;
int mode;
int fd;
int rec;
char ch, instrÆ80Å;
char bufferÆ129Å;
allocs=0;
puts("Enter filename : "); gets(filename);
puts("Øn");
if((fd=open(filename,2))==-1)
æ
puts("Øncannot open file: ");
puts(filename);
puts("Øn");
exit(0);
å
for(;;) æ
puts("Enter record# (-1 to exit): ");
gets(instr);
puts("Øn");
rec=atoi(instr);
if(rec<0) break;
if(seek(fd,rec,0)==-1) æ
puts("record out of rangeØnØn");
å
else
æ
read(fd,buffer,128);
bufferÆ128Å=0;
puts(buffer);
puts("ØnØn");
å
å
å
«eof»