projects / OpenSPARC-T2-SAM / blame
| Commit | Line | Data |
|---|---|---|
| 920dae64 AT |
1 | #define gh_append2(a, b) scm_append(scm_listify(a, b, SCM_UNDEFINED)) |
| 2 | #define gh_apply(a, b) scm_apply(a, b, SCM_EOL) | |
| 3 | #define gh_bool2scm SCM_BOOL | |
| 4 | #define gh_boolean_p SCM_BOOLP | |
| 5 | #define gh_car SCM_CAR | |
| 6 | #define gh_cdr SCM_CDR | |
| 7 | #define gh_cons scm_cons | |
| 8 | #define gh_double2scm scm_make_real | |
| 9 | #define gh_int2scm scm_long2num | |
| 10 | #define gh_length(lst) scm_num2ulong(scm_length(lst), SCM_ARG1, FUNC_NAME) | |
| 11 | #define gh_list scm_listify | |
| 12 | #define gh_list_to_vector scm_vector | |
| 13 | #define gh_make_vector scm_make_vector | |
| 14 | #define gh_null_p SCM_NULLP | |
| 15 | #define gh_number_p SCM_NUMBERP | |
| 16 | #define gh_pair_p SCM_CONSP | |
| 17 | #define gh_scm2bool SCM_NFALSEP | |
| 18 | #define gh_scm2char SCM_CHAR | |
| 19 | #define gh_scm2double(a) scm_num2dbl(a, FUNC_NAME) | |
| 20 | #define gh_scm2int(a) scm_num2int(a, SCM_ARG1, FUNC_NAME) | |
| 21 | #define gh_scm2long(a) scm_num2long(a, SCM_ARG1, FUNC_NAME) | |
| 22 | #define gh_scm2newstr SWIG_Guile_scm2newstr | |
| 23 | #define gh_scm2ulong(a) scm_num2ulong(a, SCM_ARG1, FUNC_NAME) | |
| 24 | #define gh_ulong2scm scm_ulong2num | |
| 25 | #define gh_long2scm scm_long2num | |
| 26 | #define gh_str02scm scm_makfrom0str | |
| 27 | #define gh_string_p SCM_STRINGP | |
| 28 | #define gh_vector_length SCM_VECTOR_LENGTH | |
| 29 | #define gh_vector_p SCM_VECTORP | |
| 30 | #define gh_vector_ref scm_vector_ref | |
| 31 | #define gh_vector_set_x scm_vector_set_x | |
| 32 | #define gh_char2scm SCM_MAKE_CHAR |