%lc
%?
$source lisp(*F)
$create -data.c size=20p
$copy >syn6 to -data.c
%input data.c
$trunce -data.c
$rename -data.c as lisp.data.c
$create -io.c size=20p
$copy >syn6 to -io.c
%input io.c
$trunce -io.c
$rename -io.c as lisp.io.c
$create -eval.c size=20p
$copy >syn6 to -eval.c
%input eval.c
$trunce -eval.c
$rename -eval.c as lisp.eval.c
$create -gc.c size=20p
$copy >syn6 to -gc.c
%input gc.c
$trunce -gc.c
$rename -gc.c as lisp.gc.c
$create -lisp.c size=20p
$copy >syn6 to -lisp.c
%input lisp.c
$trunce -lisp.c
$rename -lisp.c as lisp.lisp.c
$create -lisp.h size=20p
$copy >syn6 to -lisp.h
%input lisp.h
$trunce -lisp.h
$rename -lisp.h as lisp.lisp.h
$create -map.c size=20p
$copy >syn6 to -map.c
%input map.c
$trunce -map.c
$rename -map.c as lisp.map.c
$create -nsubr.c size=20p
$copy >syn6 to -nsubr.c
%input nsubr.c
$trunce -nsubr.c
$rename -nsubr.c as lisp.nsubr.c
$create -num.c size=20p
$copy >syn6 to -num.c
%input num.c
$trunce -num.c
$rename -num.c as lisp.num.c
$create -prop.c size=20p
$copy >syn6 to -prop.c
%input prop.c
$trunce -prop.c
$rename -prop.c as lisp.prop.c
$create -read.c size=20p
$copy >syn6 to -read.c
%input read.c
$trunce -read.c
$rename -read.c as lisp.read.c
$create -subr.c size=20p
$copy >syn6 to -subr.c
%input subr.c
$trunce -subr.c
$rename -subr.c as lisp.subr.c
$create -util.c size=20p
$copy >syn6 to -util.c
%input util.c
$trunce -util.c
$rename -util.c as lisp.util.c
$run webb:mts par=permit *.c
$permit lisp.h
