fltruncate throws "not a procedure"

Bug #160972 reported by Michael D. Adams
4
Affects Status Importance Assigned to Milestone
Ikarus Scheme
Fix Released
High
Abdulaziz Ghuloum

Bug Description

This is on revision 1007. I can work around this just fine by using truncate.

$ ikarus
Ikarus Scheme (Build 2007-11-08)
Copyright (c) 2006-2007 Abdulaziz Ghuloum

> (truncate 0.1)
0.0
> (fltruncate 0.1)
Unhandled exception
 Condition components:
   1. &error
   2. &who: quotient+remainder
   3. &message: "not a number"
   4. &irritants: (#<unknown>)

Revision history for this message
Abdulaziz Ghuloum (aghuloum) wrote :

Fixed in revision 1009. Thanks.

Changed in ikarus:
assignee: nobody → aghuloum
importance: Undecided → High
status: New → Fix Committed
Revision history for this message
Jens Axel Søgaard (soegaard) wrote :

In ikarus.numerics.ss change in the next to last line
the x to a v.

  (define (fltruncate x)
    (unless (flonum? x)
      (error 'fltruncate "not a flonum" x))
    (let ([v ($flonum->exact x)])
      (cond
        [(ratnum? v) (exact->inexact ($ratnum-truncate v))]
        [else x])))

Revision history for this message
Abdulaziz Ghuloum (aghuloum) wrote :

This bug report is about to be closed as the fix comitted previously
will be incorporated in the next 0.0.2 release of Ikarus Scheme,
scheduled for November 28, 2007.
A release candidate tarball is available for download from:
  http://www.cs.indiana.edu/~aghuloum/ikarus/ikarus-0.0.2-rc1.tar.gz
Please do test it if you have the time and report any issues you
might encounter. Thank you very much for your support. Aziz,,,
(Sorry for the duplicates; I'm updating every open bug.)

Changed in ikarus:
milestone: none → 0.0.2
Changed in ikarus:
status: Fix Committed → Fix Released
To post a comment you must log in.
This report contains Public information  
Everyone can see this information.

Other bug subscribers

Remote bug watches

Bug watches keep track of this bug in other bug trackers.