include LIBRARY: in FUNCTION: synopsis

2009-09-20 23:59:43 -05:00 · 2009-09-20 23:59:43 -05:00 · b09006bba9
parent 08d9d0ad28
commit b09006bba9
1 changed files with 2 additions and 0 deletions
--- a/basis/alien/prettyprint/prettyprint.factor
+++ b/basis/alien/prettyprint/prettyprint.factor
@ -51,8 +51,10 @@ M: alien-function-word definition drop f ;
 M: alien-function-word synopsis*
    {
        [ seeing-word ]
+        [ def>> second [ \ LIBRARY: [ text ] pprint-prefix ] when* ]
        [ definer. ]
        [ def>> first pprint-c-type ]
        [ pprint-word ]
        [ <block "(" text pprint-function-args ")" text block> ]
    } cleave ;
+