Context Navigation

unlink.c@ 0580615

Last change on this file since 0580615 was 0580615, checked in by Thomas Lopatic <thomas@…>, 7 years ago
Point of no return.
Property mode set to `100644`
File size: 872 bytes

Line
1	/*
2	=============================================================================
3	unlink.c -- unlink (delete) a file
4	Version 6 -- 1987-11-15 -- D.N. Lynx Crowe
5	=============================================================================
6	*/
7
8	#define DEBUGIT 0
9
10	#include "biosdefs.h"
11	#include "stddefs.h"
12
13	#if DEBUGIT
14	extern short fsdebug;
15
16	extern int waitcr();
17	#endif
18
19	extern int DelFile(struct fcb *fcp);
20
21	/*
22	=============================================================================
23	unlink(name) -- delete file 'name'.
24	=============================================================================
25	*/
26
27	int unlink(char *name)
28	{
29	struct fcb delfcb;
30
31	if (fcbinit(name, &delfcb))
32	return(FAILURE);
33
34	#if DEBUGIT
35	if (fsdebug) {
36
37	printf("unlink(%s): deletion FCB created\n", name);
38	SnapFCB(&delfcb);
39	waitcr();
40	}
41	#endif
42	return(DelFile(&delfcb));
43	}
44

Note: See TracBrowser for help on using the repository browser.