blob: 4990bb5c2f208d9e699a66d64b078fbfecff77b8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
%D \module
%D [ file=minifun.mp,
%D version=2018.06.02,
%D title=\CONTEXT\ \METAPOST\ graphics,
%D subtitle=format generation file,
%D author=Hans Hagen,
%D date=\currentdate,
%D copyright={PRAGMA / Hans Hagen \& Ton Otten}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
%D This is a minimal \METAFUN\ instance which can be handy for isolated
%D subruns.
def primitive = setproperty 1 : enddef; % not to be used
def permanent = setproperty 2 : enddef;
def immutable = setproperty 3 : enddef;
def frozen = setproperty 4 : enddef; % not yet used
def mutable = setproperty -3 : enddef; % not yet used
permanent permanent, immutable, mutable, primitive, frozen ; % we reserve frozen
newinternal boolean contextlmtxmode ; contextlmtxmode := true ; immutable contextlmtxmode ;
input "mp-base.mpxl" ;
input "mp-tool.mpxl" ;
input "mp-luas.mpxl" ;
input "mp-mlib.mpxl" ;
input "mp-math.mpxl" ;
input "mp-cont.mpxl" ;
input "mp-page.mpxl" ;
newinternal string minifunversion ; minifunversion := "minifun xl " & mfun_timestamp;
let normalend = end ;
def end = ; message "" ; message minifunversion ; message "" ; endinput ; enddef ;
def bye = ; message "" ; message minifunversion ; message "" ; endinput ; enddef ;
|