steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix load error

db4
Doug Coleman 2008-02-15 21:14:52 -06:00
parent 863ace7ab3
commit 3a0b0341ba
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/db/tuples/tuples.factor
View File

@ -56,7 +56,7 @@ HOOK: column-slot-name% db ( spec -- )
HOOK: column-bind-name% db ( spec -- ) HOOK: column-bind-name% db ( spec -- )
: make-slots-names ( quot -- seq str ) : make-slots-names ( quot -- seq str )
[ make-column-names ] "" make ; inline [ make-slot-names* ] "" make ; inline
: slot-name% ( seq -- ) first % ; : slot-name% ( seq -- ) first % ;
: column-name% ( seq -- ) second % ; : column-name% ( seq -- ) second % ;
: column-type% ( seq -- ) third % ; : column-type% ( seq -- ) third % ;