Changeset 13333


Ignore:
Timestamp:
06/16/11 05:25:43 (10 years ago)
Author:
Mark Evenson
Message:

Fix hashtable associated docstrings.

These were both a) not assigned to the class and b) failed to properly
interpolate values for ARGSLIST.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/abcl/src/org/armedbear/lisp/HashTableFunctions.java

    r13310 r13333  
    4747    Symbol.EQUALP.getSymbolFunction();
    4848
    49   @DocString(name="%make-hash-table")
    5049  private static final Primitive _MAKE_HASH_TABLE
    5150      = new pf__make_hash_table();
     51  @DocString(name="%make-hash-table")
    5252  private static final class pf__make_hash_table extends Primitive {
    5353      pf__make_hash_table() {
    … …  
    7474    };
    7575
    76   @DocString(name="%make-weak-hash-table")
     76
    7777  private static final Primitive _MAKE_WEAK_HASH_TABLE
    7878    = new pf__make_weak_hash_table();
    79 
     79  @DocString(name="%make-weak-hash-table")
    8080  private static final class pf__make_weak_hash_table extends Primitive {
    8181      pf__make_weak_hash_table() {
    … …  
    107107    };
    108108
    109   @DocString(name="gethash",
    110              args="key hash-table &optional default => value, present-p",
    111              doc="Returns the value associated with KEY in HASH-TABLE.")
    112109  private static final Primitive GETHASH
    113110    = new pf_gethash();
     111  @DocString(name="gethash",
     112             args="key hash-table &optional default",
     113             returns="value, present-p",
     114             doc="Returns the value associated with KEY in HASH-TABLE.")
    114115  private static final class pf_gethash extends Primitive {
    115116      pf_gethash() {
    … …  
    138139    };
    139140
    140   @DocString(name="gethash1",
    141              args="key hash-table => value")
    142141  private static final Primitive GETHASH1
    143142    = new pf_gethash1();
     143  @DocString(name="gethash1",
     144             args="key hash-table", returns="value")
    144145  private static final class pf_gethash1 extends Primitive {
    145146      pf_gethash1() {
    … …  
    164165    };
    165166
    166   // ### puthash key hash-table new-value &optional default => value
    167   @DocString(name="puthash",
    168              args="key hash-table new-value &optional default => value")
    169167  private static final Primitive PUTHASH
    170168    = new pf_puthash();
    171 
     169  @DocString(name="puthash",
     170             args="key hash-table new-value &optional default", returns="value")
    172171  private static final class pf_puthash extends Primitive {
    173172      pf_puthash() {
    … …  
    195194    };
    196195
    197   @DocString(name="remhash",
    198              args="key hash-table => generalized-boolean",
    199              doc="Removes the value for KEY in HASH-TABLE, if any.")
    200196  private static final Primitive REMHASH
    201197    = new pf_remhash();
     198  @DocString(name="remhash",
     199             args="key hash-table", returns="generalized-boolean",
     200             doc="Removes the value for KEY in HASH-TABLE, if any.")
    202201  private static final class pf_remhash extends Primitive {
    203202      pf_remhash() {
    … …  
    213212    };
    214213
    215   @DocString(name="clrhash",
    216              args="hash-table => hash-table")
    217214  private static final Primitive CLRHASH
    218215    = new pf_clrhash();
     216  @DocString(name="clrhash",
     217             args="hash-table", returns="hash-table")
    219218  private static final class pf_clrhash extends Primitive {
    220219      pf_clrhash() {
    … …  
    233232    };
    234233
     234  private static final Primitive HASH_TABLE_COUNT
     235    = new pf_hash_table_count();
    235236  @DocString(name="hash-table-count",
    236237             args="hash-table",
    237238             doc="Returns the number of entries in HASH-TABLE.")
    238   private static final Primitive HASH_TABLE_COUNT
    239     = new pf_hash_table_count();
    240239  private static final class pf_hash_table_count extends Primitive {
    241240      pf_hash_table_count() {
    … …  
    252251    };
    253252
     253  private static final Primitive SXHASH
     254    = new pf_sxhash();
    254255  @DocString(name="sxhash",
    255256             args="object => hash-code")
    256   private static final Primitive SXHASH
    257     = new pf_sxhash();
    258257  private static final class pf_sxhash extends Primitive {
    259258      pf_sxhash() {
    … …  
    283282    };
    284283
     284  private static final Primitive HASH_TABLE_P
     285    = new pf_hash_table_p();
    285286  @DocString(name="hash-table-p",
    286287             args="object",
    287288             doc="Whether OBJECT is an instance of a hash-table.")
    288   private static final Primitive HASH_TABLE_P
    289     = new pf_hash_table_p();
    290289  private static final class pf_hash_table_p extends Primitive {
    291290      pf_hash_table_p(){
    … …  
    300299    };
    301300
     301  private static final Primitive HASH_TABLE_ENTRIES
     302    = new pf_hash_table_entries();
    302303  @DocString(name="hah-table-entries",
    303304             args="hash-table",
    304305             doc="Returns a list of all key/values pairs in HASH-TABLE.")
    305   private static final Primitive HASH_TABLE_ENTRIES
    306     = new pf_hash_table_entries();
    307306  private static final class pf_hash_table_entries extends Primitive {
    308307      pf_hash_table_entries() {
    … …  
    319318    };
    320319
     320  private static final Primitive HASH_TABLE_TEST
     321    = new pf_hash_table_test();
    321322  @DocString(name="hash-table-test",
    322323             args="hash-table",
    323324             doc="Return the test used for the keys of HASH-TABLE.")
    324   private static final Primitive HASH_TABLE_TEST
    325     = new pf_hash_table_test();
    326325  private static final class pf_hash_table_test extends Primitive {
    327326      pf_hash_table_test() {
    … …  
    337336    };
    338337
     338  private static final Primitive HASH_TABLE_SIZE
     339    = new pf_hash_table_size();
    339340  @DocString(name="hash-table-size",
    340341             args="hash-table",
    341342             doc="Returns the number of storage buckets in HASH-TABLE.")
    342   private static final Primitive HASH_TABLE_SIZE
    343     = new pf_hash_table_size();
    344343  private static final class pf_hash_table_size extends Primitive {
    345344      pf_hash_table_size() {
    … …  
    356355    };
    357356
     357  private static final Primitive HASH_TABLE_REHASH_SIZE
     358    = new pf_hash_table_rehash_size();
    358359  @DocString(name="hash-table-rehash-size",
    359360             args="hash-table")
    360   private static final Primitive HASH_TABLE_REHASH_SIZE
    361     = new pf_hash_table_rehash_size();
    362361  private static final class pf_hash_table_rehash_size extends Primitive {
    363362      pf_hash_table_rehash_size() {
    … …  
    374373    };
    375374
     375  private static final Primitive HASH_TABLE_REHASH_THRESHOLD
     376    = new pf_hash_table_rehash_threshold();
    376377  @DocString(name="hash-table-rehash-threshold",
    377378             args="hash-table")
    378   private static final Primitive HASH_TABLE_REHASH_THRESHOLD
    379     = new pf_hash_table_rehash_threshold();
    380379  private static final class pf_hash_table_rehash_threshold extends Primitive {
    381380      pf_hash_table_rehash_threshold() {
    … …  
    392391    };
    393392
     393  private static final Primitive MAPHASH
     394    = new pf_maphash();
    394395  @DocString(name="maphash",
    395396             args="function hash-table",
    … …  
    397398             + " the function is called with two arguments--the key and the"
    398399             + " value of that entry.")
    399   private static final Primitive MAPHASH
    400     = new pf_maphash();
    401400  private static final class pf_maphash extends Primitive {
    402401      pf_maphash() {
    … …  
    413412    };
    414413
     414  private static final Primitive HASH_TABLE_WEAKNESS
     415    = new pf_hash_table_weakness();
    415416  @DocString(name="hash-table-weakness",
    416417             args="hash-table",
    417418             doc="Return weakness property of HASH-TABLE, or NIL if it has none.")
    418   private static final Primitive HASH_TABLE_WEAKNESS
    419     = new pf_hash_table_weakness();
    420419  private static final class pf_hash_table_weakness extends Primitive {
    421420      pf_hash_table_weakness() {
Note: See TracChangeset for help on using the changeset viewer.