Mercurial > repos > tabletprog
comparison modules/option.tp @ 290:38ca63e0a62e
Added value? and none? methods to option value and option none
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Tue, 22 Jul 2014 23:33:12 -0700 |
parents | d83647152485 |
children | 1458c069c715 |
comparison
equal
deleted
inserted
replaced
289:befaefdfcd8a | 290:38ca63e0a62e |
---|---|
1 { | 1 { |
2 _none <- #{ | 2 _none <- #{ |
3 value:none <- :ifval :ifnone { | 3 value:none <- :ifval :ifnone { |
4 ifnone: | 4 ifnone: |
5 } | 5 } |
6 value? <- { false } | |
7 none? <- { true } | |
6 } | 8 } |
7 #{ | 9 #{ |
8 value <- :v { | 10 value <- :v { |
9 #{ | 11 #{ |
10 value:none <- :ifval :ifnone { | 12 value:none <- :ifval :ifnone { |
11 ifval: v | 13 ifval: v |
12 } | 14 } |
15 value? <- { true } | |
16 none? <- { false } | |
13 } | 17 } |
14 } | 18 } |
15 none <- { _none } | 19 none <- { _none } |
16 } | 20 } |
17 } | 21 } |