shithub: mc

ref: a986d1d8ae4c6f75384b62347c733a226edcafba
dir: /lib/std/syswrap-ss+linux.myr/

View raw version 
use sys
use "errno"

pkg std =
	$noret const exit	: (status:int -> void)
	pkglocal const bgetcwd	: (buf : byte[:] -> errno)
;;

const exit	= {status;	sys.exit_group(status)}
const bgetcwd	= {buf;
	var err
	err = sys.getcwd(buf) castto(errno)
	/*
	if we got a length back, it includes
	the nul byte. chop that off.
	*/
	if err > 0
		-> err - 1
	else
		-> err
	;;
}