projects
/
chise
/
concord.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(cos_symbol_p): New prototype.
[chise/concord.git]
/
cos.h
diff --git
a/cos.h
b/cos.h
index
8e5822f
..
7411009
100644
(file)
--- a/
cos.h
+++ b/
cos.h
@@
-69,6
+69,8
@@
typedef struct COS_Symbol_ent* COS_Symbol;
COS_Symbol cos_intern (COS_object name);
COS_Symbol cos_intern (COS_object name);
+int cos_symbol_p (COS_object obj);
+
COS_String cos_symbol_name (COS_Symbol symbol);
extern COS_Symbol cos_Qnil;
COS_String cos_symbol_name (COS_Symbol symbol);
extern COS_Symbol cos_Qnil;
@@
-83,6
+85,9
@@
int cos_cons_p (COS_object obj);
COS_object cos_car (COS_Cons pair);
COS_object cos_cdr (COS_Cons pair);
COS_object cos_car (COS_Cons pair);
COS_object cos_cdr (COS_Cons pair);
+COS_Cons cos_assoc (COS_object key, COS_Cons alist);
+COS_object cos_alist_get (COS_Cons alist, COS_object key);
+
typedef struct COS_Container_ent COS_Container_ent;
typedef struct COS_Container_ent* COS_Container;
typedef struct COS_Container_ent COS_Container_ent;
typedef struct COS_Container_ent* COS_Container;