loadGlobal :: Throws (Located GeneratorError) e => Id -> FieldType -> GenerateJvm e ()
loadGlobal name t = do
  prog <- gets programName
  liftG $ do
    J.i0 $ ALOAD_ I0
    J.getField (toBS prog) (NameType (toBS name) t)
loadGlobal :: Throws (Located GeneratorError) e => Id -> FieldType -> GenerateJvm e ()
loadGlobal name t = do
  prog <- gets programName
  liftG $ do
    J.i0 $ ALOAD_ I0
    J.getField (toBS prog) (NameType (toBS name) t)
loadGlobal name t = do
  prog <- gets programName
  liftG $ do
    J.i0 $ ALOAD_ I0
    J.getField (toBS prog) (NameType (toBS name) t)