~ chicken-core (chicken-5) 49e22024c632a8fbe5a577ca1d95b7481ac2e868
commit 49e22024c632a8fbe5a577ca1d95b7481ac2e868 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Wed May 11 05:20:40 2011 -0400 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Wed May 11 05:20:40 2011 -0400 comment diff --git a/runtime.c b/runtime.c index 9ebac8ed..9034ab40 100644 --- a/runtime.c +++ b/runtime.c @@ -5595,6 +5595,7 @@ C_regparm C_word C_fcall C_i_check_list_2(C_word x, C_word loc) } +/*XXX these are not correctly named */ C_regparm C_word C_fcall C_i_foreign_char_argumentp(C_word x) { if((x & C_IMMEDIATE_TYPE_BITS) != C_CHARACTER_BITS)Trap