mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-07-07 05:06:37 +02:00
fixing order of platform/bsd feature registration
This commit is contained in:
parent
e41b998f66
commit
6c8ea93655
1 changed files with 1 additions and 1 deletions
2
eval.c
2
eval.c
|
@ -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
|
||||||
|
|
Loading…
Add table
Reference in a new issue