inline cxr functions
reorder functions following the guide by r7rs.
s/pic_record_record/pic_record_make_record/g