#! lua
-- run by weave-all
local indir = arg[1]
local dir in riscos
local pat = "/wve$"
local wve = { }
for leaf, ftype in dir (indir) do
   if leaf:match (pat) and ftype == 0xfff then
      wve[1 + #wve] = leaf
   end -- if
end -- for
local execute in os
local cmdfmt = "do weave %s.%%s"
local cmd = cmdfmt:format (indir)
print (indir)
print "------["
for _, file in ipairs (wve) do
  execute (cmd:format (file))
end -- for
print "------]"