1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18boolean contextlmtxmode ; contextlmtxmode : = if known fontmaking : false else : true fi ;
19
20prologues : = 0 ;
21mpprocset : = 1 ;
22
23input " mp-base.mpiv " ;
24input " mp-tool.mpiv " ;
25input " mp-mlib.mpiv " ;
26input " mp-luas.mpiv " ;
27input " mp-cont.mpiv " ;
28input " mp-page.mpiv " ;
29input " mp-butt.mpiv " ;
30input " mp-shap.mpiv " ;
31input " mp-grph.mpiv " ;
32input " mp-grid.mpiv " ;
33input " mp-form.mpiv " ;
34input " mp-figs.mpiv " ;
35input " mp-func.mpiv " ;
36input " mp-node.mpiv " ;
37input " mp-apos.mpiv " ;
38input " mp-abck.mpiv " ;
39input " mp-blob.mpiv " ;
40
41string metafunversion ; metafunversion = " metafun iv " & mfun_timestamp ;
42
43let normalend = end ;
44
45if known mplib :
46 def end = ; message " " ; message metafunversion ; message " " ; endinput ; enddef ;
47 def bye = ; message " " ; message metafunversion ; message " " ; endinput ; enddef ;
48else :
49 def end = ; message " " ; message metafunversion ; message " " ; normalend ; enddef ;
50fi ;
51 |