[Chicken-hackers] csc -profile has problems

[Jörg F . Wittenberger]

Hi,

csc -profile bails out on some code it otherwise compiles.

So far the smallest example I have is the reference implementation of
srfi-35.  It complains that really-make-condition-type is called with
the wrong number of arguments right here:

(define-condition-type &message &condition
   message-condition?
   (message condition-message))

Another example is in the comparators egg:

(define (binary<? comparator a b)
  ((comparator-ordering-predicate comparator) a b))

(define (binary>? comparator a b)
  (binary<? comparator b a))

Here it claims binary<? being called with the wrong number of arguments.

In srfi-110
  (define (even-and-op-prefix? op lyst)
    (cond
      ((null? lyst) #t)
      ((not (pair? lyst)) #f)
      ((not (equal? op (car lyst))) #f) ; fail - operators not the same
      ((not (pair? (cdr lyst)))  #f) ; Wrong # of parameters or improper
      (else   (even-and-op-prefix? op (cddr lyst)))))

it is even-and-op-prefix? with wrong number of arguments.

Also the ssax code has an name-compare which get flagged that way.


I have no good idea what the reason could be.  All cases I found so far
seem to have one thing in common: the called procedure is very simple
(often it is the constructor from a define-record-type).  Maybe that
hints somewhere.

Cheers

/Jörg