shithub: riscv

ref: a70b93a356662355214f5405edda066786f6dd03
dir: /sys/src/cmd/htmlroff/t12.c/

View raw version
#include "a.h"

/*
 * 12. Overstrike, bracket, line-drawing, graphics, and zero-width functions.
 */

/*
	\o'asdf'
	\zc
	\b'asdf'
	\l'Nc'
	\L'Nc'
	\D'xxx'
*/

int
e_o(void)
{
	pushinputstring(getqarg());
	return 0;
}

int
e_z(void)
{
	getnext();
	return 0;
}

int
e_b(void)
{
	pushinputstring(getqarg());
	return 0;
}

int
e_l(void)
{
	getqarg();
	return 0;
}

int
e_L(void)
{
	getqarg();
	return 0;
}

int
e_D(void)
{
	getqarg();
	return 0;
}

void
t12init(void)
{
	addesc('o', e_o, 0);
	addesc('z', e_z, 0);
	addesc('b', e_b, 0);
	addesc('l', e_l, 0);
	addesc('L', e_L, 0);
	addesc('D', e_D, 0);
}