[wadalabfont-kit] / renderer / load.l  

Annotation of /renderer/load.l

Parent Directory | Revision Log

Revision: 1.1 - (view) (download)

1 : ktanaka 1.1 ;; load.l
2 :     (mapcar '("pack.l"
3 :     "lib.l"
4 :     "yokosort.l"
5 :     "mincho.l"
6 :     "apply.l"
7 :     "sym.l"
8 :     "type1.l"
9 :     "gothic.l"
10 :     "newjoint.l"
11 :     "center.l"
12 :     "limit.l"
13 :     "limitrule.l"
14 :     "unit.l"
15 :     "transform.l"
16 :     "naal.l"
17 :     "hiranew.l"
18 :     "region.l"
19 :     "out2ps.l"
20 :     "outline.l")
21 :     #'(lambda (file) (exfile (string-append base-directory "/" file))))
22 :     (comment
23 :    
24 :     (defun exprint (file)
25 :     (print file terminal-output)
26 :     (exfile file))
27 :    
28 :     (mapcar '("pack.l" "lib.l" "disp.l" "yokosort.l" "mincho.l"
29 :     "sym.l" "type1.l" "gothic.l" "newjoint.l" "center.l"
30 :     "limit.l" "unit.l" "transform.l" "naal.l" "hiranew.l"
31 :     "region.l" "out2ps.l" "outline.l")
32 :     #'(lambda (x) (print x)(exfile x)))
33 :     (comment
34 :     (cond ((definedp 'connect-to-server)
35 :     (code-load '("pack.o" "lib.o" "disp.o" "yokosort.o" "mincho.o"
36 :     "sym.o"
37 :     "type1.o" "gothic.o" "newjoint.o" "center.o"
38 :     "limit.o" "unit.o" "transform.o" "naal.o" "hiranew.o"
39 :     "region.o" "out2ps.o" "outline.o")))
40 :     (t
41 :     (code-load '("window.o" "pack.o" "lib.o" "disp.o" "yokosort.o"
42 :     "sym.o"
43 :     "mincho.o" "type1.o" "gothic.o" "newjoint.o" "center.o"
44 :     "limit.o" "unit.o" "transform.o" "naal.o" "hiranew.o"
45 :     "region.o" "out2ps.o" "outline.o"
46 :     ) "-lX11")))
47 :     )
48 :     (exfile "limitrule.l")
49 :     (exfile "all.l")
50 :     (setq hirawidth 0.6)
51 :     (setq *default-hirawidth* 8)
52 :     (exfile "../primdata/prim-hira.l")
53 :     (exfile "../primdata/prim-kata.l")
54 :     (exfile "../primdata/prim-sym.l")
55 :     (exfile "../primdata/prim-gothic.l")
56 :     (exfile "../primdata/prim-hira-gothic.l")
57 :     (exfile "../primdata/prim-kata-gothic.l")
58 :     (exfile "../jointdata/joint-naal.l")
59 :     (exfile "server.l")
60 :     (exfile "test/jis3ku.l")
61 :     )

ktanaka

Powered by ViewCVS 1.0-dev

ViewCVS and CVS Help