Add get_Word8 from web arg

totoro
1 parent d88c2b3c
Showing 1 changed file with 16 additions and 0 deletions Show diff stats
web/CXM_web_arg_utils.anubis
@@ -194,3 +194,19 @@ public define Maybe(Word8)
       else
         success(value)
   }.  
+
+public define Word8
+  get_Word8
+  (
+    List(Web_arg) lwa,
+    String        name,
+    Word8         min,
+    Word8         max,
+    Word8         default_value
+  ) =
+  if get_Word8(lwa, name, min, max) is
+  { 
+    failure         then default_value,
+    success(value)  then value
+  }.
+