# HG changeset patch
# User Michael Pavone <pavone@retrodev.com>
# Date 1406097192 25200
# Node ID 38ca63e0a62efe3221c35d7b67b42fcc3f253ff1
# Parent  befaefdfcd8aafb89323efb61f4309ea20463272
Added value? and none? methods to option value and option none

diff -r befaefdfcd8a -r 38ca63e0a62e modules/option.tp
--- a/modules/option.tp	Tue Jul 22 23:32:49 2014 -0700
+++ b/modules/option.tp	Tue Jul 22 23:33:12 2014 -0700
@@ -3,6 +3,8 @@
 		value:none <- :ifval :ifnone {
 			ifnone:
 		}
+		value? <- { false }
+		none? <- { true }
 	}
 	#{
 		value <- :v {
@@ -10,8 +12,10 @@
 				value:none <- :ifval :ifnone {
 					ifval: v
 				}
+				value? <- { true }
+				none? <- { false }
 			}
 		}
 		none <- { _none }
 	}
-}
\ No newline at end of file
+}