diff options
author | Marius <mariausol@gmail.com> | 2011-04-20 00:00:12 +0300 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2011-04-20 00:00:12 +0300 |
commit | 9a911f4fe29fcd7b02102d54ba0e938b40635e59 (patch) | |
tree | 9012560bcba898cb1188afdbefbf1f8ce6ad7a5e /tex/context/base/l-io.lua | |
parent | 865b5da32dfab508db87744c7542a59c192dd459 (diff) | |
download | context-9a911f4fe29fcd7b02102d54ba0e938b40635e59.tar.gz |
beta 2011.04.19 22:49
Diffstat (limited to 'tex/context/base/l-io.lua')
-rw-r--r-- | tex/context/base/l-io.lua | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tex/context/base/l-io.lua b/tex/context/base/l-io.lua index 88816648d..290dcec42 100644 --- a/tex/context/base/l-io.lua +++ b/tex/context/base/l-io.lua @@ -215,6 +215,12 @@ local function readnumber(f,n,m) elseif n == 12 then local a, b, c = readnumber(f,4), readnumber(f,4), readnumber(f,4) return 256*256 * a + 256 * b + c + elseif n == -2 then + local b, a = byte(f:read(2),1,2) + return 256*a + b + elseif n == -4 then + local d, c, b, a = byte(f:read(4),1,4) + return 256*256*256 * a + 256*256 * b + 256*c + d else return 0 end |