Changeset 8652


Ignore:
Timestamp:
02/27/05 20:10:54 (16 years ago)
Author:
piso
Message:

getFunctionalType() is obsolete.

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

Legend:

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

    r8558 r8652  
    33 *
    44 * Copyright (C) 2003-2005 Peter Graves
    5  * $Id: Autoload.java,v 1.216 2005-02-13 04:12:44 piso Exp $
     5 * $Id: Autoload.java,v 1.217 2005-02-27 20:09:49 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    124124            return fileName;
    125125        return getSymbol().getName().toLowerCase();
    126     }
    127 
    128     public final int getFunctionalType()
    129     {
    130         return FTYPE_AUTOLOAD;
    131126    }
    132127
  • trunk/j/src/org/armedbear/lisp/Lisp.java

    r8648 r8652  
    33 *
    44 * Copyright (C) 2002-2005 Peter Graves
    5  * $Id: Lisp.java,v 1.323 2005-02-27 20:00:49 piso Exp $
     5 * $Id: Lisp.java,v 1.324 2005-02-27 20:10:54 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    101101    // End-of-file marker.
    102102    public static final LispObject EOF = new LispObject();
    103 
    104     // Functional types.
    105     static final int FTYPE_SPECIAL_OPERATOR = 1;
    106     static final int FTYPE_MACRO            = 2;
    107     static final int FTYPE_AUTOLOAD         = 3;
    108103
    109104    public static boolean profiling;
  • trunk/j/src/org/armedbear/lisp/LispObject.java

    r8566 r8652  
    33 *
    44 * Copyright (C) 2002-2005 Peter Graves
    5  * $Id: LispObject.java,v 1.118 2005-02-14 04:05:32 piso Exp $
     5 * $Id: LispObject.java,v 1.119 2005-02-27 20:10:25 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    2424public class LispObject extends Lisp
    2525{
    26     public int getFunctionalType()
    27     {
    28         return 0;
    29     }
    30 
    3126    public LispObject typeOf()
    3227    {
  • trunk/j/src/org/armedbear/lisp/MacroObject.java

    r8034 r8652  
    22 * MacroObject.java
    33 *
    4  * Copyright (C) 2003-2004 Peter Graves
    5  * $Id: MacroObject.java,v 1.7 2004-10-22 15:51:38 piso Exp $
     4 * Copyright (C) 2003-2005 Peter Graves
     5 * $Id: MacroObject.java,v 1.8 2005-02-27 20:10:06 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    3131        this.name = name;
    3232        this.expander = expander;
    33     }
    34 
    35     public int getFunctionalType()
    36     {
    37         return FTYPE_MACRO;
    3833    }
    3934
  • trunk/j/src/org/armedbear/lisp/SpecialOperator.java

    r8044 r8652  
    22 * SpecialOperator.java
    33 *
    4  * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: SpecialOperator.java,v 1.13 2004-10-22 19:22:47 piso Exp $
     4 * Copyright (C) 2002-2005 Peter Graves
     5 * $Id: SpecialOperator.java,v 1.14 2005-02-27 20:09:23 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    4040        this(name);
    4141        setArglist(new SimpleString(arglist));
    42     }
    43 
    44     public final int getFunctionalType()
    45     {
    46         return FTYPE_SPECIAL_OPERATOR;
    4742    }
    4843
Note: See TracChangeset for help on using the changeset viewer.