hashtables.sequences: minor cleanup.

diff --git a/basis/hashtables/sequences/sequences-tests.factor b/basis/hashtables/sequences/sequences-tests.factor
index 4ccea2fda6b4b45a49165930e06b69a6a34c68cf..47a4d639dd5b5fe894071183535d69ed7a526ec5 100644 (file)
--- a/basis/hashtables/sequences/sequences-tests.factor
+++ b/basis/hashtables/sequences/sequences-tests.factor
@@ -4,7 +4,7 @@
 USING: assocs hashtables.sequences kernel literals sequences
 tools.test ;
 
-IN: hashtables.identity.tests
+IN: hashtables.sequences.tests
 
 [ 1000 ] [ 0 4 "asdf" <slice> SH{ { "asdf" 1000 } } at ] unit-test
 

diff --git a/basis/hashtables/sequences/sequences.factor b/basis/hashtables/sequences/sequences.factor
index 907d97b7c4190406bf66b545a0183661789a1a9e..d1105d35c40cadad962e2ab9c6f659d26f2af87d 100644 (file)
--- a/basis/hashtables/sequences/sequences.factor
+++ b/basis/hashtables/sequences/sequences.factor
@@ -20,7 +20,7 @@ M: sequence-wrapper hashcode*
 
 TUPLE: sequence-hashtable < wrapped-hashtable ;
 
-: <sequence-hashtable> ( n -- ihash )
+: <sequence-hashtable> ( n -- shashtable )
     <hashtable> sequence-hashtable boa ; inline
 
 M: sequence-hashtable wrap-key drop <sequence-wrapper> ;