
----------------------------------------------------------------------------dataAction=FetchGitHub
| SetGitHub (ResponseGitHub)
| ErrorHandler (ResponseMisoString)
----------------------------------------------------------------------------app::AppModelAction
app = component emptyModel updateModel viewModel
----------------------------------------------------------------------------updateModel::Action->EffectROOTModelAction
updateModel =\caseFetchGitHub->
getJSON "https://api.github.com"[]SetGitHubErrorHandlerSetGitHubResponse {..} ->
info ?= body
ErrorHandlerResponse {..} ->
io_ (consoleError body)
----------------------------------------------------------------------------Install Nix Flakes, then:
nix develop .#wasm
make
make serve