File: ctxt_clr.c

package info (click to toggle)
dosemu-freedos 1%3A0.0.b9r5a%2Betch.1-0etch1
  • links: PTS
  • area: contrib
  • in suites: etch
  • size: 19,744 kB
  • ctags: 23,279
  • sloc: ansic: 143,864; asm: 20,397; makefile: 3,868; perl: 1,106; yacc: 690; sh: 553; pascal: 297; xml: 150; cpp: 67
file content (39 lines) | stat: -rw-r--r-- 829 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
 
/* $Id: ctxt_clr.c,v 1.1 2001/04/12 00:33:53 skaus Exp $

	Clear all items of a specified context tag

*/

#include "../config.h"

#include <assert.h>
#include <environ.h>

#include "../include/context.h"
#include "../include/misc.h"

static int clear(void *arg, word segm, word ofs)
{
	assert(segm);
	assert(ofs != 0xffff);

	while(ctxtProbeItemTag(segm, ofs, arg))
	 	env_subVarOffset(segm, ofs);

	return 0;		/* proceed loop */
}

int ctxtClear(const Context_Tag tag)
{	ctxt_info_t *info;

	ctxtCheckInfoTag(tag);
	assert(ctxtFromTag(tag) != CTXT_INVALID);

	/* Clear the useage information */
	info = &CTXT_INFO_STRUCT(tag);
	info->c_sizecur = 0;
	info->c_nummax = info->c_nummin= 0;

	/* Clear the items within the context */
	return env_forAll(ctxtFromTag(tag), clear, (void*)tag);
}