Source Browser ?

1
if
 
not
 
modules
 
then
 
modules
 
=
 
{
 
}
 
end
 
modules
 
[
'
luat-bwc
'
]
 
=
 
{
2    
version
   
=
 
1
.
001
,
3    
comment
   
=
 
"
companion to luat-lib.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
9
-- backward compatibility
10
11
-- if not tex.wd then
12
--
13
--     local box = tex.box
14
--
15
--     local wd = { } setmetatable(wd, {
16
--         __index    = function(t,k)   local bk = box[k] return bk and bk.width or 0 end,
17
--         __newindex = function(t,k,v) local bk = box[k] if bk then bk.width = v end end,
18
--     } )
19
--
20
--     local ht = { } setmetatable(ht, {
21
--         __index    = function(t,k)   local bk = box[k] return bk and bk.height or 0 end,
22
--         __newindex = function(t,k,v) local bk = box[k] if bk then bk.height = v end end,
23
--     } )
24
--
25
--     local dp = { } setmetatable(dp, {
26
--         __index    = function(t,k)   local bk = box[k] return bk and bk.depth or 0 end,
27
--         __newindex = function(t,k,v) local bk = box[k] if bk then bk.depth = v end end,
28
--     } )
29
--
30
--     tex.wd, tex.ht, tex.dp = wd, ht, dp
31
--
32
-- end
33