Changeset 4272


Ignore:
Timestamp:
10/10/03 01:53:48 (18 years ago)
Author:
piso
Message:

%SET-ELT, MAPTREE => PACKAGE_SYS

File:
1 edited

Legend:

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

    r4258 r4272  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: Primitives.java,v 1.466 2003-10-08 18:09:29 piso Exp $
     5 * $Id: Primitives.java,v 1.467 2003-10-10 01:53:48 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    41434143    // ### %set-elt
    41444144    // %setelt sequence index newval => newval
    4145     private static final Primitive3 _SET_ELT = new Primitive3("%set-elt")
     4145    private static final Primitive3 _SET_ELT =
     4146        new Primitive3("%set-elt", PACKAGE_SYS, false)
    41464147    {
    41474148        public LispObject execute(LispObject first, LispObject second,
     
    41834184
    41844185    // ### maptree
    4185     private static final Primitive2 MAPTREE = new Primitive2("maptree") {
     4186    private static final Primitive2 MAPTREE =
     4187        new Primitive2("maptree", PACKAGE_SYS, false)
     4188    {
    41864189        public LispObject execute(LispObject fun, LispObject x)
    41874190            throws ConditionThrowable
Note: See TracChangeset for help on using the changeset viewer.