Changeset 5964


Ignore:
Timestamp:
02/25/04 16:12:14 (17 years ago)
Author:
piso
Message:

fill()

File:
1 edited

Legend:

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

    r5963 r5964  
    33 *
    44 * Copyright (C) 2004 Peter Graves
    5  * $Id: SimpleBitVector.java,v 1.4 2004-02-25 16:01:53 piso Exp $
     5 * $Id: SimpleBitVector.java,v 1.5 2004-02-25 16:12:14 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    124124        }
    125125        catch (ClassCastException e) {
    126             // Fall through.
     126            // Fall through...
    127127        }
    128128        signal(new TypeError(newValue, Symbol.BIT));
     
    150150    {
    151151        try {
    152             int n = Fixnum.getValue(obj);
    153             if (n == 1) {
    154                 for (int i = bits.length; i-- > 0;)
    155                     bits[i] = -1L;
    156                 return;
    157             }
    158             if (n == 0) {
    159                 for (int i = bits.length; i-- > 0;)
    160                     bits[i] = 0;
    161                 return;
    162             }
    163             // None of the above...
    164         }
    165         catch (ConditionThrowable t) {}
     152            switch (((Fixnum)obj).value) {
     153                case 0:
     154                    for (int i = bits.length; i-- > 0;)
     155                        bits[i] = 0;
     156                    return;
     157                case 1:
     158                    for (int i = bits.length; i-- > 0;)
     159                        bits[i] = -1L;
     160                    return;
     161            }
     162        }
     163        catch (ClassCastException e) {
     164            // Fall through...
     165        }
    166166        signal(new TypeError(obj, Symbol.BIT));
    167167    }
Note: See TracChangeset for help on using the changeset viewer.