Changeset 5886


Ignore:
Timestamp:
02/21/04 13:58:48 (17 years ago)
Author:
piso
Message:

processArgs(): bind envVar if it's not null.

File:
1 edited

Legend:

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

    r5884 r5886  
    33 *
    44 * Copyright (C) 2002-2004 Peter Graves
    5  * $Id: Closure.java,v 1.67 2004-02-21 00:14:50 piso Exp $
     5 * $Id: Closure.java,v 1.68 2004-02-21 13:58:48 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    545545        Environment oldDynEnv = thread.getDynamicEnvironment();
    546546        Environment ext = new Environment(environment);
     547        // Section 3.4.4: "...the &environment parameter is bound along with
     548        // &whole before any other variables in the lambda list..."
     549        if (envVar != null)
     550            bind(envVar, environment, ext);
    547551        LispObject[] array = new LispObject[variables.length];
    548552        int index = 0;
Note: See TracChangeset for help on using the changeset viewer.