Changeset 9970


Ignore:
Timestamp:
09/14/05 13:41:34 (16 years ago)
Author:
piso
Message:

Work in progress (tested).

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

Legend:

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

    r9966 r9970  
    33 *
    44 * Copyright (C) 2004-2005 Peter Graves
    5  * $Id: LogicalPathname.java,v 1.13 2005-09-13 04:26:44 piso Exp $
     5 * $Id: LogicalPathname.java,v 1.14 2005-09-14 13:39:01 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    2828{
    2929    private static final HashMap map = new HashMap();
     30
     31    public LogicalPathname()
     32    {
     33    }
    3034
    3135    public LogicalPathname(String host, String rest) throws ConditionThrowable
     
    210214        } else if (version == Keyword.WILD) {
    211215            sb.append(".*");
     216        } else if (version == Keyword.NEWEST) {
     217            sb.append(".NEWEST");
    212218        }
    213219        if (printReadably || printEscape)
  • trunk/j/src/org/armedbear/lisp/Pathname.java

    r9965 r9970  
    33 *
    44 * Copyright (C) 2003-2005 Peter Graves
    5  * $Id: Pathname.java,v 1.87 2005-09-13 00:09:24 piso Exp $
     5 * $Id: Pathname.java,v 1.88 2005-09-14 13:41:34 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    975975        throws ConditionThrowable
    976976    {
    977         if (pathname instanceof LogicalPathname || defaultPathname instanceof LogicalPathname)
    978             signal(new LispError("Bad place for a logical pathname."));
    979         Pathname p = new Pathname();
     977//         if (pathname instanceof LogicalPathname || defaultPathname instanceof LogicalPathname)
     978//             signal(new LispError("Bad place for a logical pathname."));
     979        Pathname p;
     980        if (pathname instanceof LogicalPathname)
     981            p = new LogicalPathname();
     982        else
     983            p = new Pathname();
    980984        if (pathname.host != NIL)
    981985            p.host = pathname.host;
Note: See TracChangeset for help on using the changeset viewer.