module Ribosome.Menu.Data.MenuConsumer where import Ribosome.Menu.Data.Menu (Menu) import Ribosome.Menu.Data.MenuAction (MenuAction) import Ribosome.Menu.Data.MenuUpdate (MenuUpdate) newtype MenuConsumer m a i = MenuConsumer { MenuConsumer m a i -> MenuUpdate m a i -> m (MenuAction m a, Menu i) unMenuConsumer :: MenuUpdate m a i -> m (MenuAction m a, Menu i) }