[wadalabfont-kit] / lisp / tools / makedump |
Revision: 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 |
ktanaka Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |