~ 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