From 779e95a934ca1a71d00b415d75b7d57a312aae86 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 17 Sep 2008 01:01:15 -0500 Subject: [PATCH] remove some unused words --- basis/db/types/types.factor | 6 ------ 1 file changed, 6 deletions(-) diff --git a/basis/db/types/types.factor b/basis/db/types/types.factor index 24344acbf7..7397694ba5 100755 --- a/basis/db/types/types.factor +++ b/basis/db/types/types.factor @@ -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 ;