Permalink
Fetching contributors…
Cannot retrieve contributors at this time
executable file 37 lines (31 sloc) 728 Bytes
#! /usr/bin/lua
--
-- lua-Coat : <http://fperrad.github.io/lua-Coat/>
--
if #arg == 0 then
print 'Usage: coat2dot [--no-attr] [--no-meth] [--no-meta] [--note="message"] module1 [module2, ...]'
os.exit(0)
end
local m = require 'Coat.UML'
local opt = {}
for i = 1, #arg do
local v = arg[i]
if v:sub(1,2) == '--' then
local k = v:sub(3):gsub('-','_')
local idx = k:find '='
if idx then
opt[k:sub(1, idx-1)] = k:sub(idx+1)
else
opt[k] = true
end
else
require(v)
end
end
print(m.to_dot(opt))
--
-- Copyright (c) 2009-2010 Francois Perrad
--
-- This program is licensed under the terms of the MIT/X11 license,
-- like Lua itself.
--