[wadalabfont-kit] / lisp / tools / makedump

Annotation of /lisp/tools/makedump

Revision: 1.1.1.1 - (view) (download)

1 :	ktanaka	1.1	#!/bin/sh
2 :			#set -x
3 :
4 :			utilisp -h 6000 << EOF
5 :			(progn
6 :			(cond ((null (exfile "../skelton-edit.l"))
7 :			(cond ((null (gc))
8 :			(dumpfile "../skelton-edit.dump")
9 :			(princ "all done"))
10 :			(t (princ "gc error")))))
11 :			(terpri)
12 :			(quit))
13 :			(quit)
14 :			EOF
15 :			rm ./COMPFILE
16 :			echo all done