Top one works fine
Bottom one breaks my module
Why on earth?

"~/somewhere/line.scm"
 
(define (make-point-list points #!optional (internal-list '()))
  (if (not (null? points))
      (make-point-list (cdr points)
                       (cons (cdr (car points))
                             (cons (car (car points))
                                   internal-list)))
      (reverse internal-list)))



"~/somewhere-else/gladia.scm"


  (define (aux:make-point-list points #!optional (internal-list '()))
    (if (not (null? points))
        (aux-make-point-list (cdr points)
                             (cons (cdr (car points))
                                   (cons (car (car points))
                                         internal-list)))
        (reverse internal-list)))