dir /w/web2c
dir /w/web2c/lib
dir /w/kpathsea

define bibredo
file bibtex
end
define dvicredo
file dvicopy
end
define dvitredo
file dvitype
end
define mfredo
file mf
end
define mpredo
file mp
end
define mftredo
file mft
end
define tanglebootredo
file tangleboot
end
define tangleredo
file tangle
end
define texredo
file tex
end
define vfredo
file vftovp
end

define redo
texredo
end

# bibtex:
#set args check/xampl
#set args check/allbib

# dvicopy:
#set args check/story check/xstory.dvi
#set args --mag=2000 <check/pplr.dvi >check/xpplr.dvi

# dvitype:
#set args check/story >check/story.typ
#set args --p=\*.\*.2 check/pagenum.dvi >check/xpagenum.typ
#set args ../dvitest/nonexist >check/xnonexist.typ

# gftodvi:
#set args -v check/cmr10.600gf

# gftype:
#set args check/cmr10.600gf >check/xcmr10.600type

# mf:
#set args '\mode:=cx; input logo10'
#set args check/online
#set args <triptrap/mftrap1.in

# mft:
#set args check/io

# mp:
#set args <triptrap/mptrap2.in
#set args check/one.two

# patgen:
set args tests/dict tests/patterns tests/xout tests/translate

# tangle:
#set args `pwd`/tangle.web `pwd`/tangle.ch

# tex:
#set args check/end \\bye
#set args --ini plain \\dump
#set args '&./plain \tracingstats=1 \input story \bye'
#set args check/magic
#set args '\font\foo=nonesuch\relax'
#set args --translate-file=share/isol1-t1.tcx check/eight
#set args <triptrap/trip1.in
#set args --shell check/write18
#set args --mltex \\charsubdef=1 2 \\end
#set args --output-comment="`cat PROJECTS`" check/hello 2>/dev/null
#set args \\font\\x=empty\\x\\bye
#set args check/longtfm

# vftovp:
#set args check/ptmr check/ptmr check/xptmr

#define poolstr
#print strpool[strstart[$arg0]] @ strstart[$arg0+1]-strstart[$arg0]
#end
