[Chicken-users] Re: obscure error message after refactoring

2011-01-21 Thread Alan Post
On Thu, Jan 20, 2011 at 01:59:34PM -0700, Alan Post wrote:
> On Thu, Jan 20, 2011 at 12:20:29PM -0700, Alan Post wrote:
> > On Thu, Jan 20, 2011 at 08:46:16AM -0700, Alan Post wrote:
> > > On Thu, Jan 20, 2011 at 06:58:27AM -0700, Alan Post wrote:
> > > > I've been refactoring the interface between 3 of the subsystems in
> > > > my egg, genturfa'i.  I've made a ton of changes to the code, and
> > > > am at the point where I'm ready to compile everything and figure
> > > > out what is broken.  I run chicken-install -s, and as it tries
> > > > to compile my library, gives me the following error:
> > > > 
> > > >   Error: (caddr) bad argument type: *
> > > > 
> > > >   Call history:
> > > > 
> > > > (##core#begin (define 
> > > > genturfahi-version-major 0) (define genturfahi-version-minor 0) (define 
> > > > gentur..
> > > > (define genturfahi-version-major 0)
> > > > (##core#set! genturfahi-version-major 0)
> > > > (define genturfahi-version-minor 0)
> > > > (##core#set! genturfahi-version-minor 0)
> > > > (define genturfahi-version-patch 1)
> > > > (##core#set! genturfahi-version-patch 1)
> > > > (define genturfahi-version "trunk")
> > > > (##core#set! genturfahi-version "trunk")
> > > > (##core#undefined)<--
> > > > 
> > > >   Error: shell command terminated with non-zero exit status 17920:
> > > >   /opt/chicken-master/bin/chicken chicken-ext.scm -output-file
> > > >   genturfahi.c -dynamic -feature chicken-compile-shared -feature
> > > >   compiling-extension -setup-mode -debug-level 2 -emit-import-library
> > > >   genturfahi
> > > > 
> > > > I don't have an explicit call to caddr anywhere in my code, and I
> > > > believe the following line:
> > > > 
> > > > (##core#set! genturfahi-version "trunk")
> > > > 
> > > > Refers to the last line in the last file of my library.
> > > > 
> > > > I've been looking over diffs trying to see if I've introduced a
> > > > subtle scope or syntax error somewhere, but I'm not having much
> > > > luck.
> > > > 
> > > > What do I do with an error message like the one above?  It isn't
> > > > obvious to me where I need to look to fix the problem.
> > > 
> > > I've narrowed this down to any of the four uses of |match| I now
> > > have in my code.  I don't understand yet why it is giving me this
> > > error message, but debugging one pattern in four functions feels
> > > less burdensome that looking for a misplaced token somewhere in the
> > > library.
> > > 
> > 
> > I've attached a testing egg that demonstrates what is going on.  I
> > can't quite tell what I'm doing wrong: the code works in csi, but
> > when I run chicken-install I get an error message.
> > 
> > Am I using match incorrectly?
> > 
> 
> With the help of C-Keen on IRC, we've narrowed down this problem to
> an interaction between -scrutinize and the match macro.  I've filed
> a ticket:
> 
>   https://bugs.call-cc.org/ticket/484
> 
> I just pulled down and updated experimental, so this problem wasn't
> fixed by the recent changes to the scrutinizer.
> 

That was fast as a very fast thing.  This works after you fix,
Felix.  Thank you!

-Alan
-- 
.i ko djuno fi le do sevzi

___
Chicken-users mailing list
Chicken-users@nongnu.org
http://lists.nongnu.org/mailman/listinfo/chicken-users


[Chicken-users] Re: obscure error message after refactoring

2011-01-20 Thread Alan Post
On Thu, Jan 20, 2011 at 12:20:29PM -0700, Alan Post wrote:
> On Thu, Jan 20, 2011 at 08:46:16AM -0700, Alan Post wrote:
> > On Thu, Jan 20, 2011 at 06:58:27AM -0700, Alan Post wrote:
> > > I've been refactoring the interface between 3 of the subsystems in
> > > my egg, genturfa'i.  I've made a ton of changes to the code, and
> > > am at the point where I'm ready to compile everything and figure
> > > out what is broken.  I run chicken-install -s, and as it tries
> > > to compile my library, gives me the following error:
> > > 
> > >   Error: (caddr) bad argument type: *
> > > 
> > >   Call history:
> > > 
> > > (##core#begin (define 
> > > genturfahi-version-major 0) (define genturfahi-version-minor 0) (define 
> > > gentur..
> > > (define genturfahi-version-major 0)
> > > (##core#set! genturfahi-version-major 0)
> > > (define genturfahi-version-minor 0)
> > > (##core#set! genturfahi-version-minor 0)
> > > (define genturfahi-version-patch 1)
> > > (##core#set! genturfahi-version-patch 1)
> > > (define genturfahi-version "trunk")
> > > (##core#set! genturfahi-version "trunk")
> > > (##core#undefined)<--
> > > 
> > >   Error: shell command terminated with non-zero exit status 17920:
> > >   /opt/chicken-master/bin/chicken chicken-ext.scm -output-file
> > >   genturfahi.c -dynamic -feature chicken-compile-shared -feature
> > >   compiling-extension -setup-mode -debug-level 2 -emit-import-library
> > >   genturfahi
> > > 
> > > I don't have an explicit call to caddr anywhere in my code, and I
> > > believe the following line:
> > > 
> > > (##core#set! genturfahi-version "trunk")
> > > 
> > > Refers to the last line in the last file of my library.
> > > 
> > > I've been looking over diffs trying to see if I've introduced a
> > > subtle scope or syntax error somewhere, but I'm not having much
> > > luck.
> > > 
> > > What do I do with an error message like the one above?  It isn't
> > > obvious to me where I need to look to fix the problem.
> > 
> > I've narrowed this down to any of the four uses of |match| I now
> > have in my code.  I don't understand yet why it is giving me this
> > error message, but debugging one pattern in four functions feels
> > less burdensome that looking for a misplaced token somewhere in the
> > library.
> > 
> 
> I've attached a testing egg that demonstrates what is going on.  I
> can't quite tell what I'm doing wrong: the code works in csi, but
> when I run chicken-install I get an error message.
> 
> Am I using match incorrectly?
> 

With the help of C-Keen on IRC, we've narrowed down this problem to
an interaction between -scrutinize and the match macro.  I've filed
a ticket:

  https://bugs.call-cc.org/ticket/484

I just pulled down and updated experimental, so this problem wasn't
fixed by the recent changes to the scrutinizer.

-Alan
-- 
.i ko djuno fi le do sevzi

___
Chicken-users mailing list
Chicken-users@nongnu.org
http://lists.nongnu.org/mailman/listinfo/chicken-users


[Chicken-users] Re: obscure error message after refactoring

2011-01-20 Thread Alan Post
On Thu, Jan 20, 2011 at 08:46:16AM -0700, Alan Post wrote:
> On Thu, Jan 20, 2011 at 06:58:27AM -0700, Alan Post wrote:
> > I've been refactoring the interface between 3 of the subsystems in
> > my egg, genturfa'i.  I've made a ton of changes to the code, and
> > am at the point where I'm ready to compile everything and figure
> > out what is broken.  I run chicken-install -s, and as it tries
> > to compile my library, gives me the following error:
> > 
> >   Error: (caddr) bad argument type: *
> > 
> >   Call history:
> > 
> > (##core#begin (define genturfahi-version-major 
> > 0) (define genturfahi-version-minor 0) (define gentur..
> > (define genturfahi-version-major 0)
> > (##core#set! genturfahi-version-major 0)
> > (define genturfahi-version-minor 0)
> > (##core#set! genturfahi-version-minor 0)
> > (define genturfahi-version-patch 1)
> > (##core#set! genturfahi-version-patch 1)
> > (define genturfahi-version "trunk")
> > (##core#set! genturfahi-version "trunk")
> > (##core#undefined)<--
> > 
> >   Error: shell command terminated with non-zero exit status 17920:
> >   /opt/chicken-master/bin/chicken chicken-ext.scm -output-file
> >   genturfahi.c -dynamic -feature chicken-compile-shared -feature
> >   compiling-extension -setup-mode -debug-level 2 -emit-import-library
> >   genturfahi
> > 
> > I don't have an explicit call to caddr anywhere in my code, and I
> > believe the following line:
> > 
> > (##core#set! genturfahi-version "trunk")
> > 
> > Refers to the last line in the last file of my library.
> > 
> > I've been looking over diffs trying to see if I've introduced a
> > subtle scope or syntax error somewhere, but I'm not having much
> > luck.
> > 
> > What do I do with an error message like the one above?  It isn't
> > obvious to me where I need to look to fix the problem.
> 
> I've narrowed this down to any of the four uses of |match| I now
> have in my code.  I don't understand yet why it is giving me this
> error message, but debugging one pattern in four functions feels
> less burdensome that looking for a misplaced token somewhere in the
> library.
> 

I've attached a testing egg that demonstrates what is going on.  I
can't quite tell what I'm doing wrong: the code works in csi, but
when I run chicken-install I get an error message.

Am I using match incorrectly?

-Alan
-- 
.i ko djuno fi le do sevzi
((author "\".alyn.post.\" ")
 (category parsing)
 (doc-from-wiki)
 (license "ISC")
 (depends matchable)
 (synopsis "testing egg"))
(module testegg
  (make-foo
   make-bar)

(import scheme)
(import matchable)

(define (make-foo cmene valsi)
  `(,cmene ,valsi))

(define (make-bar cmene nastura porjahe)
  (write `(,nastura ,porjahe))
  (newline)
  (match `(,nastura ,porjahe)
((#t #t) (lambda (ignore-valsi)
   (lambda () `(,(make-foo cmene #f)
((#t #f) (lambda (ignore-valsi)
   (lambda () (make-foo cmene #f
((#f #t) (lambda (valsi)
   (lambda () `(,(make-foo cmene valsi)
((#f #f) (lambda (valsi)
   (lambda () (make-foo cmene valsi))

(write (((make-bar "aisa" #f #f) "baz")))
(newline))
(define testegg-version "trunk")

(define (dynld-name fn) 
  (make-pathname #f fn ##sys#load-dynamic-extension))   

(define testegg-cscflags `(-d2))

(make (((dynld-name "testegg") ("testegg.scm"
"testegg.meta"
"testegg.setup")
   (begin (compile -s
   ,@testegg-cscflags
   -j testegg
   -o ,(dynld-name "testegg")
   testegg.scm)
  (compile -s
   ,@testegg-cscflags
   -o ,(dynld-name "testegg.import")
   testegg.import.scm

  `(,(dynld-name "testegg")))

(install-extension
  ; lo cmene vi pagbu
  'testegg

  ; lo datnyvei vi pagbu
  `(,(dynld-name "testegg")
,(dynld-name "testegg.import"))

  ; lo se ckaji vi pagbu
  `((version ,testegg-version)))
___
Chicken-users mailing list
Chicken-users@nongnu.org
http://lists.nongnu.org/mailman/listinfo/chicken-users


[Chicken-users] Re: obscure error message after refactoring

2011-01-20 Thread Alan Post
On Thu, Jan 20, 2011 at 06:58:27AM -0700, Alan Post wrote:
> I've been refactoring the interface between 3 of the subsystems in
> my egg, genturfa'i.  I've made a ton of changes to the code, and
> am at the point where I'm ready to compile everything and figure
> out what is broken.  I run chicken-install -s, and as it tries
> to compile my library, gives me the following error:
> 
>   Error: (caddr) bad argument type: *
> 
>   Call history:
> 
> (##core#begin (define genturfahi-version-major 0) 
> (define genturfahi-version-minor 0) (define gentur..
> (define genturfahi-version-major 0)
> (##core#set! genturfahi-version-major 0)
> (define genturfahi-version-minor 0)
> (##core#set! genturfahi-version-minor 0)
> (define genturfahi-version-patch 1)
> (##core#set! genturfahi-version-patch 1)
> (define genturfahi-version "trunk")
> (##core#set! genturfahi-version "trunk")
> (##core#undefined)<--
> 
>   Error: shell command terminated with non-zero exit status 17920:
>   /opt/chicken-master/bin/chicken chicken-ext.scm -output-file
>   genturfahi.c -dynamic -feature chicken-compile-shared -feature
>   compiling-extension -setup-mode -debug-level 2 -emit-import-library
>   genturfahi
> 
> I don't have an explicit call to caddr anywhere in my code, and I
> believe the following line:
> 
> (##core#set! genturfahi-version "trunk")
> 
> Refers to the last line in the last file of my library.
> 
> I've been looking over diffs trying to see if I've introduced a
> subtle scope or syntax error somewhere, but I'm not having much
> luck.
> 
> What do I do with an error message like the one above?  It isn't
> obvious to me where I need to look to fix the problem.

I've narrowed this down to any of the four uses of |match| I now
have in my code.  I don't understand yet why it is giving me this
error message, but debugging one pattern in four functions feels
less burdensome that looking for a misplaced token somewhere in the
library.

-Alan
-- 
.i ko djuno fi le do sevzi

___
Chicken-users mailing list
Chicken-users@nongnu.org
http://lists.nongnu.org/mailman/listinfo/chicken-users