(;module:
  [lux #- Type Def]
  (lux [host #+ jvm-import]))

## [Host]
(jvm-import org.objectweb.asm.MethodVisitor)

(jvm-import org.objectweb.asm.ClassWriter)

## [Type]
(type: #export Bound
  #Upper
  #Lower)

(type: #export Primitive
  #Boolean
  #Byte
  #Short
  #Int
  #Long
  #Float
  #Double
  #Char)

(type: #export #rec Generic
  (#Var Text)
  (#Wildcard (Maybe [Bound Generic]))
  (#Class Text (List Generic)))

(type: #export #rec Type
  (#Primitive Primitive)
  (#Generic Generic)
  (#Array Type))

(type: #export Method
  {#args (List Type)
   #return (Maybe Type)
   #exceptions (List Generic)})

(type: #export Def
  (-> ClassWriter ClassWriter))

(type: #export Inst
  (-> MethodVisitor MethodVisitor))

(type: #export Visibility
  #Public
  #Protected
  #Private
  #Default)

(type: #export Method-Config
  {#staticM Bool
   #finalM Bool
   #synchronizedM Bool})

(type: #export Field-Config
  {#staticF Bool
   #finalF Bool
   #transientF Bool
   #volatileF Bool})