~ chicken-core (chicken-5) dd8f05163220c14e543d3d76b58f76842eab0bc7

commit dd8f05163220c14e543d3d76b58f76842eab0bc7
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Fri Jun 3 18:56:26 2016 +1200
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Fri Jun 3 19:15:15 2016 +1200

    Put provided library identifier properties on the core "provided" symbol
    
    Rather than the other way around, to avoid polluting the user-accessible
    symbol property namespace with implementation details.

diff --git a/runtime.c b/runtime.c
index e7c2871d..a7282f84 100644
--- a/runtime.c
+++ b/runtime.c
@@ -4549,12 +4549,12 @@ C_regparm C_word C_fcall C_a_i_provide(C_word **a, int c, C_word id)
     C_snprintf(buffer, C_header_size(str) + 1, C_text("%s"), (C_char *) C_data_pointer(str));
     C_dbg(C_text("debug"), C_text("providing %s...\n"), buffer);
   }
-  return C_a_i_putprop(a, 3, id, core_provided_symbol, C_SCHEME_TRUE);
+  return C_a_i_putprop(a, 3, core_provided_symbol, id, C_SCHEME_TRUE);
 }
 
 C_regparm C_word C_fcall C_i_providedp(C_word id)
 {
-  return C_i_getprop(id, core_provided_symbol, C_SCHEME_FALSE);
+  return C_i_getprop(core_provided_symbol, id, C_SCHEME_FALSE);
 }
 
 C_word C_halt(C_word msg)