/[gcl]/gcl/o/hash.d
ViewVC logotype

Diff of /gcl/o/hash.d

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.15 by camm, Fri Jul 8 06:10:30 2005 UTC revision 1.16 by camm, Wed Aug 10 13:59:56 2005 UTC
# Line 688  DEFUN_NEW("HASH-TABLE-SIZE",object,fLhas Line 688  DEFUN_NEW("HASH-TABLE-SIZE",object,fLhas
688    RETURN1(make_fixnum(table->ht.ht_size));    RETURN1(make_fixnum(table->ht.ht_size));
689  }  }
690    
691    DEFUN_NEW("HASH-TABLE-REHASH-SIZE",object,fLhash_table_rehash_size,LISP,1,1,NONE,OO,OO,OO,OO,(object table),"")
692    {
693      check_type_hash_table(&table);
694      RETURN1(table->ht.ht_rhsize);
695    }
696    
697    DEFUN_NEW("HASH-TABLE-REHASH-THRESHOLD",object,fLhash_table_rehash_threshold,LISP,1,1,NONE,OO,OO,OO,OO,(object table),"")
698    {
699      check_type_hash_table(&table);
700      RETURN1(table->ht.ht_rhthresh);
701    }
702    
703    
704    
705  void  void

Legend:
Removed from v.1.15  
changed lines
  Added in v.1.16

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26