diff options
author | Norbert Preining <norbert@preining.info> | 2019-12-05 03:00:50 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-12-05 03:00:50 +0000 |
commit | 2905ee4c8de47cfdeea4787e465eb827f9b99e8b (patch) | |
tree | 802c26d7002fd7e2188412b5bd1f86cd9ee2c4d6 /macros/luatex/generic/barracuda/test/test-code39/004-code39-test.tex | |
parent | 05ad7831f64aa0e2fc9eac63816eeafcb0b09708 (diff) |
CTAN sync 201912050300
Diffstat (limited to 'macros/luatex/generic/barracuda/test/test-code39/004-code39-test.tex')
-rw-r--r-- | macros/luatex/generic/barracuda/test/test-code39/004-code39-test.tex | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/macros/luatex/generic/barracuda/test/test-code39/004-code39-test.tex b/macros/luatex/generic/barracuda/test/test-code39/004-code39-test.tex new file mode 100644 index 0000000000..559dc94383 --- /dev/null +++ b/macros/luatex/generic/barracuda/test/test-code39/004-code39-test.tex @@ -0,0 +1,46 @@ +% !TeX program = LuaTeX +% Copyright (C) 2019 Roberto Giacomelli + +\newbox\mybox +\nopagenumbers + +Test 4: check uint costructor: + +\directlua{ +barracuda = require "barracuda" +local c39, err = barracuda:get_barcode_class() + :new_encoder("code39") +assert(not err, err) +local err +local symbol +symbol, err = c39:from_uint(0, {text_hpos="center"}) +assert(not err, err) + +local canvas = barracuda:new_canvas() +symbol:append_ga(canvas) + +local drv = barracuda:get_driver() +drv:ga_to_hbox(canvas, "mybox") +} +\box\mybox + +\directlua{ +local c39, err = barracuda:get_barcode_class() + :enc_by_name("code39") +assert(c39, err) +local e +local symbol +symbol, e = c39:from_uint(0123456789, {text_hpos="spaced",text_star=true}) +assert(not e, e) + +local canvas = barracuda:new_canvas() +symbol:append_ga(canvas) + +local drv = barracuda:get_driver() +drv:ga_to_hbox(canvas, "mybox") +} +\box\mybox + +\bye + + |