Changeset 5903


Ignore:
Timestamp:
02/23/04 15:04:36 (17 years ago)
Author:
piso
Message:

equal(), equalp(): use AbstractString? instead of LispString?.

File:
1 edited

Legend:

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

    r5895 r5903  
    33 *
    44 * Copyright (C) 2004 Peter Graves
    5  * $Id: SimpleString.java,v 1.1 2004-02-23 14:22:40 piso Exp $
     5 * $Id: SimpleString.java,v 1.2 2004-02-23 15:04:36 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    105105            return true;
    106106        }
    107         if (obj instanceof LispString) {
    108             LispString string = (LispString) obj;
     107        if (obj instanceof AbstractString) {
     108            AbstractString string = (AbstractString) obj;
    109109            if (string.length() != length())
    110110                return false;
     
    135135            return true;
    136136        }
    137         if (obj instanceof LispString) {
    138             LispString string = (LispString) obj;
     137        if (obj instanceof AbstractString) {
     138            AbstractString string = (AbstractString) obj;
    139139            if (string.length() != length())
    140140                return false;
Note: See TracChangeset for help on using the changeset viewer.