Changeset 3779


Ignore:
Timestamp:
09/14/03 17:18:36 (19 years ago)
Author:
piso
Message:

getInstance(): use realp().

File:
1 edited

Legend:

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

    r3761 r3779  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: Complex.java,v 1.18 2003-09-14 15:33:05 piso Exp $
     5 * $Id: Complex.java,v 1.19 2003-09-14 17:18:36 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    3737        throws TypeError
    3838    {
    39         if ((realpart.getType() & TYPE_REAL) == 0)
     39        if (!realpart.realp())
    4040            throw new TypeError(realpart, "real number");
    41         if ((imagpart.getType() & TYPE_REAL) == 0)
     41        if (!imagpart.realp())
    4242            throw new TypeError(imagpart, "real number");
    4343        if (realpart instanceof LispFloat)
Note: See TracChangeset for help on using the changeset viewer.