include LIBRARY: in FUNCTION: synopsis

2009-09-20 23:59:43 -05:00 · 2009-09-20 23:59:43 -05:00 · 5a11beed81
parent 0688f4ba68
commit 5a11beed81
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 ;
+