summaryrefslogtreecommitdiffstats
path: root/lib.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-05-15 20:08:31 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-05-15 20:08:31 -0700
commite87568a3d43593d53c1d294e4f42f46232877855 (patch)
tree0728be13f7f044972d319abe8240c2f32e95ff9c /lib.h
parent87e185aa2d2cfe18df7e89ddfd05b2dd262fe791 (diff)
downloadtxr-e87568a3d43593d53c1d294e4f42f46232877855.tar.gz
txr-e87568a3d43593d53c1d294e4f42f46232877855.tar.bz2
txr-e87568a3d43593d53c1d294e4f42f46232877855.zip
cobj: rename poorly named default operation.
Renaming cobj_hash_op to cobj_eq_hash_op. This function is only appropriate to use with COBJ objects which use eq as their equal funtion. I've spotted one instance of an inappropriate use which have to be addressed by a different commit: the equal function is other than eq, but cobj_hash_op is used for the equal hash. * lib.h (cobj_hash_op): Declaration renamed to cobj_eq_hash_op. * hash.c (cobj_hash_op): Renamed to cobj_eq_hash_op. (hash_iter_ops): Refer to renamed cobj_hash_eq_op. * ffi.c (ffi_type_builtin_ops, ffi_type_struct_ops, ffi_type_ptr_ops, ffi-closure_ops, ffi_call_desc_ops): Likewise. * lib.c (cptr_ops): Likewise. * parser.c (parser_ops): Likewise. * rand.c (random_state_ops): Likewise. * regex.c (char_set_ops, regex_obj_ops): Likewise. * socket.c (dgram_strm_ops): Likewise. * stream.c (null_ops, stdio_ops, tail_ops, pipe_ops, dir_ops, string_in_ops, byte_in_ops, strlist_in_ops, string_out_ops, strlist_out_ops, cat_stream_ops, record_adapter_ops): Likewise. * struct.c (struct_type_ops): Likewise. * sysif.c (cptr_dl_ops): Likewise. * syslog.c (syslog_strm_ops): Likewise. * unwind.c (cont_ops): Likewise.
Diffstat (limited to 'lib.h')
-rw-r--r--lib.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib.h b/lib.h
index b5593475..f1274bf1 100644
--- a/lib.h
+++ b/lib.h
@@ -257,7 +257,7 @@ val cobj_equal_handle_op(val left, val right);
void cobj_destroy_stub_op(val);
void cobj_destroy_free_op(val);
void cobj_mark_op(val);
-cnum cobj_hash_op(val, int *);
+cnum cobj_eq_hash_op(val, int *);
struct env {
obj_common;