Error in MySQL module

[Jeff]

In the function fetch-all, the uninitialized symbol 'all continues to collect results after multiple queries, stacking them subsequently.

To fix, change (define (fetch-all) to (define (fetch-all , all):

Code: Select all

(define (fetch-all , all)
  (dotimes (x (num-rows)) (push (fetch-row) all))
  (if all (reverse all) '()))