diff options
| author | Hans Hagen <pragma@wxs.nl> | 2021-06-30 19:41:44 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2021-06-30 19:41:44 +0200 |
| commit | af3da9d9f5ae4c2320d042080b4ff9d7d3460314 (patch) | |
| tree | 9ee7cc754f5296994bcbb14f8af6fe063569f03c /metapost | |
| parent | ed04388261fdd19e6cc5661225439df6e042bf41 (diff) | |
| download | context-af3da9d9f5ae4c2320d042080b4ff9d7d3460314.tar.gz | |
2021-06-30 19:20:00
Diffstat (limited to 'metapost')
| -rw-r--r-- | metapost/context/base/mpxl/mp-luas.mpxl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/metapost/context/base/mpxl/mp-luas.mpxl b/metapost/context/base/mpxl/mp-luas.mpxl index 69474b354..d9686eadf 100644 --- a/metapost/context/base/mpxl/mp-luas.mpxl +++ b/metapost/context/base/mpxl/mp-luas.mpxl @@ -276,13 +276,15 @@ permanent getparameters, presetparameters, hasparameter, hasoption, getparameter applyparameters, pushparameters, popparameters ; newscriptindex mfun_newrecord ; mfun_newrecord := scriptindex "newrecord" ; +newscriptindex mfun_setrecord ; mfun_setrecord := scriptindex "setrecord" ; newscriptindex mfun_getrecord ; mfun_getrecord := scriptindex "getrecord" ; def newrecord = runscript mfun_newrecord ; enddef ; % semicolon prevents lookahead +def setrecord = runscript mfun_setrecord ; enddef ; def getrecord = runscript mfun_getrecord enddef ; permanent - newrecord, getrecord ; + newrecord, setrecord, getrecord ; % No vardef's because we need to scan for an assignment too and we'll see % an endgroup otherwise. |