FUEL: Bug fix.

db4
Jose A. Ortega Ruiz 2009-01-13 10:29:27 +01:00
parent f920007959
commit 16c067e71a
1 changed files with 1 additions and 1 deletions

View File

@ -95,7 +95,7 @@ PRIVATE>
[ [ see ] with-string-writer \ $code swap 2array ] bi 3array ; inline
: (fuel-word-def) ( name -- str )
fuel-find-word [ [ def>> pprint ] with-string-writer ] when* ; inline
fuel-find-word [ [ def>> pprint ] with-string-writer ] [ f ] if* ; inline
: (fuel-vocab-summary) ( name -- str ) >vocab-link summary ; inline