summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/luatex/barracuda/test/test-code39/001-code39-test.lua
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-12-05 21:23:07 +0000
committerKarl Berry <karl@freefriends.org>2019-12-05 21:23:07 +0000
commit0ed7b2cd92f7a81334f612df3e37211f8333ae75 (patch)
tree2bcbe01d8e86cbf57d64069a153346da4936b00a /Master/texmf-dist/doc/luatex/barracuda/test/test-code39/001-code39-test.lua
parent7f43f3692e1354166c0623faf83c84b23d041ea3 (diff)
barracuda (5dec19)
git-svn-id: svn://tug.org/texlive/trunk@53034 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/luatex/barracuda/test/test-code39/001-code39-test.lua')
-rw-r--r--Master/texmf-dist/doc/luatex/barracuda/test/test-code39/001-code39-test.lua41
1 files changed, 41 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/luatex/barracuda/test/test-code39/001-code39-test.lua b/Master/texmf-dist/doc/luatex/barracuda/test/test-code39/001-code39-test.lua
new file mode 100644
index 00000000000..e4a8569e938
--- /dev/null
+++ b/Master/texmf-dist/doc/luatex/barracuda/test/test-code39/001-code39-test.lua
@@ -0,0 +1,41 @@
+-- Copyright (C) 2019 Roberto Giacomelli
+-- test Code 39 encoder
+
+local barracuda = require "barracuda"
+
+for k, v in pairs(barracuda) do
+ print(k,v)
+end
+
+local barcode = barracuda:get_barcode_class()
+
+local c39, err = barcode:new_encoder("code39")
+assert(not err, err)
+
+print(c39._NAME)
+print(c39._VERSION)
+
+local info = c39:info()
+
+print("encoder name = ", info.name)
+print("description = ", info.description)
+
+for k, tp in ipairs(info.param) do
+ print(k, tp.name, tp.value)
+end
+
+local symb = c39:from_string("123")
+
+print("print internal representation of chars")
+for _, c in ipairs(symb.code) do
+ print(c)
+end
+print()
+
+local canvas = barracuda:new_canvas()
+symb:append_ga(canvas)
+
+-- native driver
+local drv = barracuda:get_driver()
+
+for _, code in ipairs(canvas._data) do print(code) end