summaryrefslogtreecommitdiffstats
path: root/lib.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-12-07 10:59:19 -0800
committerKaz Kylheku <kaz@kylheku.com>2011-12-07 10:59:19 -0800
commit79781ded91b29fbdc406d460e466c5ffb06a1454 (patch)
tree2f44c3b8091a1fe8d397af2e577448ceb89031e7 /lib.h
parentbf486523ab87ce43d5cc880fd0e2dd5f48cd819b (diff)
downloadtxr-79781ded91b29fbdc406d460e466c5ffb06a1454.tar.gz
txr-79781ded91b29fbdc406d460e466c5ffb06a1454.tar.bz2
txr-79781ded91b29fbdc406d460e466c5ffb06a1454.zip
* eval.c (lookup_var, lookup_fun): Reversing assoc arguments.
(eval_init): New intrinsics. * hash.c (struct_hash): assoc_fun parameters reversed. (gethash, gethash_f, gethash_n): Likewise. * lib.c (assoc, assq): Reversing parameters. (find_package, acons_new, acons_new_l, aconsq_new): Reversing arguments to assoc adn assq. * lib.h (assoc, assq): Declarations updated. * match.c (dest_set, dest_bind, h_var, h_coll, h_parallel, h_fun, subst_vars, do_txeval, v_next, v_parallel, v_gather, v_collect, v_flatten, v_cat, v_output, v_filter, f_fun, match_funcall): Reversing arguments to assoc. * unwind.c (uw_get_func, uw_exception_subtype_p, uw_register_subtype): Reversing arguments to assoc. * txr.1: Blank sections created for new functions.
Diffstat (limited to 'lib.h')
-rw-r--r--lib.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib.h b/lib.h
index b5e1a15f..aa3f9567 100644
--- a/lib.h
+++ b/lib.h
@@ -487,8 +487,8 @@ val cobjp(val obj);
mem_t *cobj_handle(val cobj, val cls_sym);
val cptr(mem_t *ptr);
mem_t *cptr_get(val cptr);
-val assoc(val list, val key);
-val assq(val list, val key);
+val assoc(val key, val list);
+val assq(val key, val list);
val acons(val car, val cdr, val list);
val acons_new(val key, val value, val list);
val *acons_new_l(val key, val *new_p, val *list);