mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-26 06:22:33 -08:00
Code Issues Projects Releases Packages Wiki Activity

Add missing break statement to cl_hash_table_test

Browse source 
Without the break statement an error is signalled for any hash table with a
custom test function
This commit is contained in:
Catherine Tower 2022-02-27 14:15:34 -08:00
parent e3fc760139
commit f0d46570a4
No known key found for this signature in database
GPG key ID: 24602640867ED1C1
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/hash.d
View file

@ -1239,7 +1239,7 @@ cl_hash_table_test(cl_object ht)
case ecl_htt_equal: output = @'equal'; break;
case ecl_htt_equalp: output = @'equalp'; break;
case ecl_htt_pack: output = @'equal'; break;
case ecl_htt_generic: output = ht->hash.generic_test;
case ecl_htt_generic: output = ht->hash.generic_test; break;
default: FEerror("hash-table-test: unknown test.", 0);
}
@(return output);