diff --git a/unmaintained/odbc/odbc.factor b/unmaintained/odbc/odbc.factor index f108166faa..2bf7413cc5 100644 --- a/unmaintained/odbc/odbc.factor +++ b/unmaintained/odbc/odbc.factor @@ -249,7 +249,7 @@ C: field : odbc-get-row-fields ( statement -- seq ) [ dup odbc-number-of-columns [ - 1+ odbc-get-field value>> , + 1 + odbc-get-field value>> , ] with each ] { } make ;