Changeset 4187


Ignore:
Timestamp:
10/04/03 01:47:24 (19 years ago)
Author:
piso
Message:

isValidCatchTag()

File:
1 edited

Legend:

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

    r4184 r4187  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: LispThread.java,v 1.17 2003-10-04 01:17:51 piso Exp $
     5 * $Id: LispThread.java,v 1.18 2003-10-04 01:47:24 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    183183    public boolean isValidCatchTag(LispObject tag)
    184184    {
    185         for (int i = stack.size(); i-- > 0;) {
    186             if (stack.get(i) == tag)
     185        for (int i = catchTags.size(); i-- > 0;) {
     186            if (catchTags.get(i) == tag)
    187187                return true;
    188188        }
Note: See TracChangeset for help on using the changeset viewer.