Changeset 10313


Ignore:
Timestamp:
11/01/05 16:39:33 (16 years ago)
Author:
piso
Message:

setDirectDefaultInitargs(), setDefaultInitargs()

File:
1 edited

Legend:

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

    r9666 r10313  
    33 *
    44 * Copyright (C) 2003-2005 Peter Graves
    5  * $Id: SlotClass.java,v 1.15 2005-07-16 14:44:03 piso Exp $
     5 * $Id: SlotClass.java,v 1.16 2005-11-01 16:39:33 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    7171    {
    7272        this.slotDefinitions = slotDefinitions;
     73    }
     74
     75    public void setDirectDefaultInitargs(LispObject directDefaultInitargs)
     76    {
     77        this.directDefaultInitargs = directDefaultInitargs;
     78    }
     79
     80    public void setDefaultInitargs(LispObject defaultInitargs)
     81    {
     82        this.defaultInitargs = defaultInitargs;
    7383    }
    7484
Note: See TracChangeset for help on using the changeset viewer.