Context Navigation

unlink.c@ 6099cac

Last change on this file since 6099cac was b28a12e, checked in by Thomas Lopatic <thomas@…>, 7 years ago
Zero redundant declarations.
Property mode set to `100644`
File size: 751 bytes

Rev	Line
[f40a309]	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
[b28a12e]	10	#include "ram.h"
[e225e77]	11
[f40a309]	12	/*
	13	=============================================================================
	14	unlink(name) -- delete file 'name'.
	15	=============================================================================
	16	*/
	17
[7258c6a]	18	int16_t unlink(int8_t *name)
[f40a309]	19	{
	20	struct fcb delfcb;
	21
	22	if (fcbinit(name, &delfcb))
	23	return(FAILURE);
	24
	25	#if DEBUGIT
	26	if (fsdebug) {
	27
	28	printf("unlink(%s): deletion FCB created\n", name);
	29	SnapFCB(&delfcb);
	30	waitcr();
	31	}
	32	#endif
	33	return(DelFile(&delfcb));
	34	}
	35
[6262b5c]	36

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