upd

qirt.c

@@ -4596,6 +4596,13 @@ qi_value_t *qi_pseudomethod_table_get(qi_state_t *state, qi_size_t pargc,
 
 #include "qistd.c"
 
+static qi_bool is_little_endian() {
+  unsigned int x = 1;
+  int e = (int) (((char *)&x)[0]);
+
+  return e? true: false;
+}
+
 static void qi_state_setup(qi_state_t *state) {
   QI_HASH_SEED = time(NULL);
 
@@ -4695,6 +4702,7 @@ static void qi_state_setup(qi_state_t *state) {
   qi_decl_const(state, "INFINITY", state->infinity);
   qi_decl_const(state, "__LIBQIRT",
                 qi_make_string(state, (char *)LIBQIRT_INFO));
+  qi_decl_const(state, "ENDIANNESS", qi_make_string(state, is_little_endian()? "little": "big"));
 
   qi_decl_const(state, "STDIN", state->_stdin);
   qi_decl_const(state, "STDERR", state->_stderr);