shithub: mc

ref: d8959a4a6d41b0a1328d81eef7c29d10ec669f8e
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 in s
		if b == ('\'' : byte)
			std.sbputs(sb, "'\\''")
		else
			std.sbputb(sb, b)
		;;
	;;
	std.sbputb(sb, ('\'' : byte))
}