[Cmucl-cvs] [git] CMU Common Lisp branch rtoy-extern-alien-name updated. 20f-34-g434078e
![](https://secure.gravatar.com/avatar/cc13150cabd87c26f35cb4b0ea78d66d.jpg?s=120&d=mm&r=g)
This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, rtoy-extern-alien-name has been updated via 434078e9e8a7b7b3069c0cf6e6f618807823f41a (commit) from a1946b35f37aef46677676e2696304ab6b405788 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 434078e9e8a7b7b3069c0cf6e6f618807823f41a Author: Raymond Toy <toy.raymond@gmail.com> Date: Thu Oct 9 23:46:14 2014 -0700 On sparc, use EXTERN_ALIEN_NAME too when printing out the error message. diff --git a/src/lisp/os-common.c b/src/lisp/os-common.c index ff9cffb..183d808 100755 --- a/src/lisp/os-common.c +++ b/src/lisp/os-common.c @@ -223,8 +223,9 @@ os_foreign_linkage_init(void) if (i == 0) { #if defined(sparc) if (type != LINKAGE_CODE_TYPE || strcmp(c_symbol_name, EXTERN_ALIEN_NAME("call_into_c"))) { - fprintf(stderr, "linkage_data is %s but expected call_into_c\n", - c_symbol_name); + fprintf(stderr, "linkage_data is %s but expected %s\n", + c_symbol_name, + EXTERN_ALIEN_NAME("call_into_c")); lose("First element of linkage_data is bogus.\n"); } arch_make_linkage_entry(i, (void*) call_into_c, 1); ----------------------------------------------------------------------- Summary of changes: src/lisp/os-common.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) hooks/post-receive -- CMU Common Lisp
participants (1)
-
Raymond Toy