clua-0.1: clua.hs

import CAnalyze  -- wrappers around Language.C analysis
import PrintLua
import System

usage me =
  putStrLn $ "usage: " ++ me ++ " <c-file>"


main = do
  args <- getArgs
  me <- getProgName
  case args of
    -- [file] -> report (aKeys packedStructs) file
    [file] -> packedLua file
    _ -> usage me