remove some unused words
parent
f7c175a985
commit
779e95a934
|
@ -113,12 +113,6 @@ ERROR: no-sql-type ;
|
|||
(lookup-type) second
|
||||
] if ;
|
||||
|
||||
: paren ( string -- new-string )
|
||||
"(" swap ")" 3append ;
|
||||
|
||||
: join-space ( string1 string2 -- new-string )
|
||||
" " swap 3append ;
|
||||
|
||||
: modifiers ( spec -- string )
|
||||
modifiers>> [ lookup-modifier ] map " " join
|
||||
[ "" ] [ " " prepend ] if-empty ;
|
||||
|
|
Loading…
Reference in New Issue