Changeset 3752


Ignore:
Timestamp:
09/14/03 12:26:32 (19 years ago)
Author:
piso
Message:

BIT_VECTOR_P()

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

Legend:

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

    r3538 r3752  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: BitVector.java,v 1.20 2003-08-27 17:28:26 piso Exp $
     5 * $Id: BitVector.java,v 1.21 2003-09-14 12:26:32 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    9191    }
    9292
     93    public LispObject BIT_VECTOR_P()
     94    {
     95        return T;
     96    }
     97
    9398    public LispObject getElementType()
    9499    {
  • trunk/j/src/org/armedbear/lisp/LispObject.java

    r3685 r3752  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: LispObject.java,v 1.45 2003-09-10 18:45:02 piso Exp $
     5 * $Id: LispObject.java,v 1.46 2003-09-14 12:25:54 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    189189    }
    190190
     191    public LispObject BIT_VECTOR_P()
     192    {
     193        return NIL;
     194    }
     195
    191196    public LispObject COMPLEXP()
    192197    {
Note: See TracChangeset for help on using the changeset viewer.