Changeset 3775


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

rationalp(), realp()

Location:
trunk/j/src/org/armedbear/lisp
Files:
4 edited

Legend:

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

    r3761 r3775  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: Bignum.java,v 1.38 2003-09-14 15:33:05 piso Exp $
     5 * $Id: Bignum.java,v 1.39 2003-09-14 17:05:41 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    7676
    7777    public boolean integerp()
     78    {
     79        return true;
     80    }
     81
     82    public boolean rationalp()
     83    {
     84        return true;
     85    }
     86
     87    public boolean realp()
    7888    {
    7989        return true;
  • trunk/j/src/org/armedbear/lisp/Fixnum.java

    r3761 r3775  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: Fixnum.java,v 1.64 2003-09-14 15:33:05 piso Exp $
     5 * $Id: Fixnum.java,v 1.65 2003-09-14 17:04:51 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    8585
    8686    public boolean integerp()
     87    {
     88        return true;
     89    }
     90
     91    public boolean rationalp()
     92    {
     93        return true;
     94    }
     95
     96    public boolean realp()
    8797    {
    8898        return true;
  • trunk/j/src/org/armedbear/lisp/LispObject.java

    r3767 r3775  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: LispObject.java,v 1.50 2003-09-14 16:43:19 piso Exp $
     5 * $Id: LispObject.java,v 1.51 2003-09-14 17:00:15 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    229229    }
    230230
     231    public boolean rationalp()
     232    {
     233        return false;
     234    }
     235
     236    public boolean realp()
     237    {
     238        return false;
     239    }
     240
    231241    public LispObject STRINGP()
    232242    {
  • trunk/j/src/org/armedbear/lisp/Ratio.java

    r3761 r3775  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: Ratio.java,v 1.30 2003-09-14 15:33:05 piso Exp $
     5 * $Id: Ratio.java,v 1.31 2003-09-14 17:06:59 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    8484
    8585    public boolean numberp()
     86    {
     87        return true;
     88    }
     89
     90    public boolean rationalp()
     91    {
     92        return true;
     93    }
     94
     95    public boolean realp()
    8696    {
    8797        return true;
Note: See TracChangeset for help on using the changeset viewer.