Changeset 4898


Ignore:
Timestamp:
11/27/03 04:32:31 (18 years ago)
Author:
piso
Message:

processArgs(): honor &ALLOW-OTHER-KEYS as well as :ALLOW-OTHER-KEYS.

File:
1 edited

Legend:

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

    r4073 r4898  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: Closure.java,v 1.59 2003-09-26 16:54:25 piso Exp $
     5 * $Id: Closure.java,v 1.60 2003-11-27 04:32:31 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    610610                    argsUsed += 2;
    611611                }
    612                 if (allowOtherKeysValue != null && allowOtherKeysValue != NIL) {
     612                if (allowOtherKeys ||
     613                    (allowOtherKeysValue != null && allowOtherKeysValue != NIL))
     614                {
    613615                    // Skip keyword/value pairs.
    614616                    while (argsUsed + 2 <= args.length)
Note: See TracChangeset for help on using the changeset viewer.