Changeset 8755


Ignore:
Timestamp:
03/12/05 17:06:56 (17 years ago)
Author:
piso
Message:

truncate(): added a comment.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/Ratio.java

    r8629 r8755  
    33 *
    44 * Copyright (C) 2003-2005 Peter Graves
    5  * $Id: Ratio.java,v 1.48 2005-02-23 16:30:53 piso Exp $
     5 * $Id: Ratio.java,v 1.49 2005-03-12 17:06:56 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    431431    public LispObject truncate(LispObject obj) throws ConditionThrowable
    432432    {
    433         if (obj instanceof LispFloat)
     433        if (obj instanceof LispFloat) {
     434            // "When rationals and floats are combined by a numerical function,
     435            // the rational is first converted to a float of the same format."
     436            // 12.1.4.1
    434437            return new LispFloat(floatValue()).truncate(obj);
     438        }
    435439        BigInteger n, d;
    436440  try {
Note: See TracChangeset for help on using the changeset viewer.