Error in MySQL module

Started by Jeff, May 09, 2007, 05:56:24 PM

Previous topic - Next topic

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):


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

=====

Old programmers don\'t die. They just parse on...



http://artfulcode.net\">Artful code