shithub: mc

ref: 86aa50f243677df226f5ee02d6b15f85c634a6f1
dir: /lib/thread/fsbase+freebsd.myr/

use std
use sys

use "types"

pkg thread =
	pkglocal const setfsbase : (h : tlshdr# -> void)
	pkglocal const getfsbase : (-> tlshdr#)
;;

const setfsbase = {h
	match sys.sysarch(sys.Archamd64setfs, &(h : void#))
	| 0:
	| err:
		std.fput(std.Err, "error: sysarch returned {}\n", err)
		std.suicide()
	;;
}

const getfsbase = {
	var h
	match sys.sysarch(sys.Archamd64getfs, &h)
	| 0: -> (h : tlshdr#)
	| err:
		std.fput(std.Err, "error: sysarch returned {}\n", err)
		std.suicide()
	;;
}