Mercurial > repos > tabletprog
view modules/option.tp @ 376:d61b1f0e1936
Some minor WIP stuff in UI module
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 15 Aug 2015 22:45:24 -0700 |
parents | fd4e0bf5bd9f |
children |
line wrap: on
line source
{ _none <- #{ value:none <- :ifval :ifnone { ifnone: } value <- :ifval { self } value? <- { false } none? <- { true } } #{ value <- :v { #{ value:none <- :ifval :ifnone { ifval: v } value <- :ifval { option value: (ifval: v) } value? <- { true } none? <- { false } } } none <- { _none } } }