Changeset 11016


Ignore:
Timestamp:
03/16/06 11:31:26 (15 years ago)
Author:
piso
Message:

isValidSetfFunctionName()

File:
1 edited

Legend:

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

    r10986 r11016  
    33 *
    44 * Copyright (C) 2002-2006 Peter Graves
    5  * $Id: Lisp.java,v 1.439 2006-02-10 10:50:57 piso Exp $
     5 * $Id: Lisp.java,v 1.440 2006-03-16 11:31:26 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    11811181          {
    11821182            Cons cdr = (Cons) cons.cdr;
    1183             if (cdr.car != NIL && cdr.cdr == NIL)
    1184               return (cdr.car instanceof Symbol);
     1183            return (cdr.car instanceof Symbol && cdr.cdr == NIL);
    11851184          }
    11861185      }
Note: See TracChangeset for help on using the changeset viewer.