fcore/game-update.sml

structure GameUpdate =
struct
  open GameType

  fun update (game: GameType.game_type, input) =
    let
      val {mode, userKeys} = game
    in
      case mode of
        LEVEL level => LevelUpdate.update (level, input, userKeys)
      | TITLE title => TitleUpdate.update (title, input, userKeys)
    end
end
done adding LevelType.level_type as a field of GameType.game_type, and having main loop go through GameUpdate.game_type -> LevelUpdate.update 2025-02-18 13:48:17 +00:00			`structure GameUpdate =`
			`struct`
			`open GameType`

			`fun update (game: GameType.game_type, input) =`
			`let`
			`val {mode, userKeys} = game`
			`in`
when play button is focused on title screen and either attack or jump button is pressed, start level 2025-02-20 05:46:00 +00:00			`case mode of`
			`LEVEL level => LevelUpdate.update (level, input, userKeys)`
			`\| TITLE title => TitleUpdate.update (title, input, userKeys)`
done adding LevelType.level_type as a field of GameType.game_type, and having main loop go through GameUpdate.game_type -> LevelUpdate.update 2025-02-18 13:48:17 +00:00			`end`
			`end`