anchor.diff:      :type pointer)
      (default-value
       :allocation :alien
  -    :reader param-flags-default-value
  +    :reader param-default-value
       :type long))
     (:metaclass param-spec-class)
     (:gtype "GParamFlags"))
  
positive.code: (defclass param-double-float (param)
    ((minimum
      :allocation :alien
      :reader param-double-float-minimum
      :type double-float)
     (maximum
      :allocation :alien
      :reader param-double-float-maximum
      :type double-float)
     (default-value
      :allocation :alien
      :reader param-double-float-default-value
      :type double-float)
     (epsilon
      :allocation :alien
      :reader param-double-float-epsilon
      :type double-float))
    (:metaclass param-spec-class)
    (:gtype "GParamDouble"))
  
negative.code:   
  (defbinding %param-spec-unref () nil
    (location pointer))
  
  
  ;; TODO: rename to param-spec
  