moduleObject :: (MonadBaseControl IO m, IsBackendVoid b ~ False)
                => ModuleBuilder -> L b m ByteString
moduleObject builder =
  do tm <- getTargetMachine
     withModule builder $
       liftBase . errorToIO 'LL.moduleObject . LL.moduleObject tm
moduleObject :: (MonadBaseControl IO m, IsBackendVoid b ~ False)
                => ModuleBuilder -> L b m ByteString
moduleObject builder =
  do tm <- getTargetMachine
     withModule builder $
       liftBase . errorToIO 'LL.moduleObject . LL.moduleObject tm
moduleObject builder =
  do tm <- getTargetMachine
     withModule builder $
       liftBase . errorToIO 'LL.moduleObject . LL.moduleObject tm