summaryrefslogtreecommitdiff
path: root/module/exception.m
blob: c5cf01edbcc91dfe7445f60cba6a5ffca28e2c67 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Exception: module{

	PATH:	con "/dis/lib/exception.dis";

	# returns the last exception in the form pc, module, exception
	# on the process with the given pid (-1 gives current process)
	# returns (0, nil, nil) if no exception
	getexc:	fn(pid: int): (int, string, string);

	NOTIFYLEADER, PROPAGATE: con iota;

	# set the exception mode(NOTIFYLEADER or PROPAGATE)
	# on the current process
	# it is assumed that the process is a group leader (see Sys->NEWPGRP)
	# returns -1 on failure, 0 on success
	setexcmode:	fn(mode: int): int;

};