Merge branch 'master' of git://factorcode.org/git/factor

[factor.git] / extra / db / sql / sql.factor

diff --git a/extra/db/sql/sql.factor b/extra/db/sql/sql.factor
index dc8b5d1fb142577720f6a214a0bd40fbc6ee0fcf..7dd4abf4be718641dbd303196b329c3d7fd099be 100755 (executable)
--- a/extra/db/sql/sql.factor
+++ b/extra/db/sql/sql.factor
@@ -7,12 +7,10 @@ SYMBOLS: insert update delete select distinct columns from as
 where group-by having order-by limit offset is-null desc all
 any count avg table values ;
 
-! Output an s-exp sql statement and an alist of keys/values
-
-: input-spec, 1, ;
-: output-spec, 2, ;
-: input, 3, ;
-: output, 4, ;
+: input-spec, ( obj -- ) 1, ;
+: output-spec, ( obj -- ) 2, ;
+: input, ( obj -- ) 3, ;
+: output, ( obj -- ) 4, ;
 
 DEFER: sql%