火焰是一个快速&简单的框架灵感来自榆树架构,用于在pureescript中构建Web应用程序
模块柜台.Main进口前列导入效果(效果)导入火焰(HTML,QuerySelector(..),订阅) - 副作用免费更新;请参阅Docs for其他示例导入flame.application.noeffects作为fan导入flame.html.eLement当他导入flame.html.attribute作为ha - |该模型表示应用类型模型= int - |数据类型用于表示事件数据消息=递增|减少 - | App Init :: ModelInit = 0 - |初始状态“更新”以处理事件更新:: Model - >消息 - > ModelUpdate模型= ucument _>型号+ 1减少 - >模型 - 1 - |何时更新模型查看::型号 - > HTML MessageView Model = He.Main"主要" [他.Button [Ha.Onclick递减]" - ",他.Text $ Show Models,He.Button [Ha.Onclick递增]" +"] - |来自`查看'订阅:: array(订阅消息)subscribe = [] - |将应用程序安装在给定的选择器主::效果unitmain = fan.mount_(queryselector" body"){init,查看,更新,订阅}
如果这个项目对您有用,请考虑抛出降压以保持开发