shithub: mc

ref: 8317e87e7b6f9a15ff41f9f7293ef46dc208d0d7
dir: /lib/escfmt/escsh.myr/

View raw version 
use std

pkg escfmt =
	type escsh = byte[:]

	const sh	: (s : byte[:] -> escsh) 
;;

const __init__ = {
	var s = ("" : escsh)
	std.fmtinstall(std.typeof(s), shfmt, [][:])
}

const sh = {s
	-> (s : escsh)
}

const shfmt = {sb, ap, args
	var s : byte[:]

	s = std.vanext(ap)
	std.sbputb(sb, ('\'' : byte))
	for b : s
		if b == ('\'' : byte)
			std.sbputs(sb, "'\\''")
		else
			std.sbputb(sb, b)
		;;
	;;
	std.sbputb(sb, ('\'' : byte))
}