|
From: | Chicken Trac |
Subject: | [Chicken-janitors] Re: #113: Crunch egg: bug in define-crunch-primitives / define-crunch-callback |
Date: | Mon, 15 Feb 2010 15:00:35 -0000 |
#113: Crunch egg: bug in define-crunch-primitives / define-crunch-callback ------------------------+--------------------------------------------------- Reporter: jeronimo | Owner: Type: defect | Status: new Priority: minor | Milestone: Component: extensions | Version: 4.2.x Keywords: crunch | ------------------------+--------------------------------------------------- Comment(by felix): Replying to [comment:10 jeronimo]: > Hi Felix, > > This is what I've tried to compile: > > {{{ > (use crunch) > > (crunch > (define (string-reverse str) > (let* ((n (string-length str)) > (s2 (make-string n #\space))) > (do ((i 0 (add1 i))) > ((>= i n)) > (string-set! s2 (sub1 (- n i)) (string-ref str i))) > s2)) ) > > (print (string-reverse "this is a test!")) > }}} Can you try the HEAD of the `experimental` git branch + svn trunk of crunch? -- Ticket URL: <http://www.irp.oist.jp/trac/chicken/ticket/113#comment:11> Chicken Scheme <http://www.call-with-current-continuation.org/> Chicken Scheme is a compiler for the Scheme programming language.
[Prev in Thread] | Current Thread | [Next in Thread] |