Mercurial > hg > orthanc
comparison Resources/Toolbox.lua @ 1006:649d47854314 lua-scripting
proper handling of metadata in Store
author | Sebastien Jodogne <s.jodogne@gmail.com> |
---|---|
date | Tue, 08 Jul 2014 15:11:00 +0200 |
parents | b79bf2f4ab2e |
children | 160dfe770618 |
comparison
equal
deleted
inserted
replaced
1005:84b6d7bca6db | 1006:649d47854314 |
---|---|
4 Set indent ("") to prefix each line: Mytable [KEY] [KEY]...[KEY] VALUE | 4 Set indent ("") to prefix each line: Mytable [KEY] [KEY]...[KEY] VALUE |
5 Source: https://gist.github.com/stuby/5445834#file-rprint-lua | 5 Source: https://gist.github.com/stuby/5445834#file-rprint-lua |
6 --]] | 6 --]] |
7 | 7 |
8 function PrintRecursive(s, l, i) -- recursive Print (structure, limit, indent) | 8 function PrintRecursive(s, l, i) -- recursive Print (structure, limit, indent) |
9 l = (l) or 100; i = i or ""; -- default item limit, indent string | 9 l = (l) or 100; -- default item limit |
10 i = i or ""; -- indent string | |
10 if (l<1) then print "ERROR: Item limit reached."; return l-1 end; | 11 if (l<1) then print "ERROR: Item limit reached."; return l-1 end; |
11 local ts = type(s); | 12 local ts = type(s); |
12 if (ts ~= "table") then print (i,ts,s); return l-1 end | 13 if (ts ~= "table") then print (i,ts,s); return l-1 end |
13 print (i,ts); -- print "table" | 14 print (i,ts); -- print "table" |
14 for k,v in pairs(s) do -- print "[KEY] VALUE" | 15 for k,v in pairs(s) do -- print "[KEY] VALUE" |