Re: T1247 - Conditionally do (use-modules (ice-9 curried-definitions)) if running with Guile V2, (issue2219044)

[pnorcks]

Hi Ian,

This patch still isn't working for me with Guile 1.9.13.  Guile 1.8 is
fine.

I posted some inline comments for you below.

Unfortunately, I'm not sure what to suggest for a fix.  Could this be a
bug in Guile 1.9 ?

Thanks,
Patrick


http://codereview.appspot.com/2219044/diff/25001/scm/display-lily.scm
File scm/display-lily.scm (right):

http://codereview.appspot.com/2219044/diff/25001/scm/display-lily.scm#newcode30
scm/display-lily.scm:30: #:use-module (srfi srfi-39)
If I say

  #:use-module (ice-9 curried-definitions)

this file compiles fine (with Guile 1.9.13).

Instead, see below for the error message.

http://codereview.appspot.com/2219044/diff/25001/scm/display-lily.scm#newcode41
scm/display-lily.scm:41: (use-modules (ice-9 curried-definitions)))
This doesn't work for me with Guile 1.9.13.

I see this in the log as the Scheme files are compiling:

;;; compiling
/home/pnorcks/usr/share/lilypond/2.13.39/scm/music-functions.scm
;;; compiling
/home/pnorcks/usr/share/lilypond/2.13.39/scm/display-lily.scm
;;; WARNING: compilation of
/home/pnorcks/usr/share/lilypond/2.13.39/scm/display-lily.scm failed:
;;; key syntax-error, throw args (macroexpand "~a in ~a" ("source
expression failed to match any pattern" (define
((make-music-type-predicate-aux mtypes) expr) (if (null? mtypes) #f (or
(eqv? (car mtypes) (ly:music-property expr (quote name)))
((make-music-type-predicate-aux (cdr mtypes)) expr))))) #f)
;;; WARNING: compilation of
/home/pnorcks/usr/share/lilypond/2.13.39/scm/music-functions.scm failed:
;;; key wrong-type-arg, throw args (#f "Wrong type to apply: ~S" (#f)
(#f))

http://codereview.appspot.com/2219044/diff/25001/scm/display-lily.scm#newcode308
scm/display-lily.scm:308:
Remove the last line of this file, since it just has trailing
whitespace.

http://codereview.appspot.com/2219044/