1if not modules then modules = { } end modules ['mlib-snc'] = {
2 version = 1.001,
3 comment = "companion to anch-snc.mkiv",
4 author = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
5 copyright = "PRAGMA ADE / ConTeXt Development Team",
6 license = "see context related readme files"
7}
8
9local scanners = mp.scan
10local scaninteger = scanners.integer
11local scanstring = scanners.string
12local factor = number.dimenfactors.bp
13local synchronizers = graphics.synchronizers
14local registerdirect = metapost.registerdirect
15
16
17
18registerdirect("asnc_collect", function()
19 return synchronizers.collect(scaninteger(),scaninteger(),scanstring())
20end)
21
22registerdirect("asnc_extend", synchronizers.extend )
23registerdirect("asnc_prune", synchronizers.prune )
24registerdirect("asnc_collapse", synchronizers.collapse)
25registerdirect("asnc_getsize", synchronizers.getsize )
26
27registerdirect("asnc_gettop", function() return synchronizers.gettop (scaninteger()) * factor end)
28registerdirect("asnc_getbottom",function() return synchronizers.getbottom(scaninteger()) * factor end)
29registerdirect("asnc_getkind", function() return synchronizers.getkind (scaninteger()) end)
30registerdirect("asnc_gettask", function() return synchronizers.gettask (scaninteger()) end)
31
32registerdirect("asnc_getx", function() return synchronizers.getx() * factor end)
33registerdirect("asnc_gety", function() return synchronizers.gety() * factor end)
34registerdirect("asnc_getw", function() return synchronizers.getw() * factor end)
35registerdirect("asnc_geth", function() return synchronizers.geth() * factor end)
36registerdirect("asnc_getd", function() return synchronizers.getd() * factor end)
37 |