Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-07 13:16:36 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fixing order of platform/bsd feature registration

Browse source
This commit is contained in:
Alex Shinn 2011-04-04 23:29:34 +09:00
parent e41b998f66
commit 6c8ea93655
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
eval.c
View file

@ -1661,10 +1661,10 @@ sexp sexp_load_standard_env (sexp ctx, sexp e, sexp version) {
sexp_env_define(ctx, e, sym=sexp_intern(ctx, "*shared-object-extension*", -1), sexp_env_define(ctx, e, sym=sexp_intern(ctx, "*shared-object-extension*", -1),
tmp=sexp_c_string(ctx, sexp_so_extension, -1)); tmp=sexp_c_string(ctx, sexp_so_extension, -1));
#endif #endif
tmp = sexp_list1(ctx, sym=sexp_intern(ctx, sexp_platform, -1));
#if SEXP_BSD #if SEXP_BSD
sexp_push(ctx, tmp, sym=sexp_intern(ctx, "bsd", -1)); sexp_push(ctx, tmp, sym=sexp_intern(ctx, "bsd", -1));
#endif #endif
tmp = sexp_list1(ctx, sym=sexp_intern(ctx, sexp_platform, -1));
#if SEXP_USE_DL #if SEXP_USE_DL
sexp_push(ctx, tmp, sym=sexp_intern(ctx, "dynamic-loading", -1)); sexp_push(ctx, tmp, sym=sexp_intern(ctx, "dynamic-loading", -1));
#endif #endif