unofficial mirror of bug-guile@gnu.org 
 help / color / mirror / Atom feed
From: Helmut Eller <eller.helmut@gmail.com>
To: 24318@debbugs.gnu.org
Subject: bug#24318: char<=? with three args
Date: Sat, 27 Aug 2016 11:42:38 +0200	[thread overview]
Message-ID: <m21t1a7dkh.fsf@gmail.com> (raw)

Compiling a file x.scm:

  (library (x)
    (export)
    (import (rnrs))
    (define (foo x) (char<=? #\0 x #\9)))

causes an error:

 shell> guile --version | head -n1
 guile (GNU Guile) 2.1.3.104-8f2f8
 shell> guile -c '(compile-file "x.scm")'
Backtrace:    
In system/base/compile.scm:
    152:6 19 (compile-file _ #:output-file _ #:from _ #:to _ #:env _ …)
     43:4 18 (call-once _)
In ice-9/boot-9.scm:
    829:4 17 (with-throw-handler _ _ _)
In system/base/compile.scm:
    59:11 16 (_)
   155:11 15 (_ #<closed: file 9fbf930>)
   224:14 14 (read-and-compile _ #:from _ #:to _ #:env _ #:opts _)
    255:6 13 (compile _ #:from _ #:to _ #:env _ #:opts _)
   183:32 12 (compile-fold _ #<tree-il (seq (let (m) (m-121) ((call…> …)
In language/cps/compile-bytecode.scm:
   573:12 11 (compile-bytecode #<intmap 0-257> #<directory (x) a138…> …)
   566:12 10 (lower-cps _ (#:to-file? #t))
In language/cps/optimize.scm:
     86:0  9 (optimize-higher-order-cps _ _)
In language/cps/dce.scm:
   357:33  8 (eliminate-dead-code _)
   105:18  7 (compute-live-code #<intmap 0-222>)
In language/cps/intmap.scm:
    514:5  6 (visit-branch #(#(#<cps (kfun () 0 139 1)> #<cps…> …) …) …)
    514:5  5 (visit-branch #(#<cps (kargs (rest) (195) (continue…> …) …)
In language/cps/type-checks.scm:
     47:5  4 (elide-type-checks #<intmap 0-222> _ _)
In language/cps/intmap.scm:
    514:5  3 (visit-branch #((absent) (absent) (absent) (absent) # …) …)
In language/cps/type-checks.scm:
    43:10  2 (_ 221 _ #<intmap 0-222>)
In language/cps/types.scm:
   1420:0  1 (_ _ _ _)
In ice-9/boot-9.scm:
   753:26  0 (dispatch-exception _ _ _)

ice-9/boot-9.scm:753:26: In procedure dispatch-exception:
ice-9/boot-9.scm:753:26: Wrong number of arguments to #<procedure b5eac480 at language/cps/types.scm:1420:0 (typeset t-41149 t-41150)>
[Exit 1]





             reply	other threads:[~2016-08-27  9:42 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2016-08-27  9:42 Helmut Eller [this message]
2016-09-02  8:06 ` bug#24318: char<=? with three args Andy Wingo

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/guile/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=m21t1a7dkh.fsf@gmail.com \
    --to=eller.helmut@gmail.com \
    --cc=24318@debbugs.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).