[Top][All Lists]

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

bug#21944: Error on ordering of define-record-type and define-public in

From: Koz Ross
Subject: bug#21944: Error on ordering of define-record-type and define-public in a module is unhelpful - possible improvement?
Date: Tue, 17 Nov 2015 21:27:13 +1300

I have the following file, called foo.scm:

(define-module (koz foo)
 #:use-module (srfi srfi-9))

(define-public (make-empty-bar)
  (make-bar #f))

(define-record-type <bar>
  (make-bar open)
  (open bar-open set-bar-open!))

I then also have this script test-foo.scm in the same directory:

#!/usr/bin/guile \
-L .. -s

(use-modules (koz foo))
(define corner-bar (make-empty-bar))
(display corner-bar)

After chmodding and trying to run test-foo.scm (with autocompilation enabled), 
I get a pile of error messages. After some testing, I discovered that if the 
order of definitions in foo.scm is inverted (i.e. the define-record-type comes 
first), this problem does not occur and the script works fine. However, the 
errors received are extremely unhelpful:

In ice-9/boot-9.scm:
 157: 8 [catch #t #<catch-closure 92abc0> ...]
In unknown file:
   ?: 7 [apply-smob/1 #<catch-closure 92abc0>]
In ice-9/boot-9.scm:
  63: 6 [call-with-prompt prompt0 ...]
In ice-9/eval.scm:
 432: 5 [eval # #]
In ice-9/boot-9.scm:
2401: 4 [save-module-excursion #<procedure 947880 at ice-9/boot-9.scm:4045:3 
4052: 3 [#<procedure 947880 at ice-9/boot-9.scm:4045:3 ()>]
In unknown file:
   ?: 2 [load-compiled/vm 
In /home/koz/documents/programming/guile/koz/./foo-test.scm:
   7: 1 [#<procedure d4a200 ()>]
In unknown file:
   ?: 0 [#<syntax-transformer make-empty-bar> #f 6 #f]

ERROR: In procedure #<syntax-transformer make-empty-bar>:
ERROR: Wrong type to apply: #<syntax-transformer make-empty-bar>

Would it be possible for the error message in this case to be a bit more 
helpful? Even better, would it be possible to not make this an issue when 
Koz Ross <address@hidden>
If you aren't using GPG, you should be! https://emailselfdefense.fsf.org/en.
Please don't send me Word or PowerPoint attachments. See 
http://www.gnu.org/philosophy/no-word-attachments.html for why.
Proud member of the Open Wireless Movement. Find out more at 

Attachment: pgp3TczJOT2AH.pgp
Description: PGP signature

reply via email to

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