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

fix inheritance

db4
Doug Coleman 2008-05-30 18:37:34 -05:00
parent 1c13b4164c
commit b173097418
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

@ -77,7 +77,7 @@ M: retryable execute-statement* ( statement type -- )
] curry 10 retry drop ; ] curry 10 retry drop ;
: resulting-tuple ( row out-params -- tuple ) : resulting-tuple ( row out-params -- tuple )
dup first class>> new [ dup peek class>> new [
[ [
>r slot-name>> r> set-slot-named >r slot-name>> r> set-slot-named
] curry 2each ] curry 2each