Changeset 12725


Ignore:
Timestamp:
05/23/10 17:59:51 (12 years ago)
Author:
vvoutilainen
Message:

Make Readtable functions final where possible.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/Readtable.java

    r12513 r12725  
    172172
    173173  @Override
    174   public LispObject typeOf()
     174  public final LispObject typeOf()
    175175  {
    176176    return Symbol.READTABLE;
     
    178178
    179179  @Override
    180   public LispObject classOf()
     180  public final LispObject classOf()
    181181  {
    182182    return BuiltInClass.READTABLE;
     
    184184
    185185  @Override
    186   public LispObject typep(LispObject type)
     186  public final LispObject typep(LispObject type)
    187187  {
    188188    if (type == Symbol.READTABLE)
     
    194194
    195195  @Override
    196   public String toString()
     196  public final String toString()
    197197  {
    198198    return unreadableString("READTABLE");
    199199  }
    200200
    201   public LispObject getReadtableCase()
     201  public final LispObject getReadtableCase()
    202202  {
    203203    return readtableCase;
    204204  }
    205205
    206   public boolean isWhitespace(char c)
     206  public final boolean isWhitespace(char c)
    207207  {
    208208    return getSyntaxType(c) == SYNTAX_TYPE_WHITESPACE;
    209209  }
    210210
    211   public byte getSyntaxType(char c)
     211  public final byte getSyntaxType(char c)
    212212  {
    213213    return syntax.get(c);
    214214  }
    215215
    216   public boolean isInvalid(char c)
     216  public final boolean isInvalid(char c)
    217217  {
    218218    switch (c)
     
    231231  }
    232232
    233   public void checkInvalid(char c, Stream stream)
     233  public final void checkInvalid(char c, Stream stream)
    234234  {
    235235    // "... no mechanism is provided for changing the constituent trait of a
     
    248248  }
    249249
    250   public LispObject getReaderMacroFunction(char c)
     250  public final LispObject getReaderMacroFunction(char c)
    251251  {
    252252    return readerMacroFunctions.get(c);
    253253  }
    254254
    255   LispObject getMacroCharacter(char c)
     255  final LispObject getMacroCharacter(char c)
    256256  {
    257257    LispObject function = getReaderMacroFunction(c);
     
    272272  }
    273273
    274   void makeDispatchMacroCharacter(char dispChar, LispObject non_terminating_p)
     274  final void makeDispatchMacroCharacter(char dispChar, LispObject non_terminating_p)
    275275  {
    276276    byte syntaxType;
     
    285285  }
    286286
    287   public LispObject getDispatchMacroCharacter(char dispChar, char subChar)
     287  public final LispObject getDispatchMacroCharacter(char dispChar, char subChar)
    288288
    289289  {
     
    300300  }
    301301
    302   public void setDispatchMacroCharacter(char dispChar, char subChar,
     302  public final void setDispatchMacroCharacter(char dispChar, char subChar,
    303303                                        LispObject function)
    304304
Note: See TracChangeset for help on using the changeset viewer.