Changeset 13302


Ignore:
Timestamp:
05/27/11 13:06:26 (11 years ago)
Author:
Mark Evenson
Message:

Include the version in the internal PATHNAME copy contructor.

With this change, MERGE-PATHNAMES should now follow ANSI for version
arguments, finally closing ticket #150.

File:
1 edited

Legend:

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

    r13299 r13302  
    169169            }
    170170        }
     171  if (p.version != NIL) {
     172      if (p.version instanceof Symbol) {
     173    version = p.version;
     174      } else if (p.version instanceof LispInteger) {
     175    version = p.version;
     176      } else {
     177    Debug.assertTrue(false);
     178      }
     179  }
    171180    }
    172181
Note: See TracChangeset for help on using the changeset viewer.