Changeset 10024


Ignore:
Timestamp:
09/24/05 19:58:50 (16 years ago)
Author:
piso
Message:

Minor cleanup for gcj.

File:
1 edited

Legend:

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

    r9666 r10024  
    33 *
    44 * Copyright (C) 2004-2005 Peter Graves
    5  * $Id: PrintNotReadable.java,v 1.9 2005-07-16 14:44:03 piso Exp $
     5 * $Id: PrintNotReadable.java,v 1.10 2005-09-24 19:58:50 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    2929    {
    3030        super(initArgs);
     31        LispObject object = NIL;
    3132        while (initArgs != NIL) {
    3233            LispObject first = initArgs.car();
     
    3637            if (first == Keyword.OBJECT) {
    3738                object = second;
    38                 return;
     39                break;
    3940            }
    4041        }
    41         object = NIL;
     42        this.object = object;
    4243    }
    4344
Note: See TracChangeset for help on using the changeset viewer.