guile-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Debugging with PSD


From: Thomas Wawrzinek
Subject: Debugging with PSD
Date: Wed, 27 Jun 2001 14:50:38 +0200 (MEST)

Hi!

I just played around a bit more with PSD, and instantly ran into trouble.

For forms like 

(define (func a b)
  (define tmp (+ a b))
  ((lambda (tjw)
     (+ tjw 1))
   tmp))

I get a 

Wrong number of arguments to #<procedure (tjw)>
ABORT: (wrong-number-of-args)

error.

Applying the "patch" below does help in this case.

But since the `frame' parameter is no longer used, this is certainly not the
right thing. I've informed Pertti Kellom\"aki about it, but I think it means
using PSD with guile is likely calling for trouble :-(

Regards,

                Thomas

-- primitives.scm      Sat Nov 11 19:27:08 2000
+++ primitives.scm.new  Wed Jun 27 14:36:59 2001
@@ -885,9 +885,10 @@
                     ;; argument. Otherwise just apply the procedure.
                     (if (member (car combination)
                                 *psd-instrumented-procedures*)
-                      (apply (car combination)
-                             (cons frame
-                                   (cdr combination)))
+                       ;(apply (car combination)
+                       ;      (cons frame
+                       ;           (cdr combination)))
+                       (apply (car combination) (cdr combination))
                       (apply (car combination) (cdr combination)))
 
                     ;; This is not a procedure at all!



reply via email to

[Prev in Thread] Current Thread [Next in Thread]