projects
/
fw
/
altos
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
altos/scheme: swap BIGINT and STRING types
[fw/altos]
/
src
/
scheme
/
ao_scheme_poly.c
diff --git
a/src/scheme/ao_scheme_poly.c
b/src/scheme/ao_scheme_poly.c
index 0bb427b96b6bca570afbd1be41a81839c0ea638b..2ea221ec996e4404f726396fd096b7c4f0d8b507 100644
(file)
--- a/
src/scheme/ao_scheme_poly.c
+++ b/
src/scheme/ao_scheme_poly.c
@@
-24,10
+24,12
@@
static const struct ao_scheme_funcs ao_scheme_funcs[AO_SCHEME_NUM_TYPE] = {
.write = ao_scheme_cons_write,
.display = ao_scheme_cons_display,
},
.write = ao_scheme_cons_write,
.display = ao_scheme_cons_display,
},
- [AO_SCHEME_STRING] = {
- .write = ao_scheme_string_write,
- .display = ao_scheme_string_display,
+#ifdef AO_SCHEME_FEATURE_BIGINT
+ [AO_SCHEME_BIGINT] = {
+ .write = ao_scheme_bigint_write,
+ .display = ao_scheme_bigint_write,
},
},
+#endif
[AO_SCHEME_INT] = {
.write = ao_scheme_int_write,
.display = ao_scheme_int_write,
[AO_SCHEME_INT] = {
.write = ao_scheme_int_write,
.display = ao_scheme_int_write,
@@
-60,12
+62,10
@@
static const struct ao_scheme_funcs ao_scheme_funcs[AO_SCHEME_NUM_TYPE] = {
.write = ao_scheme_bool_write,
.display = ao_scheme_bool_write,
},
.write = ao_scheme_bool_write,
.display = ao_scheme_bool_write,
},
-#ifdef AO_SCHEME_FEATURE_BIGINT
- [AO_SCHEME_BIGINT] = {
- .write = ao_scheme_bigint_write,
- .display = ao_scheme_bigint_write,
+ [AO_SCHEME_STRING] = {
+ .write = ao_scheme_string_write,
+ .display = ao_scheme_string_display,
},
},
-#endif
#ifdef AO_SCHEME_FEATURE_FLOAT
[AO_SCHEME_FLOAT] = {
.write = ao_scheme_float_write,
#ifdef AO_SCHEME_FEATURE_FLOAT
[AO_SCHEME_FLOAT] = {
.write = ao_scheme_float_write,