2014-03-29から1日間の記事一覧

help-formatter#add-argument! についてなにか書いてみる

比較的よく書けたな〜って思う help-formatter-add-argument! について書いてみる。 (define-method help-formatter-add-argument! ((self <help-formatter>) (action <argument-action>)) (unless (equal? (help-of action) +suppress+) (let* ((get-invocation# (ref self format-action-inv</argument-action></help-formatter>…