   (str value))
 
 (defn define-integer [name default help & args]
+  "Registers a flag whose value must be an integer."
   (apply define integer-parser name default (or help "an integer value")
          :serializer integer-serializer
          args))

(defn enum-serializer [value]
  (str value))

(defn define-enum [name default enum-values help & args]
  (apply define enum-parser name default  (or help "an enum value")
         :serializer enum-serializer
         :enum-values enum-values

(defn float-serializer [value]
  (str value))

(defn define-float
  "Registers a flag whose value must be a float."
  [name default help & args]
  (apply define float-parser name default (or help "a float value")
         :serializer float-serializer
         args))
