CXR               181 src/list.c     #define	CXR(cname, sname, body)                 \
CXR               197 src/list.c     CXR(Scm_Car, "car", A)