Changeset 4920


Ignore:
Timestamp:
11/30/03 05:53:22 (18 years ago)
Author:
piso
Message:

sxhash()

File:
1 edited

Legend:

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

    r4726 r4920  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: LispObject.java,v 1.64 2003-11-14 00:46:13 piso Exp $
     5 * $Id: LispObject.java,v 1.65 2003-11-30 05:53:22 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    499499    }
    500500
     501    public Fixnum sxhash()
     502    {
     503        return new Fixnum(hashCode() & 0x7ffffff);
     504    }
     505
    501506    // Profiling.
    502507    public int getCallCount()
Note: See TracChangeset for help on using the changeset viewer.