2014-01-17 06:58:31 -05:00
|
|
|
/**
|
|
|
|
|
* See Copyright Notice in picrin.h
|
|
|
|
|
*/
|
|
|
|
|
|
2013-10-19 23:34:57 -04:00
|
|
|
#ifndef PAIR_H__
|
|
|
|
|
#define PAIR_H__
|
|
|
|
|
|
2014-01-17 22:41:39 -05:00
|
|
|
#if defined(__cplusplus)
|
|
|
|
|
extern "C" {
|
|
|
|
|
#endif
|
|
|
|
|
|
2013-10-19 23:34:57 -04:00
|
|
|
pic_value pic_cons(pic_state *, pic_value, pic_value);
|
|
|
|
|
pic_value pic_car(pic_state *, pic_value);
|
|
|
|
|
pic_value pic_cdr(pic_state *, pic_value);
|
|
|
|
|
|
2013-10-20 23:03:35 -04:00
|
|
|
bool pic_list_p(pic_state *, pic_value);
|
2013-10-19 23:34:57 -04:00
|
|
|
pic_value pic_list(pic_state *, size_t, ...);
|
2013-11-17 04:16:03 -05:00
|
|
|
pic_value pic_list_from_array(pic_state *, size_t, pic_value *);
|
2013-10-19 23:34:57 -04:00
|
|
|
|
2013-10-24 08:55:07 -04:00
|
|
|
int pic_length(pic_state *, pic_value);
|
2013-10-21 11:19:43 -04:00
|
|
|
pic_value pic_reverse(pic_state *, pic_value);
|
|
|
|
|
|
2013-10-19 23:34:57 -04:00
|
|
|
pic_value pic_assq(pic_state *, pic_value key, pic_value assoc);
|
2013-12-07 09:30:21 -05:00
|
|
|
pic_value pic_assoc(pic_state *, pic_value key, pic_value assoc);
|
2013-10-20 01:04:39 -04:00
|
|
|
pic_value pic_acons(pic_state *, pic_value key, pic_value val, pic_value assoc);
|
2013-10-19 23:34:57 -04:00
|
|
|
|
2013-11-26 05:42:13 -05:00
|
|
|
pic_value pic_caar(pic_state *, pic_value);
|
|
|
|
|
pic_value pic_cadr(pic_state *, pic_value);
|
|
|
|
|
pic_value pic_cdar(pic_state *, pic_value);
|
|
|
|
|
pic_value pic_cddr(pic_state *, pic_value);
|
|
|
|
|
|
2014-01-17 22:41:39 -05:00
|
|
|
#if defined(__cplusplus)
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
2013-10-19 23:34:57 -04:00
|
|
|
#endif
|
