(defun match-option (arg options)
"Matches an argument to an option. Returns option-list,option-type,base-name,argument"
(multiple-value-bind (option-type base-name argument) (analyze-arg arg)
(defun match-option (arg options)
"Matches an argument to an option. Returns option-list,option-type,base-name,argument"
(multiple-value-bind (option-type base-name argument) (analyze-arg arg)