odbc: replace "1+" with "1 +"

char-rename
Alexander Iljin 2016-10-30 00:05:16 +03:00 committed by John Benediktsson
parent 7269e834e6
commit 2fd480c17f
1 changed files with 1 additions and 1 deletions

View File

@ -249,7 +249,7 @@ C: <field> field
: odbc-get-row-fields ( statement -- seq ) : odbc-get-row-fields ( statement -- seq )
[ [
dup odbc-number-of-columns [ dup odbc-number-of-columns [
1+ odbc-get-field value>> , 1 + odbc-get-field value>> ,
] with each ] with each
] { } make ; ] { } make ;