Changeset 3737


Ignore:
Timestamp:
09/14/03 01:37:09 (19 years ago)
Author:
piso
Message:

TYPEP => SYS::SIMPLE-TYPEP

File:
1 edited

Legend:

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

    r3734 r3737  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: Primitives.java,v 1.386 2003-09-13 23:41:37 piso Exp $
     5 * $Id: Primitives.java,v 1.387 2003-09-14 01:37:09 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    23112311    };
    23122312
    2313     // ### typep
    2314     private static final Primitive2 TYPEP = new Primitive2("typep") {
     2313    // ### simple-typep
     2314    private static final Primitive2 SIMPLE_TYPEP =
     2315        new Primitive2("simple-typep", PACKAGE_SYS, false)
     2316    {
    23152317        public LispObject execute(LispObject first, LispObject second)
    23162318            throws LispError
Note: See TracChangeset for help on using the changeset viewer.