/* $Header: /data/01/postgres/src/backend/tmp/RCS/utilities.h,v 1.4 1991/11/18 17:35:11 mer Exp $ */
extern LispValue vectori_long_to_list ARGS((int *vectori, int start, int n));
/* extern LispValue same ARGS((LispValue list1, LispValue list2)); */
extern LispValue last_element ARGS((LispValue list));
extern LispValue copy_seq_tree ARGS((LispValue seqtree));
extern base_log ARGS((double foo));
extern max ARGS((int foo, int bar));