libqirt/qistd.c

qi_value_t *__qistd0(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_value_t *__qistd1 = qi_index(state, qi_get(state, "l"), qi_make_number(state, 0));
return __qistd1;return state->nil;
}
inline static qi_list_t *__qistd4(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "l");
qi_list_data(list, 1) = qi_make_number(state, 1);
return list;
}
qi_value_t *__qistd2(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_value_t *__qistd3 = qi_call(state, qi_get(state, "slice"), __qistd4(state));
return __qistd3;return state->nil;
}
qi_value_t *__qistd5(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_decl(state, "y", qi_list_index(pargs, 1));
qi_value_t *__qistd6 = (_qi_truthy(state, qi_lt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_get(state, "x"): qi_get(state, "y"));
return __qistd6;return state->nil;
}
qi_value_t *__qistd7(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_decl(state, "y", qi_list_index(pargs, 1));
qi_value_t *__qistd8 = (_qi_truthy(state, qi_gt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_get(state, "x"): qi_get(state, "y"));
return __qistd8;return state->nil;
}
inline static qi_list_t *__qistd10(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd11(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_make_string(state, "list");
qi_list_data(list, 1) = qi_make_string(state, "string");
qi_list_data(list, 2) = qi_make_string(state, "bytes");
return list;
}
inline static qi_list_t *__qistd12(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd14(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd15(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_index(state, qi_get(state, "x"), qi_get(state, "i"));
return list;
}
inline static qi_list_t *__qistd16(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd18(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd19(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd21(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
qi_value_t *__qistd9(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd10(state)), qi_make_tuple(state, __qistd11(state))))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: list, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd12(state))));}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
qi_decl(state, "i", qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd14(state)), qi_make_number(state, 1)));
while (_qi_truthy(state, qi_ge(state, qi_get(state, "i"), qi_make_number(state, 0)))) {
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd15(state)));__continue13:;
qi_set(state, false, "i", qi_sub(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit13;
__break13:;
qi_old_scope(state);
__exit13:;
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd16(state)), qi_make_string(state, "string")))) {
qi_value_t *__qistd17 = qi_call(state, qi_get(state, "list_join"), __qistd18(state));
qi_old_scope(state);
return __qistd17;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd19(state)), qi_make_string(state, "bytes")))) {
qi_value_t *__qistd20 = qi_call(state, qi_get(state, "bytes"), __qistd21(state));
qi_old_scope(state);
qi_old_scope(state);
return __qistd20;}
qi_old_scope(state);
}
qi_old_scope(state);
qi_value_t *__qistd22 = qi_get(state, "r");
return __qistd22;
return state->nil;
}
inline static qi_list_t *__qistd24(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd25(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd26(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd27(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd28(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd29(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd30(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd31(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd34(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_get(state, "t");
qi_list_data(list, 1) = qi_get(state, "f");
qi_list_data(list, 2) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd33(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "range"), __qistd34(state));
return list;
}
inline static qi_list_t *__qistd36(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_get(state, "i");
return list;
}
qi_value_t *__qistd23(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 0));
qi_decl(state, "s", state->nil);
qi_decl(state, "t", state->nil);
qi_new_scope(state);
if (_qi_truthy(state, qi_ge(state, qi_call(state, qi_get(state, "len"), __qistd24(state)), qi_make_number(state, 3)))) {
(void)(qi_set(state, false, "t", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1))));
(void)(qi_set(state, false, "s", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 2))));
} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_ge(state, qi_call(state, qi_get(state, "len"), __qistd25(state)), qi_make_number(state, 2)))) {
(void)(qi_set(state, false, "t", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1))));
(void)(qi_set(state, false, "s", qi_make_number(state, 1)));
} else {
(void)(qi_set(state, false, "t", qi_get(state, "f")));
(void)(qi_set(state, false, "f", qi_make_number(state, 0)));
(void)(qi_set(state, false, "s", qi_make_number(state, 1)));
}
qi_old_scope(state);
}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd26(state)), qi_make_string(state, "number")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd27(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd28(state)), qi_make_string(state, "number")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd29(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd30(state)), qi_make_string(state, "number")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected third argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd31(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_gt(state, qi_get(state, "f"), qi_get(state, "t")))) {
qi_value_t *__qistd32 = qi_call(state, qi_get(state, "reverse"), __qistd33(state));
qi_old_scope(state);
return __qistd32;}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
qi_decl(state, "i", qi_get(state, "f"));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_get(state, "t")))) {
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd36(state)));__continue35:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), qi_get(state, "s")));
qi_old_scope(state);
}
goto __exit35;
__break35:;
qi_old_scope(state);
__exit35:;
qi_old_scope(state);
qi_value_t *__qistd37 = qi_get(state, "r");
return __qistd37;
return state->nil;
}
qi_value_t *__qistd38(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "file", qi_list_index(pargs, 0));
qi_value_t *__qistd39 = qi_call(state, qi_index(state, qi_get(state, "file"), qi_make_string(state, "rewind")), NULL);
return __qistd39;return state->nil;
}
inline static qi_list_t *__qistd41(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "filename");
qi_list_data(list, 1) = qi_make_string(state, "r");
return list;
}
inline static qi_list_t *__qistd43(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "file");
return list;
}
void __qistd42(qi_state_t *state) {
(void)(qi_call(state, qi_get(state, "fclose"), __qistd43(state)));
}
inline static qi_list_t *__qistd46(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "file");
qi_list_data(list, 1) = qi_negate(state, qi_make_number(state, 1));
return list;
}
inline static qi_list_t *__qistd45(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "fread"), __qistd46(state));
return list;
}
qi_value_t *__qistd40(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "filename", qi_list_index(pargs, 0));
qi_decl_const(state, "file", qi_call(state, qi_get(state, "fopen"), __qistd41(state)));
qi_add_defer(state, -1, __qistd42);
qi_value_t *__qistd44 = qi_call(state, qi_get(state, "str"), __qistd45(state));
return __qistd44;
return state->nil;
}
inline static qi_list_t *__qistd48(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "filename");
qi_list_data(list, 1) = qi_make_string(state, "w");
return list;
}
inline static qi_list_t *__qistd50(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "file");
return list;
}
void __qistd49(qi_state_t *state) {
(void)(qi_call(state, qi_get(state, "fclose"), __qistd50(state)));
}
inline static qi_list_t *__qistd52(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "data");
return list;
}
inline static qi_list_t *__qistd51(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "file");
qi_list_data(list, 1) = qi_call(state, qi_get(state, "bytes"), __qistd52(state));
return list;
}
qi_value_t *__qistd47(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "filename", qi_list_index(pargs, 0));
qi_decl(state, "data", qi_list_index(pargs, 1));
qi_decl_const(state, "file", qi_call(state, qi_get(state, "fopen"), __qistd48(state)));
qi_add_defer(state, -1, __qistd49);
(void)(qi_call(state, qi_get(state, "fwrite"), __qistd51(state)));
return state->nil;
}
inline static qi_list_t *__qistd54(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "name");
return list;
}
inline static qi_list_t *__qistd55(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "name");
return list;
}
qi_value_t *__qistd53(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "name", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd54(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd55(state))));}
qi_old_scope(state);
qi_bool b = qi_find(state, qi_get(state, "name")->value.string) != NULL;
return qi_make_boolean(state, b);
return state->nil;
}
inline static qi_list_t *__qistd58(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd59(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd61(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd62(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "l");
qi_list_data(list, 1) = qi_get(state, "i");
return list;
}
qi_value_t *__qistd56(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "first", pargc >= 3? qi_list_index(pargs, 2): state->_false);
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_decl(state, "x", qi_list_index(pargs, 1));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd58(state)), qi_make_string(state, "list")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd59(state))));}
qi_old_scope(state);
__label57:;
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd61(state))))) {
qi_new_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_index(state, qi_get(state, "l"), qi_get(state, "i")), qi_get(state, "x")))) {
(void)(qi_call(state, qi_get(state, "list_delete"), __qistd62(state)));
qi_new_scope(state);
if (_qi_truthy(state, qi_get(state, "first"))) {
qi_old_scope(state);
qi_old_scope(state);
goto __break60;}
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
goto __label57;
}
qi_old_scope(state);
__continue60:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit60;
__break60:;
qi_old_scope(state);
__exit60:;
qi_old_scope(state);
return state->nil;
}
inline static qi_list_t *__qistd64(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd65(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd66(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd67(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd68(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd71(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd72(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
qi_value_t *__qistd63(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd64(state)), qi_make_string(state, "list")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argumient to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd65(state))));}
qi_old_scope(state);
qi_decl(state, "r", state->empty_string);
qi_decl(state, "s", state->nil);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd66(state)), qi_make_number(state, 1)))) {
(void)(qi_set(state, false, "s", state->empty_string));} else {
(void)(qi_set(state, false, "s", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd67(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd68(state))));}
qi_old_scope(state);
qi_decl(state, "first", state->_true);
qi_new_scope(state);
qi_value_t *__qistd70 = qi_iter(state, qi_get(state, "l"));
qi_decl(state, "x", state->nil);
for (qi_size_t length = _qi_length(state, __qistd70), i = 0; i < length; i++) {
qi_set(state, false, "x", qi_index(state, __qistd70, qi_make_number(state, i)));
qi_new_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd71(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected sequence item to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd72(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_and(state, qi_not_equals(state, qi_get(state, "s"), state->empty_string), qi_not(state, qi_get(state, "first"))))) {
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_get(state, "s"))));}
qi_old_scope(state);
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_get(state, "x"))));
(void)(qi_set(state, false, "first", state->_false));
__continue69:;
qi_old_scope(state);
}
goto __exit69;
__break69:;
qi_old_scope(state);
__exit69:;
qi_old_scope(state);
qi_value_t *__qistd73 = qi_get(state, "r");
return __qistd73;
return state->nil;
}
inline static qi_list_t *__qistd75(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd76(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd77(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "i");
return list;
}
inline static qi_list_t *__qistd78(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "i");
return list;
}
inline static qi_list_t *__qistd79(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "l");
qi_list_data(list, 1) = qi_get(state, "i");
return list;
}
qi_value_t *__qistd74(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "i", qi_list_index(pargs, 1));
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd75(state)), qi_make_string(state, "list")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd76(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd77(state)), qi_make_string(state, "number")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd78(state))));}
qi_old_scope(state);
qi_decl(state, "x", qi_index(state, qi_get(state, "l"), qi_get(state, "i")));
(void)(qi_call(state, qi_get(state, "list_delete"), __qistd79(state)));
qi_value_t *__qistd80 = qi_get(state, "x");
return __qistd80;
return state->nil;
}
qi_value_t *__qistd81(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_decl(state, "y", qi_list_index(pargs, 1));
qi_value_t *__qistd82 = (_qi_truthy(state, qi_gt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_make_number(state, 1): (_qi_truthy(state, qi_lt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_negate(state, qi_make_number(state, 1)): qi_make_number(state, 0)));
return __qistd82;return state->nil;
}
inline static qi_list_t *__qistd84(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd85(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd86(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cmp");
return list;
}
inline static qi_list_t *__qistd87(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cmp");
return list;
}
inline static qi_list_t *__qistd88(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd90(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd93(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_index(state, qi_get(state, "l"), qi_get(state, "j"));
qi_list_data(list, 1) = qi_index(state, qi_get(state, "l"), qi_add(state, qi_get(state, "j"), qi_make_number(state, 1)));
return list;
}
qi_value_t *__qistd83(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "cmp", pargc >= 2? qi_list_index(pargs, 1): qi_get(state, "__cmp"));
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd84(state)), qi_make_string(state, "list")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd85(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd86(state)), qi_make_string(state, "function")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd87(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd88(state)), qi_make_number(state, 0)))) {
qi_value_t *__qistd89 = qi_get(state, "l");
qi_old_scope(state);
return __qistd89;}
qi_old_scope(state);
qi_decl(state, "z", qi_call(state, qi_get(state, "len"), __qistd90(state)));
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_sub(state, qi_get(state, "z"), qi_make_number(state, 1))))) {
qi_new_scope(state);
qi_new_scope(state);
qi_decl(state, "j", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "j"), qi_sub(state, qi_sub(state, qi_get(state, "z"), qi_make_number(state, 1)), qi_get(state, "i"))))) {
qi_new_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_gt(state, qi_call(state, qi_get(state, "cmp"), __qistd93(state)), qi_make_number(state, 0)))) {
qi_decl_const(state, "tmp", qi_index(state, qi_get(state, "l"), qi_get(state, "j")));
(void)(qi_index_set(state, false, qi_get(state, "l"), qi_get(state, "j"), qi_index(state, qi_get(state, "l"), qi_add(state, qi_get(state, "j"), qi_make_number(state, 1)))));
(void)(qi_index_set(state, false, qi_get(state, "l"), qi_add(state, qi_get(state, "j"), qi_make_number(state, 1)), qi_get(state, "tmp")));
}
qi_old_scope(state);
__continue92:;
qi_set(state, false, "j", qi_add(state, qi_get(state, "j"), state->one));
qi_old_scope(state);
}
goto __exit92;
__break92:;
qi_old_scope(state);
__exit92:;
qi_old_scope(state);
__continue91:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit91;
__break91:;
qi_old_scope(state);
__exit91:;
qi_old_scope(state);
qi_value_t *__qistd94 = qi_get(state, "l");
return __qistd94;
return state->nil;
}
inline static qi_list_t *__qistd96(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd98(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "l");
qi_list_data(list, 1) = qi_get(state, "cmp");
return list;
}
qi_value_t *__qistd95(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "cmp", pargc >= 2? qi_list_index(pargs, 1): qi_get(state, "__cmp"));
qi_decl(state, "l", qi_list_index(pargs, 0));
(void)(qi_set(state, false, "l", qi_call(state, qi_get(state, "list_copy"), __qistd96(state))));
qi_value_t *__qistd97 = qi_call(state, qi_get(state, "list_sort"), __qistd98(state));
return __qistd97;
return state->nil;
}
inline static qi_list_t *__qistd100(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd101(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd102(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd103(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "l");
qi_list_data(list, 1) = qi_make_number(state, 0);
return list;
}
qi_value_t *__qistd99(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd100(state)), qi_make_string(state, "list")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd101(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_call(state, qi_get(state, "is_empty"), __qistd102(state)))) {
qi_throw(state, qi_make_string(state, "shift from empty list"));}
qi_old_scope(state);
qi_decl(state, "a", qi_index(state, qi_get(state, "l"), qi_make_number(state, 0)));
(void)(qi_call(state, qi_get(state, "list_delete"), __qistd103(state)));
qi_value_t *__qistd104 = qi_get(state, "a");
return __qistd104;
return state->nil;
}
inline static qi_list_t *__qistd106(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_get(state, "l");
qi_list_data(list, 1) = qi_make_number(state, 0);
qi_list_data(list, 2) = qi_get(state, "x");
return list;
}
qi_value_t *__qistd105(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_decl(state, "x", qi_list_index(pargs, 1));
(void)(qi_call(state, qi_get(state, "list_insert"), __qistd106(state)));
return state->nil;
}
inline static qi_list_t *__qistd108(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd109(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(4);
qi_list_data(list, 0) = qi_make_string(state, "list");
qi_list_data(list, 1) = qi_make_string(state, "string");
qi_list_data(list, 2) = qi_make_string(state, "bytes");
qi_list_data(list, 3) = qi_make_string(state, "ustr");
return list;
}
inline static qi_list_t *__qistd110(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd111(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd112(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd113(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd114(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd116(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd117(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_index(state, qi_get(state, "l"), qi_get(state, "i"));
return list;
}
inline static qi_list_t *__qistd118(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd119(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd120(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd121(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd122(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd123(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd124(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd126(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd127(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_index(state, qi_get(state, "l"), qi_get(state, "i"));
return list;
}
inline static qi_list_t *__qistd128(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd130(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd131(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd133(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd134(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd136(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
qi_value_t *__qistd107(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd108(state)), qi_make_tuple(state, __qistd109(state))))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: list, string, bytes or ustr, but got: "), qi_call(state, qi_get(state, "type"), __qistd110(state))));}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd111(state)), qi_make_number(state, 2)))) {
qi_decl(state, "f", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd112(state)), qi_make_string(state, "number")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd113(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_lt(state, qi_get(state, "f"), qi_make_number(state, 0)))) {
(void)(qi_set(state, false, "f", qi_add(state, qi_get(state, "f"), qi_call(state, qi_get(state, "len"), __qistd114(state)))));}
qi_old_scope(state);
qi_new_scope(state);
qi_decl(state, "i", qi_get(state, "f"));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd116(state))))) {
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd117(state)));__continue115:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit115;
__break115:;
qi_old_scope(state);
__exit115:;
qi_old_scope(state);
} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd118(state)), qi_make_number(state, 3)))) {
qi_decl(state, "f", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)));
qi_decl(state, "t", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 2)));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd119(state)), qi_make_string(state, "number")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd120(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd121(state)), qi_make_string(state, "number")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected third argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd122(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_lt(state, qi_get(state, "f"), qi_make_number(state, 0)))) {
(void)(qi_set(state, false, "f", qi_add(state, qi_get(state, "f"), qi_call(state, qi_get(state, "len"), __qistd123(state)))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_lt(state, qi_get(state, "t"), qi_make_number(state, 0)))) {
(void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_call(state, qi_get(state, "len"), __qistd124(state)))));}
qi_old_scope(state);
qi_new_scope(state);
qi_decl(state, "i", qi_get(state, "f"));
while (_qi_truthy(state, qi_and(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd126(state))), qi_le(state, qi_get(state, "i"), qi_get(state, "t"))))) {
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd127(state)));__continue125:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit125;
__break125:;
qi_old_scope(state);
__exit125:;
qi_old_scope(state);
}
qi_old_scope(state);
}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd128(state)), qi_make_string(state, "string")))) {
qi_value_t *__qistd129 = qi_call(state, qi_get(state, "list_join"), __qistd130(state));
qi_old_scope(state);
return __qistd129;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd131(state)), qi_make_string(state, "bytes")))) {
qi_value_t *__qistd132 = qi_call(state, qi_get(state, "bytes"), __qistd133(state));
qi_old_scope(state);
qi_old_scope(state);
return __qistd132;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd134(state)), qi_make_string(state, "ustr")))) {
qi_value_t *__qistd135 = qi_call(state, qi_get(state, "ustr"), __qistd136(state));
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
return __qistd135;}
qi_old_scope(state);
}
qi_old_scope(state);
}
qi_old_scope(state);
qi_value_t *__qistd137 = qi_get(state, "r");
return __qistd137;
return state->nil;
}
inline static qi_list_t *__qistd139(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd140(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd141(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd142(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "p");
return list;
}
inline static qi_list_t *__qistd146(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "p");
return list;
}
inline static qi_list_t *__qistd145(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_make_number(state, 0);
qi_list_data(list, 2) = qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd146(state)), qi_make_number(state, 1));
return list;
}
qi_value_t *__qistd138(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "p", qi_list_index(pargs, 1));
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd139(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd140(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_lt(state, qi_call(state, qi_get(state, "len"), __qistd141(state)), qi_call(state, qi_get(state, "len"), __qistd142(state))))) {
qi_value_t *__qistd143 = state->_false;
qi_old_scope(state);
return __qistd143;}
qi_old_scope(state);
qi_value_t *__qistd144 = qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd145(state)), qi_get(state, "p"));
return __qistd144;
return state->nil;
}
inline static qi_list_t *__qistd148(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd149(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd150(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd151(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "p");
return list;
}
inline static qi_list_t *__qistd155(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd156(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "p");
return list;
}
inline static qi_list_t *__qistd154(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd155(state)), qi_call(state, qi_get(state, "len"), __qistd156(state)));
return list;
}
qi_value_t *__qistd147(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "p", qi_list_index(pargs, 1));
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd148(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd149(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_lt(state, qi_call(state, qi_get(state, "len"), __qistd150(state)), qi_call(state, qi_get(state, "len"), __qistd151(state))))) {
qi_value_t *__qistd152 = state->_false;
qi_old_scope(state);
return __qistd152;}
qi_old_scope(state);
qi_value_t *__qistd153 = qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd154(state)), qi_get(state, "p"));
return __qistd153;
return state->nil;
}
inline static qi_list_t *__qistd158(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd160(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd161(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd162(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd163(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "d");
return list;
}
inline static qi_list_t *__qistd164(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd166(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd168(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "d");
return list;
}
inline static qi_list_t *__qistd167(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_get(state, "i");
qi_list_data(list, 2) = qi_sub(state, qi_add(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd168(state))), qi_make_number(state, 1));
return list;
}
inline static qi_list_t *__qistd169(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd170(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "d");
return list;
}
inline static qi_list_t *__qistd171(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_get(state, "t");
return list;
}
qi_value_t *__qistd157(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_or(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd158(state)), qi_make_number(state, 1)), qi_equals(state, qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)), state->empty_string)))) {
qi_value_t *__qistd159 = qi_call(state, qi_get(state, "list"), __qistd160(state));
qi_old_scope(state);
return __qistd159;}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd161(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be:!string, but got: "), qi_call(state, qi_get(state, "type"), __qistd162(state))));}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_decl(state, "d", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd163(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd164(state))));}
qi_old_scope(state);
qi_decl(state, "t", state->empty_string);
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd166(state))))) {
qi_new_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd167(state)), qi_get(state, "d")))) {
(void)(qi_call(state, qi_get(state, "list_push"), __qistd169(state)));
(void)(qi_set(state, false, "t", state->empty_string));
(void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd170(state)), qi_make_number(state, 1)))));
qi_old_scope(state);
goto __continue165;
}
qi_old_scope(state);
(void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
__continue165:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit165;
__break165:;
qi_old_scope(state);
__exit165:;
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_get(state, "t"), state->empty_string))) {
(void)(qi_call(state, qi_get(state, "list_push"), __qistd171(state)));}
qi_old_scope(state);
qi_value_t *__qistd172 = qi_get(state, "r");
return __qistd172;
return state->nil;
}
inline static qi_list_t *__qistd174(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd175(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd176(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
inline static qi_list_t *__qistd177(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
inline static qi_list_t *__qistd178(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "b");
return list;
}
inline static qi_list_t *__qistd179(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "b");
return list;
}
inline static qi_list_t *__qistd181(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd183(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
inline static qi_list_t *__qistd182(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_get(state, "i");
qi_list_data(list, 2) = qi_sub(state, qi_add(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd183(state))), qi_make_number(state, 1));
return list;
}
inline static qi_list_t *__qistd184(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
qi_value_t *__qistd173(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "b", qi_list_index(pargs, 2));
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_decl(state, "w", qi_list_index(pargs, 1));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd174(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd175(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd176(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd177(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd178(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected third argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd179(state))));}
qi_old_scope(state);
qi_decl(state, "r", state->empty_string);
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd181(state))))) {
qi_new_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd182(state)), qi_get(state, "w")))) {
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_get(state, "b"))));
(void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd184(state)), qi_make_number(state, 1)))));
qi_old_scope(state);
goto __continue180;
}
qi_old_scope(state);
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
__continue180:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit180;
__break180:;
qi_old_scope(state);
__exit180:;
qi_old_scope(state);
qi_value_t *__qistd185 = qi_get(state, "r");
return __qistd185;
return state->nil;
}
inline static qi_list_t *__qistd187(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd188(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd191(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_get(state, "k");
return list;
}
qi_value_t *__qistd186(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "t", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd187(state)), qi_make_string(state, "table")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: table, but got: "), qi_call(state, qi_get(state, "type"), __qistd188(state))));}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
qi_value_t *__qistd190 = qi_iter(state, qi_get(state, "t"));
qi_decl(state, "k", state->nil);
for (qi_size_t length = _qi_length(state, __qistd190), i = 0; i < length; i++) {
qi_set(state, false, "k", qi_index(state, __qistd190, qi_make_number(state, i)));
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd191(state)));__continue189:;
qi_old_scope(state);
}
goto __exit189;
__break189:;
qi_old_scope(state);
__exit189:;
qi_old_scope(state);
qi_value_t *__qistd192 = qi_get(state, "r");
return __qistd192;
return state->nil;
}
inline static qi_list_t *__qistd194(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd195(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "t");
return list;
}
inline static qi_list_t *__qistd198(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_index(state, qi_get(state, "t"), qi_get(state, "k"));
return list;
}
qi_value_t *__qistd193(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "t", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd194(state)), qi_make_string(state, "table")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: table, but got: "), qi_call(state, qi_get(state, "type"), __qistd195(state))));}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
qi_value_t *__qistd197 = qi_iter(state, qi_get(state, "t"));
qi_decl(state, "k", state->nil);
for (qi_size_t length = _qi_length(state, __qistd197), i = 0; i < length; i++) {
qi_set(state, false, "k", qi_index(state, __qistd197, qi_make_number(state, i)));
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd198(state)));__continue196:;
qi_old_scope(state);
}
goto __exit196;
__break196:;
qi_old_scope(state);
__exit196:;
qi_old_scope(state);
qi_value_t *__qistd199 = qi_get(state, "r");
return __qistd199;
return state->nil;
}
inline static qi_list_t *__qistd201(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd202(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd203(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd204(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(4);
qi_list_data(list, 0) = qi_make_string(state, "list");
qi_list_data(list, 1) = qi_make_string(state, "tuple");
qi_list_data(list, 2) = qi_make_string(state, "string");
qi_list_data(list, 3) = qi_make_string(state, "bytes");
return list;
}
inline static qi_list_t *__qistd205(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd206(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd209(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "xs");
qi_list_data(list, 1) = qi_make_number(state, 1);
return list;
}
inline static qi_list_t *__qistd210(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd211(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd213(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd214(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd216(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd217(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd219(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
qi_value_t *__qistd200(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 0));
qi_decl(state, "xs", qi_list_index(pargs, 1));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd201(state)), qi_make_string(state, "function")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd202(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd203(state)), qi_make_tuple(state, __qistd204(state))))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: list, tuple, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd205(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd206(state)), qi_make_number(state, 0)))) {
qi_throw(state, qi_make_string(state, "cannot reduce empty list"));}
qi_old_scope(state);
(void)(qi_set(state, false, "r", qi_index(state, qi_get(state, "xs"), qi_make_number(state, 0))));
qi_new_scope(state);
qi_value_t *__qistd208 = qi_iter(state, qi_call(state, qi_get(state, "slice"), __qistd209(state)));
qi_decl(state, "x", state->nil);
for (qi_size_t length = _qi_length(state, __qistd208), i = 0; i < length; i++) {
qi_set(state, false, "x", qi_index(state, __qistd208, qi_make_number(state, i)));
qi_new_scope(state);
(void)(qi_set(state, false, "r", qi_call(state, qi_get(state, "f"), __qistd210(state))));__continue207:;
qi_old_scope(state);
}
goto __exit207;
__break207:;
qi_old_scope(state);
__exit207:;
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd211(state)), qi_make_string(state, "tuple")))) {
qi_value_t *__qistd212 = qi_call(state, qi_get(state, "tuple"), __qistd213(state));
qi_old_scope(state);
return __qistd212;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd214(state)), qi_make_string(state, "string")))) {
qi_value_t *__qistd215 = qi_call(state, qi_get(state, "list_join"), __qistd216(state));
qi_old_scope(state);
qi_old_scope(state);
return __qistd215;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd217(state)), qi_make_string(state, "bytes")))) {
qi_value_t *__qistd218 = qi_call(state, qi_get(state, "bytes"), __qistd219(state));
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
return __qistd218;}
qi_old_scope(state);
}
qi_old_scope(state);
}
qi_old_scope(state);
qi_value_t *__qistd220 = qi_get(state, "r");
return __qistd220;
return state->nil;
}
qi_value_t *__qistd224(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_decl(state, "y", qi_list_index(pargs, 1));
qi_value_t *__qistd225 = qi_add(state, qi_get(state, "x"), qi_get(state, "y"));
return __qistd225;return state->nil;
}
inline static qi_list_t *__qistd223(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd224, NULL);
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd221(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd222 = qi_call(state, qi_get(state, "reduce"), __qistd223(state));
return __qistd222;return state->nil;
}
qi_value_t *__qistd229(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_decl(state, "y", qi_list_index(pargs, 1));
qi_value_t *__qistd230 = qi_mul(state, qi_get(state, "x"), qi_get(state, "y"));
return __qistd230;return state->nil;
}
inline static qi_list_t *__qistd228(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd229, NULL);
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd226(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd227 = qi_call(state, qi_get(state, "reduce"), __qistd228(state));
return __qistd227;return state->nil;
}
qi_value_t *__qistd234(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_decl(state, "y", qi_list_index(pargs, 1));
qi_value_t *__qistd235 = qi_and(state, qi_get(state, "x"), qi_get(state, "y"));
return __qistd235;return state->nil;
}
inline static qi_list_t *__qistd233(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd234, NULL);
qi_list_data(list, 1) = qi_get(state, "l");
return list;
}
qi_value_t *__qistd231(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_value_t *__qistd232 = qi_call(state, qi_get(state, "reduce"), __qistd233(state));
return __qistd232;return state->nil;
}
qi_value_t *__qistd239(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "x", qi_list_index(pargs, 0));
qi_decl(state, "y", qi_list_index(pargs, 1));
qi_value_t *__qistd240 = qi_or(state, qi_get(state, "x"), qi_get(state, "y"));
return __qistd240;return state->nil;
}
inline static qi_list_t *__qistd238(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd239, NULL);
qi_list_data(list, 1) = qi_get(state, "l");
return list;
}
qi_value_t *__qistd236(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_value_t *__qistd237 = qi_call(state, qi_get(state, "reduce"), __qistd238(state));
return __qistd237;return state->nil;
}
inline static qi_list_t *__qistd242(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd243(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd244(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd245(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(4);
qi_list_data(list, 0) = qi_make_string(state, "list");
qi_list_data(list, 1) = qi_make_string(state, "tuple");
qi_list_data(list, 2) = qi_make_string(state, "string");
qi_list_data(list, 3) = qi_make_string(state, "bytes");
return list;
}
inline static qi_list_t *__qistd246(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd247(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd252(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd251(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_call(state, qi_get(state, "f"), __qistd252(state));
return list;
}
inline static qi_list_t *__qistd253(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd255(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd256(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd258(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd259(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd261(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
qi_value_t *__qistd241(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 0));
qi_decl(state, "xs", qi_list_index(pargs, 1));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd242(state)), qi_make_string(state, "function")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd243(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd244(state)), qi_make_tuple(state, __qistd245(state))))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: list, tuple, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd246(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd247(state)), qi_make_number(state, 0)))) {
qi_value_t *__qistd248 = qi_get(state, "xs");
qi_old_scope(state);
return __qistd248;}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
qi_value_t *__qistd250 = qi_iter(state, qi_get(state, "xs"));
qi_decl(state, "x", state->nil);
for (qi_size_t length = _qi_length(state, __qistd250), i = 0; i < length; i++) {
qi_set(state, false, "x", qi_index(state, __qistd250, qi_make_number(state, i)));
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd251(state)));__continue249:;
qi_old_scope(state);
}
goto __exit249;
__break249:;
qi_old_scope(state);
__exit249:;
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd253(state)), qi_make_string(state, "tuple")))) {
qi_value_t *__qistd254 = qi_call(state, qi_get(state, "tuple"), __qistd255(state));
qi_old_scope(state);
return __qistd254;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd256(state)), qi_make_string(state, "string")))) {
qi_value_t *__qistd257 = qi_call(state, qi_get(state, "list_join"), __qistd258(state));
qi_old_scope(state);
qi_old_scope(state);
return __qistd257;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd259(state)), qi_make_string(state, "bytes")))) {
qi_value_t *__qistd260 = qi_call(state, qi_get(state, "bytes"), __qistd261(state));
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
return __qistd260;}
qi_old_scope(state);
}
qi_old_scope(state);
}
qi_old_scope(state);
qi_value_t *__qistd262 = qi_get(state, "r");
return __qistd262;
return state->nil;
}
inline static qi_list_t *__qistd264(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd265(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
inline static qi_list_t *__qistd266(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd267(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(4);
qi_list_data(list, 0) = qi_make_string(state, "list");
qi_list_data(list, 1) = qi_make_string(state, "tuple");
qi_list_data(list, 2) = qi_make_string(state, "string");
qi_list_data(list, 3) = qi_make_string(state, "bytes");
return list;
}
inline static qi_list_t *__qistd268(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd269(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd273(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd274(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_get(state, "x");
return list;
}
inline static qi_list_t *__qistd275(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd277(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd278(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd280(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
inline static qi_list_t *__qistd281(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "xs");
return list;
}
inline static qi_list_t *__qistd283(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "r");
return list;
}
qi_value_t *__qistd263(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 0));
qi_decl(state, "xs", qi_list_index(pargs, 1));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd264(state)), qi_make_string(state, "function")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd265(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd266(state)), qi_make_tuple(state, __qistd267(state))))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: list, tuple, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd268(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd269(state)), qi_make_number(state, 0)))) {
qi_value_t *__qistd270 = qi_get(state, "xs");
qi_old_scope(state);
return __qistd270;}
qi_old_scope(state);
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
qi_value_t *__qistd272 = qi_iter(state, qi_get(state, "xs"));
qi_decl(state, "x", state->nil);
for (qi_size_t length = _qi_length(state, __qistd272), i = 0; i < length; i++) {
qi_set(state, false, "x", qi_index(state, __qistd272, qi_make_number(state, i)));
qi_new_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_call(state, qi_get(state, "f"), __qistd273(state)))) {
(void)(qi_call(state, qi_get(state, "list_push"), __qistd274(state)));}
qi_old_scope(state);
__continue271:;
qi_old_scope(state);
}
goto __exit271;
__break271:;
qi_old_scope(state);
__exit271:;
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd275(state)), qi_make_string(state, "tuple")))) {
qi_value_t *__qistd276 = qi_call(state, qi_get(state, "tuple"), __qistd277(state));
qi_old_scope(state);
return __qistd276;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd278(state)), qi_make_string(state, "string")))) {
qi_value_t *__qistd279 = qi_call(state, qi_get(state, "list_join"), __qistd280(state));
qi_old_scope(state);
qi_old_scope(state);
return __qistd279;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd281(state)), qi_make_string(state, "bytes")))) {
qi_value_t *__qistd282 = qi_call(state, qi_get(state, "bytes"), __qistd283(state));
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
return __qistd282;}
qi_old_scope(state);
}
qi_old_scope(state);
}
qi_old_scope(state);
qi_value_t *__qistd284 = qi_get(state, "r");
return __qistd284;
return state->nil;
}
inline static qi_list_t *__qistd287(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd288(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd289(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
inline static qi_list_t *__qistd290(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
inline static qi_list_t *__qistd292(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd293(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
inline static qi_list_t *__qistd296(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "w");
return list;
}
inline static qi_list_t *__qistd295(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_get(state, "i");
qi_list_data(list, 2) = qi_sub(state, qi_add(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd296(state))), qi_make_number(state, 1));
return list;
}
qi_value_t *__qistd285(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_decl(state, "w", qi_list_index(pargs, 1));
qi_new_scope(state);
if (_qi_truthy(state, qi_or(state, qi_equals(state, qi_get(state, "s"), state->empty_string), qi_equals(state, qi_get(state, "w"), state->empty_string)))) {
qi_value_t *__qistd286 = qi_negate(state, qi_make_number(state, 1));
qi_old_scope(state);
return __qistd286;}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd287(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd288(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd289(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd290(state))));}
qi_old_scope(state);
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd292(state))))) {
qi_new_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_and(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd293(state)), qi_make_number(state, 1)), qi_equals(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_get(state, "w"))))) {
qi_value_t *__qistd294 = qi_get(state, "i");
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
return __qistd294;} else {
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd295(state)), qi_get(state, "w")))) {
qi_value_t *__qistd297 = qi_get(state, "i");
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
qi_old_scope(state);
return __qistd297;}
qi_old_scope(state);
}
qi_old_scope(state);
__continue291:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit291;
__break291:;
qi_old_scope(state);
__exit291:;
qi_old_scope(state);
qi_value_t *__qistd298 = qi_negate(state, qi_make_number(state, 1));
return __qistd298;
return state->nil;
}
inline static qi_list_t *__qistd300(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd301(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd302(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cs");
return list;
}
inline static qi_list_t *__qistd303(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cs");
return list;
}
inline static qi_list_t *__qistd306(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd308(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_get(state, "i");
return list;
}
qi_value_t *__qistd299(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_decl(state, "cs", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, " \t\n\r\x0b\x0c"));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd300(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd301(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd302(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd303(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_get(state, "s"), state->empty_string))) {
qi_value_t *__qistd304 = qi_get(state, "s");
qi_old_scope(state);
return __qistd304;}
qi_old_scope(state);
qi_decl(state, "i", state->nil);
qi_new_scope(state);
(void)(qi_set(state, false, "i", qi_make_number(state, 0)));while (_qi_truthy(state, qi_and(state, qi_in(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_get(state, "cs")), qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd306(state)))))) {
qi_new_scope(state);
__continue305:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit305;
__break305:;
qi_old_scope(state);
__exit305:;
qi_old_scope(state);
qi_value_t *__qistd307 = qi_call(state, qi_get(state, "slice"), __qistd308(state));
return __qistd307;
return state->nil;
}
inline static qi_list_t *__qistd310(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd311(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd312(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cs");
return list;
}
inline static qi_list_t *__qistd313(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cs");
return list;
}
inline static qi_list_t *__qistd316(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd319(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd318(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(3);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_make_number(state, 0);
qi_list_data(list, 2) = qi_sub(state, qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd319(state)), qi_get(state, "k")), qi_make_number(state, 1));
return list;
}
qi_value_t *__qistd309(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_decl(state, "cs", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, " \t\n\r\x0b\x0c"));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd310(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd311(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd312(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd313(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_get(state, "s"), state->empty_string))) {
qi_value_t *__qistd314 = qi_get(state, "s");
qi_old_scope(state);
return __qistd314;}
qi_old_scope(state);
qi_decl(state, "i", state->nil);
qi_decl(state, "k", state->nil);
qi_new_scope(state);
(void)((qi_set(state, false, "k", qi_make_number(state, 0)), qi_set(state, false, "i", qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd316(state)), qi_make_number(state, 1)))));while (_qi_truthy(state, qi_and(state, qi_in(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_get(state, "cs")), qi_ge(state, qi_get(state, "i"), qi_make_number(state, 0))))) {
qi_new_scope(state);
(void)(qi_set(state, false, "i", qi_sub(state, qi_get(state, "i"), state->one)));__continue315:;
qi_set(state, false, "k", qi_add(state, qi_get(state, "k"), state->one));
qi_old_scope(state);
}
goto __exit315;
__break315:;
qi_old_scope(state);
__exit315:;
qi_old_scope(state);
qi_value_t *__qistd317 = qi_call(state, qi_get(state, "slice"), __qistd318(state));
return __qistd317;
return state->nil;
}
inline static qi_list_t *__qistd321(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd322(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd323(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cs");
return list;
}
inline static qi_list_t *__qistd324(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "cs");
return list;
}
inline static qi_list_t *__qistd327(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "s");
qi_list_data(list, 1) = qi_get(state, "cs");
return list;
}
inline static qi_list_t *__qistd326(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "str_rstrip"), __qistd327(state));
qi_list_data(list, 1) = qi_get(state, "cs");
return list;
}
qi_value_t *__qistd320(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_decl(state, "cs", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, " \t\n\r\x0b\x0c"));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd321(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd322(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd323(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd324(state))));}
qi_old_scope(state);
qi_value_t *__qistd325 = qi_call(state, qi_get(state, "str_lstrip"), __qistd326(state));
return __qistd325;
return state->nil;
}
inline static qi_list_t *__qistd330(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "len");
qi_list_data(list, 1) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd331(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "min");
qi_list_data(list, 1) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd335(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "t");
qi_list_data(list, 1) = qi_index(state, qi_get(state, "xs"), qi_get(state, "i"));
return list;
}
inline static qi_list_t *__qistd336(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "r");
qi_list_data(list, 1) = qi_get(state, "t");
return list;
}
qi_value_t *__qistd328(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_new_scope(state);
if (_qi_truthy(state, qi_not(state, qi_get(state, "arguments")))) {
qi_value_t *__qistd329 = qi_make_list(state, NULL);
qi_old_scope(state);
return __qistd329;}
qi_old_scope(state);
qi_decl(state, "l", qi_call(state, qi_get(state, "map"), __qistd330(state)));
(void)(qi_set(state, false, "l", qi_call(state, qi_get(state, "reduce"), __qistd331(state))));
qi_decl(state, "r", qi_make_list(state, NULL));
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_get(state, "l")))) {
qi_new_scope(state);
qi_decl(state, "t", qi_make_list(state, NULL));
qi_new_scope(state);
qi_value_t *__qistd334 = qi_iter(state, qi_get(state, "arguments"));
qi_decl(state, "xs", state->nil);
for (qi_size_t length = _qi_length(state, __qistd334), i = 0; i < length; i++) {
qi_set(state, false, "xs", qi_index(state, __qistd334, qi_make_number(state, i)));
qi_new_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd335(state)));__continue333:;
qi_old_scope(state);
}
goto __exit333;
__break333:;
qi_old_scope(state);
__exit333:;
qi_old_scope(state);
(void)(qi_call(state, qi_get(state, "list_push"), __qistd336(state)));
__continue332:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit332;
__break332:;
qi_old_scope(state);
__exit332:;
qi_old_scope(state);
qi_value_t *__qistd337 = qi_get(state, "r");
return __qistd337;
return state->nil;
}
inline static qi_list_t *__qistd339(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd342(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd343(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd341(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "table_keys"), __qistd342(state));
qi_list_data(list, 1) = qi_call(state, qi_get(state, "table_values"), __qistd343(state));
return list;
}
inline static qi_list_t *__qistd347(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd346(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "len"), __qistd347(state));
return list;
}
inline static qi_list_t *__qistd345(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "range"), __qistd346(state));
qi_list_data(list, 1) = qi_get(state, "l");
return list;
}
qi_value_t *__qistd338(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd339(state)), qi_make_string(state, "table")))) {
qi_value_t *__qistd340 = qi_call(state, qi_get(state, "zip"), __qistd341(state));
qi_old_scope(state);
return __qistd340;} else {
qi_value_t *__qistd344 = qi_call(state, qi_get(state, "zip"), __qistd345(state));
qi_old_scope(state);
return __qistd344;}
qi_old_scope(state);
return state->nil;
}
inline static qi_list_t *__qistd349(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd350(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "c");
return list;
}
inline static qi_list_t *__qistd356(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "c");
return list;
}
inline static qi_list_t *__qistd355(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_sub(state, qi_call(state, qi_get(state, "ord"), __qistd356(state)), qi_make_number(state, 32));
return list;
}
qi_value_t *__qistd353(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "c", qi_list_index(pargs, 0));
qi_value_t *__qistd354 = (_qi_truthy(state, qi_and(state, qi_ge(state, qi_get(state, "c"), qi_make_string(state, "a")), qi_le(state, qi_get(state, "c"), qi_make_string(state, "z"))))? qi_call(state, qi_get(state, "chr"), __qistd355(state)): qi_get(state, "c"));
return __qistd354;return state->nil;
}
inline static qi_list_t *__qistd352(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_function(state, "<anon>", 1, __qistd353, NULL);
qi_list_data(list, 1) = qi_get(state, "s");
return list;
}
qi_value_t *__qistd348(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd349(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd350(state))));}
qi_old_scope(state);
qi_value_t *__qistd351 = qi_call(state, qi_get(state, "map"), __qistd352(state));
return __qistd351;
return state->nil;
}
inline static qi_list_t *__qistd358(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd359(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "c");
return list;
}
inline static qi_list_t *__qistd365(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "c");
return list;
}
inline static qi_list_t *__qistd364(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_add(state, qi_call(state, qi_get(state, "ord"), __qistd365(state)), qi_make_number(state, 32));
return list;
}
qi_value_t *__qistd362(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "c", qi_list_index(pargs, 0));
qi_value_t *__qistd363 = (_qi_truthy(state, qi_and(state, qi_ge(state, qi_get(state, "c"), qi_make_string(state, "A")), qi_le(state, qi_get(state, "c"), qi_make_string(state, "Z"))))? qi_call(state, qi_get(state, "chr"), __qistd364(state)): qi_get(state, "c"));
return __qistd363;return state->nil;
}
inline static qi_list_t *__qistd361(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_function(state, "<anon>", 1, __qistd362, NULL);
qi_list_data(list, 1) = qi_get(state, "s");
return list;
}
qi_value_t *__qistd357(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd358(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd359(state))));}
qi_old_scope(state);
qi_value_t *__qistd360 = qi_call(state, qi_get(state, "map"), __qistd361(state));
return __qistd360;
return state->nil;
}
inline static qi_list_t *__qistd369(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "p");
return list;
}
inline static qi_list_t *__qistd368(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "p");
qi_list_data(list, 1) = qi_add(state, qi_call(state, qi_get(state, "get_meta_table"), __qistd369(state)), qi_get(state, "t"));
return list;
}
inline static qi_list_t *__qistd370(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_table(state, NULL);
qi_list_data(list, 1) = qi_get(state, "t");
return list;
}
qi_value_t *__qistd366(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "p", pargc >= 2? qi_list_index(pargs, 1): state->nil);
qi_decl(state, "t", qi_list_index(pargs, 0));
qi_value_t *__qistd367 = (_qi_truthy(state, qi_not_is(state, qi_get(state, "p"), state->nil))? qi_call(state, qi_get(state, "set_meta_table"), __qistd368(state)): qi_call(state, qi_get(state, "set_meta_table"), __qistd370(state)));
return __qistd367;return state->nil;
}
inline static qi_list_t *__qistd373(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "o");
return list;
}
qi_value_t *__qistd371(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "o", qi_list_index(pargs, 0));
qi_value_t *__qistd372 = qi_call(state, qi_get(state, "has_meta_table"), __qistd373(state));
return __qistd372;return state->nil;
}
qi_value_t *__qistd378(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "this", qi_list_index(pargs, 0));
qi_value_t *__qistd379 = qi_get(state, "n");
return __qistd379;return state->nil;
}
inline static qi_table_t *__qistd380(qi_state_t *state) {
qi_table_t *table = qi_table_make();
qi_table_set(table, "n", qi_get(state, "n"));
return table;
}
qi_value_t *__qistd381(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "this", qi_list_index(pargs, 0));
qi_value_t *__qistd382 = qi_add(state, qi_add(state, qi_make_string(state, "<class "), qi_get(state, "n")), qi_make_string(state, ">"));
return __qistd382;return state->nil;
}
inline static qi_table_t *__qistd383(qi_state_t *state) {
qi_table_t *table = qi_table_make();
qi_table_set(table, "n", qi_get(state, "n"));
return table;
}
qi_value_t *__qistd386(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "this", qi_list_index(pargs, 0));
qi_value_t *__qistd387 = qi_get(state, "n");
return __qistd387;return state->nil;
}
inline static qi_table_t *__qistd388(qi_state_t *state) {
qi_table_t *table = qi_table_make();
qi_table_set(table, "n", qi_get(state, "n"));
return table;
}
inline static qi_table_t *__qistd385(qi_state_t *state) {
qi_table_t *table = qi_table_make();
qi_table_set(table, qi_to_string(state, qi_make_string(state, "__type"))->value.string, qi_make_function(state, "<anon>", 1, __qistd386, __qistd388(state)));
return table;
}
inline static qi_list_t *__qistd391(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "t");
qi_list_data(list, 1) = qi_get(state, "mt");
return list;
}
inline static qi_list_t *__qistd393(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "obj");
return list;
}
inline static qi_list_t *__qistd392(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_index(state, qi_get(state, "mt"), qi_make_string(state, "constructor"));
qi_list_data(list, 1) = qi_add(state, qi_make_list(state, __qistd393(state)), qi_get(state, "pargs"));
return list;
}
qi_value_t *__qistd384(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "pargs", qi_list_index(pargs, 1));
qi_decl(state, "this", qi_list_index(pargs, 0));
qi_decl(state, "t", qi_make_table(state, NULL));
qi_decl(state, "mt", qi_make_table(state, __qistd385(state)));
qi_new_scope(state);
qi_value_t *__qistd390 = qi_iter(state, qi_get(state, "p"));
qi_decl(state, "other", state->nil);
for (qi_size_t length = _qi_length(state, __qistd390), i = 0; i < length; i++) {
qi_set(state, false, "other", qi_index(state, __qistd390, qi_make_number(state, i)));
qi_new_scope(state);
(void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_index(state, qi_get(state, "other"), qi_make_string(state, "t")))));
(void)(qi_set(state, false, "mt", qi_add(state, qi_get(state, "mt"), qi_index(state, qi_get(state, "other"), qi_make_string(state, "mt")))));
__continue389:;
qi_old_scope(state);
}
goto __exit389;
__break389:;
qi_old_scope(state);
__exit389:;
qi_old_scope(state);
(void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_index(state, qi_get(state, "this"), qi_make_string(state, "t")))));
(void)(qi_set(state, false, "mt", qi_add(state, qi_get(state, "mt"), qi_index(state, qi_get(state, "this"), qi_make_string(state, "mt")))));
(void)(qi_index_set(state, false, qi_get(state, "mt"), qi_make_string(state, "super"), qi_index(state, qi_get(state, "this"), qi_make_string(state, "super"))));
(void)(qi_set(state, false, "obj", qi_call(state, qi_get(state, "set_meta_table"), __qistd391(state))));
qi_new_scope(state);
if (_qi_truthy(state, qi_in(state, qi_make_string(state, "constructor"), qi_get(state, "mt")))) {
(void)(qi_call(state, qi_get(state, "func_call"), __qistd392(state)));}
qi_old_scope(state);
qi_value_t *__qistd394 = qi_get(state, "obj");
return __qistd394;
return state->nil;
}
inline static qi_table_t *__qistd395(qi_state_t *state) {
qi_table_t *table = qi_table_make();
qi_table_set(table, "n", qi_get(state, "n"));
qi_table_set(table, "p", qi_get(state, "p"));
return table;
}
inline static qi_table_t *__qistd377(qi_state_t *state) {
qi_table_t *table = qi_table_make();
qi_table_set(table, qi_to_string(state, qi_make_string(state, "t"))->value.string, qi_get(state, "t"));
qi_table_set(table, qi_to_string(state, qi_make_string(state, "mt"))->value.string, qi_get(state, "mt"));
qi_table_set(table, qi_to_string(state, qi_make_string(state, "super"))->value.string, qi_get(state, "p"));
qi_table_set(table, qi_to_string(state, qi_make_string(state, "__type"))->value.string, qi_make_function(state, "<anon>", 1, __qistd378, __qistd380(state)));
qi_table_set(table, qi_to_string(state, qi_make_string(state, "__str"))->value.string, qi_make_function(state, "<anon>", 1, __qistd381, __qistd383(state)));
qi_table_set(table, qi_to_string(state, qi_make_string(state, "__call"))->value.string, qi_make_function(state, "<anon>", 2, __qistd384, __qistd395(state)));
return table;
}
inline static qi_list_t *__qistd376(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_add(state, qi_get(state, "st"), qi_make_table(state, __qistd377(state)));
return list;
}
qi_value_t *__qistd374(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "mt", qi_list_index(pargs, 3));
qi_decl(state, "st", qi_list_index(pargs, 4));
qi_decl(state, "n", qi_list_index(pargs, 0));
qi_decl(state, "p", qi_list_index(pargs, 1));
qi_decl(state, "t", qi_list_index(pargs, 2));
qi_value_t *__qistd375 = qi_call(state, qi_get(state, "Object"), __qistd376(state));
return __qistd375;return state->nil;
}
inline static qi_list_t *__qistd397(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd398(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd400(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd404(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd405(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_index(state, qi_get(state, "arguments"), qi_set(state, false, "n", qi_add(state, qi_get(state, "n"), state->one)));
return list;
}
qi_value_t *__qistd396(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd397(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd398(state))));}
qi_old_scope(state);
qi_decl(state, "r", state->empty_string);
qi_decl(state, "n", qi_make_number(state, 1));
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd400(state))))) {
qi_new_scope(state);
qi_new_scope(state);
qi_value_t *__qistd402 = qi_index(state, qi_get(state, "s"), qi_get(state, "i"));
if (_qi_equals(state, __qistd402, qi_make_string(state, "_"))) goto __qistd403;
goto __default401;
__qistd403:;
qi_new_scope(state);
if (_qi_truthy(state, qi_and(state, qi_lt(state, qi_add(state, qi_get(state, "i"), qi_make_number(state, 1)), qi_call(state, qi_get(state, "len"), __qistd404(state))), qi_equals(state, qi_index(state, qi_get(state, "s"), qi_add(state, qi_get(state, "i"), qi_make_number(state, 1))), qi_make_string(state, "_"))))) {
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_make_string(state, "_"))));
(void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one)));
qi_old_scope(state);
qi_old_scope(state);
goto __continue399;
}
qi_old_scope(state);
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_call(state, qi_get(state, "repr"), __qistd405(state)))));
goto __break401;
__default401:;
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
__break401:;
qi_old_scope(state);
__continue399:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit399;
__break399:;
qi_old_scope(state);
__exit399:;
qi_old_scope(state);
qi_value_t *__qistd406 = qi_get(state, "r");
return __qistd406;
return state->nil;
}
inline static qi_list_t *__qistd408(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd409(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd410(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd411(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "l");
return list;
}
inline static qi_list_t *__qistd414(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd413(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "str_format");
qi_list_data(list, 1) = qi_add(state, qi_make_list(state, __qistd414(state)), qi_get(state, "l"));
return list;
}
qi_value_t *__qistd407(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "l", qi_list_index(pargs, 1));
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd408(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd409(state))));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd410(state)), qi_make_string(state, "list")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected second argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd411(state))));}
qi_old_scope(state);
qi_value_t *__qistd412 = qi_call(state, qi_get(state, "func_call"), __qistd413(state));
return __qistd412;
return state->nil;
}
inline static qi_list_t *__qistd416(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd417(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd419(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd423(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd425(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd426(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "s");
return list;
}
inline static qi_list_t *__qistd427(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_index(state, qi_get(state, "t"), qi_get(state, "k"));
return list;
}
qi_value_t *__qistd415(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "s", qi_list_index(pargs, 0));
qi_decl(state, "t", qi_list_index(pargs, 1));
qi_new_scope(state);
if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd416(state)), qi_make_string(state, "string")))) {
qi_throw(state, qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd417(state))));}
qi_old_scope(state);
qi_decl(state, "r", state->empty_string);
qi_decl(state, "n", qi_make_number(state, 1));
qi_new_scope(state);
qi_decl(state, "i", qi_make_number(state, 0));
while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd419(state))))) {
qi_new_scope(state);
qi_new_scope(state);
qi_value_t *__qistd421 = qi_index(state, qi_get(state, "s"), qi_get(state, "i"));
if (_qi_equals(state, __qistd421, qi_make_string(state, "{"))) goto __qistd422;
goto __default420;
__qistd422:;
qi_new_scope(state);
if (_qi_truthy(state, qi_and(state, qi_lt(state, qi_add(state, qi_get(state, "i"), qi_make_number(state, 1)), qi_call(state, qi_get(state, "len"), __qistd423(state))), qi_equals(state, qi_index(state, qi_get(state, "s"), qi_add(state, qi_get(state, "i"), qi_make_number(state, 1))), qi_make_string(state, "{"))))) {
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_make_string(state, "{"))));
(void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one)));
qi_old_scope(state);
qi_old_scope(state);
goto __continue418;
}
qi_old_scope(state);
qi_decl(state, "k", state->empty_string);
(void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one)));
qi_new_scope(state);
while (_qi_truthy(state, qi_and(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd425(state))), qi_not_equals(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_make_string(state, "}"))))) {
qi_new_scope(state);
(void)(qi_set(state, false, "k", qi_add(state, qi_get(state, "k"), qi_index(state, qi_get(state, "s"), qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one))))));__continue424:;
qi_old_scope(state);
}
goto __exit424;
__break424:;
qi_old_scope(state);
__exit424:;
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_or(state, qi_ge(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd426(state))), qi_not_equals(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_make_string(state, "}"))))) {
qi_throw(state, qi_make_string(state, "unmatched { in format specifier"));}
qi_old_scope(state);
qi_new_scope(state);
if (_qi_truthy(state, qi_not(state, qi_get(state, "k")))) {
qi_throw(state, qi_make_string(state, "empty format key"));}
qi_old_scope(state);
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_call(state, qi_get(state, "repr"), __qistd427(state)))));
goto __break420;
__default420:;
(void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
__break420:;
qi_old_scope(state);
__continue418:;
qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
qi_old_scope(state);
}
goto __exit418;
__break418:;
qi_old_scope(state);
__exit418:;
qi_old_scope(state);
qi_value_t *__qistd428 = qi_get(state, "r");
return __qistd428;
return state->nil;
}
inline static qi_list_t *__qistd432(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "STDIN");
return list;
}
inline static qi_list_t *__qistd431(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "fgetc"), __qistd432(state));
return list;
}
qi_value_t *__qistd429(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_value_t *__qistd430 = qi_call(state, qi_get(state, "chr"), __qistd431(state));
return __qistd430;return state->nil;
}
inline static qi_list_t *__qistd434(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "STDOUT");
qi_list_data(list, 1) = qi_get(state, "c");
return list;
}
qi_value_t *__qistd433(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "c", qi_list_index(pargs, 0));
(void)(qi_call(state, qi_get(state, "fputc"), __qistd434(state)));return state->nil;
}
inline static qi_list_t *__qistd437(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "STDIN");
qi_list_data(list, 1) = qi_make_number(state, 256);
return list;
}
qi_value_t *__qistd435(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_value_t *__qistd436 = qi_call(state, qi_get(state, "fgets"), __qistd437(state));
return __qistd436;return state->nil;
}
inline static qi_list_t *__qistd439(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd440(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "print");
qi_list_data(list, 1) = qi_get(state, "arguments");
return list;
}
inline static qi_list_t *__qistd442(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_call(state, qi_get(state, "getline"), NULL);
qi_list_data(list, 1) = qi_make_string(state, "\n\r");
return list;
}
qi_value_t *__qistd438(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_new_scope(state);
if (_qi_truthy(state, qi_gt(state, qi_call(state, qi_get(state, "len"), __qistd439(state)), qi_make_number(state, 0)))) {
(void)(qi_call(state, qi_get(state, "func_call"), __qistd440(state)));}
qi_old_scope(state);
qi_value_t *__qistd441 = qi_call(state, qi_get(state, "str_rstrip"), __qistd442(state));
return __qistd441;
return state->nil;
}
inline static qi_list_t *__qistd445(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "path");
qi_list_data(list, 1) = qi_get(state, "mode");
return list;
}
qi_value_t *__qistd443(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "mode", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, "r"));
qi_decl(state, "path", qi_list_index(pargs, 0));
qi_value_t *__qistd444 = qi_call(state, qi_get(state, "fopen"), __qistd445(state));
return __qistd444;return state->nil;
}
qi_value_t *__qistd446(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "cond", qi_list_index(pargs, 0));
qi_decl(state, "msg", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, "assertion failed"));
qi_new_scope(state);
if (_qi_truthy(state, qi_not(state, qi_get(state, "cond")))) {
qi_throw(state, qi_get(state, "msg"));}
qi_old_scope(state);
return state->nil;
}
qi_value_t *__qistd448(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "msg", qi_list_index(pargs, 1));
qi_decl(state, "this", qi_list_index(pargs, 0));
(void)(qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "msg"), qi_get(state, "msg")));
return state->nil;
}
inline static qi_list_t *__qistd451(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "this");
return list;
}
qi_value_t *__qistd449(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "this", qi_list_index(pargs, 0));
qi_value_t *__qistd450 = qi_add(state, qi_add(state, qi_call(state, qi_get(state, "type"), __qistd451(state)), qi_make_string(state, ": ")), qi_index(state, qi_get(state, "this"), qi_make_string(state, "msg")));
return __qistd450;return state->nil;
}
qi_value_t *__qistd447(qi_state_t *state) {
qi_list_t *supers = qi_list_make_n(0);
qi_table_t *table = qi_table_make();
qi_table_t *metatable = qi_table_make();
qi_table_t *statictable = qi_table_make();
qi_table_set(metatable, "msg", state->nil);
qi_table_set(metatable, "constructor", qi_make_function(state, "Error.constructor", 2, __qistd448, NULL));
qi_table_set(metatable, "__str", qi_make_function(state, "Error.__str", 1, __qistd449, NULL));
qi_list_t *pargs = qi_list_make_n(5);
qi_list_data(pargs, 0) = qi_make_string(state, "Error");
qi_list_data(pargs, 1) = qi_make_list(state, supers);
qi_list_data(pargs, 2) = qi_make_table(state, table);
qi_list_data(pargs, 3) = qi_make_table(state, metatable);
qi_list_data(pargs, 4) = qi_make_table(state, statictable);
return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
}
inline static qi_list_t *__qistd452(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.reverse");
qi_list_data(list, 1) = qi_get(state, "reverse");
return list;
}
inline static qi_list_t *__qistd453(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.reverse");
qi_list_data(list, 1) = qi_get(state, "reverse");
return list;
}
inline static qi_list_t *__qistd454(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "bytes.reverse");
qi_list_data(list, 1) = qi_get(state, "reverse");
return list;
}
inline static qi_list_t *__qistd455(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.remove");
qi_list_data(list, 1) = qi_get(state, "list_remove");
return list;
}
inline static qi_list_t *__qistd456(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.join");
qi_list_data(list, 1) = qi_get(state, "list_join");
return list;
}
inline static qi_list_t *__qistd457(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.popAt");
qi_list_data(list, 1) = qi_get(state, "list_pop_at");
return list;
}
inline static qi_list_t *__qistd458(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.sort");
qi_list_data(list, 1) = qi_get(state, "list_sort");
return list;
}
inline static qi_list_t *__qistd459(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.sorted");
qi_list_data(list, 1) = qi_get(state, "list_sorted");
return list;
}
inline static qi_list_t *__qistd460(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.shift");
qi_list_data(list, 1) = qi_get(state, "list_shift");
return list;
}
inline static qi_list_t *__qistd461(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.unshift");
qi_list_data(list, 1) = qi_get(state, "list_unshift");
return list;
}
inline static qi_list_t *__qistd462(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.slice");
qi_list_data(list, 1) = qi_get(state, "slice");
return list;
}
inline static qi_list_t *__qistd463(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.slice");
qi_list_data(list, 1) = qi_get(state, "slice");
return list;
}
inline static qi_list_t *__qistd464(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "bytes.slice");
qi_list_data(list, 1) = qi_get(state, "slice");
return list;
}
inline static qi_list_t *__qistd465(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.startsWith");
qi_list_data(list, 1) = qi_get(state, "str_startswith");
return list;
}
inline static qi_list_t *__qistd466(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.endsWith");
qi_list_data(list, 1) = qi_get(state, "str_endswith");
return list;
}
inline static qi_list_t *__qistd467(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.split");
qi_list_data(list, 1) = qi_get(state, "str_split");
return list;
}
inline static qi_list_t *__qistd468(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.replace");
qi_list_data(list, 1) = qi_get(state, "str_replace");
return list;
}
inline static qi_list_t *__qistd469(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "table.keys");
qi_list_data(list, 1) = qi_get(state, "table_keys");
return list;
}
inline static qi_list_t *__qistd470(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "table.values");
qi_list_data(list, 1) = qi_get(state, "table_values");
return list;
}
inline static qi_list_t *__qistd474(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd472(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd473 = qi_call(state, qi_get(state, "reduce"), __qistd474(state));
return __qistd473;return state->nil;
}
inline static qi_list_t *__qistd471(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.reduce");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd472, NULL);
return list;
}
inline static qi_list_t *__qistd478(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd476(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd477 = qi_call(state, qi_get(state, "reduce"), __qistd478(state));
return __qistd477;return state->nil;
}
inline static qi_list_t *__qistd475(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "tuple.reduce");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd476, NULL);
return list;
}
inline static qi_list_t *__qistd482(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd480(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd481 = qi_call(state, qi_get(state, "reduce"), __qistd482(state));
return __qistd481;return state->nil;
}
inline static qi_list_t *__qistd479(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.reduce");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd480, NULL);
return list;
}
inline static qi_list_t *__qistd486(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd484(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd485 = qi_call(state, qi_get(state, "reduce"), __qistd486(state));
return __qistd485;return state->nil;
}
inline static qi_list_t *__qistd483(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "bytes.reduce");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd484, NULL);
return list;
}
inline static qi_list_t *__qistd487(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.sum");
qi_list_data(list, 1) = qi_get(state, "sum");
return list;
}
inline static qi_list_t *__qistd488(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "tuple.sum");
qi_list_data(list, 1) = qi_get(state, "sum");
return list;
}
inline static qi_list_t *__qistd489(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.product");
qi_list_data(list, 1) = qi_get(state, "product");
return list;
}
inline static qi_list_t *__qistd490(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "tuple.product");
qi_list_data(list, 1) = qi_get(state, "product");
return list;
}
inline static qi_list_t *__qistd491(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.all");
qi_list_data(list, 1) = qi_get(state, "all");
return list;
}
inline static qi_list_t *__qistd492(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "tuple.all");
qi_list_data(list, 1) = qi_get(state, "all");
return list;
}
inline static qi_list_t *__qistd493(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.any");
qi_list_data(list, 1) = qi_get(state, "any");
return list;
}
inline static qi_list_t *__qistd494(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "tuple.any");
qi_list_data(list, 1) = qi_get(state, "any");
return list;
}
inline static qi_list_t *__qistd498(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd496(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd497 = qi_call(state, qi_get(state, "map"), __qistd498(state));
return __qistd497;return state->nil;
}
inline static qi_list_t *__qistd495(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.map");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd496, NULL);
return list;
}
inline static qi_list_t *__qistd502(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd500(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd501 = qi_call(state, qi_get(state, "map"), __qistd502(state));
return __qistd501;return state->nil;
}
inline static qi_list_t *__qistd499(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "tuple.map");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd500, NULL);
return list;
}
inline static qi_list_t *__qistd506(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd504(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd505 = qi_call(state, qi_get(state, "map"), __qistd506(state));
return __qistd505;return state->nil;
}
inline static qi_list_t *__qistd503(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.map");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd504, NULL);
return list;
}
inline static qi_list_t *__qistd510(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd508(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd509 = qi_call(state, qi_get(state, "map"), __qistd510(state));
return __qistd509;return state->nil;
}
inline static qi_list_t *__qistd507(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "bytes.map");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd508, NULL);
return list;
}
inline static qi_list_t *__qistd514(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd512(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd513 = qi_call(state, qi_get(state, "filter"), __qistd514(state));
return __qistd513;return state->nil;
}
inline static qi_list_t *__qistd511(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "list.filter");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd512, NULL);
return list;
}
inline static qi_list_t *__qistd518(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd516(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd517 = qi_call(state, qi_get(state, "filter"), __qistd518(state));
return __qistd517;return state->nil;
}
inline static qi_list_t *__qistd515(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "tuple.filter");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd516, NULL);
return list;
}
inline static qi_list_t *__qistd522(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd520(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd521 = qi_call(state, qi_get(state, "filter"), __qistd522(state));
return __qistd521;return state->nil;
}
inline static qi_list_t *__qistd519(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.filter");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd520, NULL);
return list;
}
inline static qi_list_t *__qistd526(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_get(state, "f");
qi_list_data(list, 1) = qi_get(state, "xs");
return list;
}
qi_value_t *__qistd524(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 1));
qi_decl(state, "xs", qi_list_index(pargs, 0));
qi_value_t *__qistd525 = qi_call(state, qi_get(state, "filter"), __qistd526(state));
return __qistd525;return state->nil;
}
inline static qi_list_t *__qistd523(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "bytes.filter");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd524, NULL);
return list;
}
inline static qi_list_t *__qistd527(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.index");
qi_list_data(list, 1) = qi_get(state, "str_index");
return list;
}
inline static qi_list_t *__qistd528(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.lstrip");
qi_list_data(list, 1) = qi_get(state, "str_lstrip");
return list;
}
inline static qi_list_t *__qistd529(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.rstrip");
qi_list_data(list, 1) = qi_get(state, "str_rstrip");
return list;
}
inline static qi_list_t *__qistd530(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.strip");
qi_list_data(list, 1) = qi_get(state, "str_strip");
return list;
}
inline static qi_list_t *__qistd531(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.toupper");
qi_list_data(list, 1) = qi_get(state, "str_toupper");
return list;
}
inline static qi_list_t *__qistd532(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.tolower");
qi_list_data(list, 1) = qi_get(state, "str_tolower");
return list;
}
inline static qi_list_t *__qistd533(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.format");
qi_list_data(list, 1) = qi_get(state, "format");
return list;
}
inline static qi_list_t *__qistd534(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.formatl");
qi_list_data(list, 1) = qi_get(state, "formatl");
return list;
}
inline static qi_list_t *__qistd535(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "string.formatd");
qi_list_data(list, 1) = qi_get(state, "formatd");
return list;
}
qi_value_t *__qistd537(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
return state->nil;
}
inline static qi_list_t *__qistd536(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "file.__enter");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 0, __qistd537, NULL);
return list;
}
inline static qi_list_t *__qistd541(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(1);
qi_list_data(list, 0) = qi_get(state, "f");
return list;
}
qi_value_t *__qistd539(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
qi_decl(state, "f", qi_list_index(pargs, 0));
qi_value_t *__qistd540 = qi_call(state, qi_get(state, "fclose"), __qistd541(state));
return __qistd540;return state->nil;
}
inline static qi_list_t *__qistd538(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "file.__leave");
qi_list_data(list, 1) = qi_make_function(state, "<anon>", 1, __qistd539, NULL);
return list;
}
inline static qi_list_t *__qistd542(qi_state_t *state) {
qi_list_t *list = qi_list_make_n(2);
qi_list_data(list, 0) = qi_make_string(state, "file.close");
qi_list_data(list, 1) = qi_get(state, "fclose");
return list;
}
static void qi_init_std(qi_state_t *state) {
qi_set(state, false, "head", qi_make_function(state, "head", 1, __qistd0, NULL));
qi_set(state, false, "tail", qi_make_function(state, "tail", 1, __qistd2, NULL));
qi_set(state, false, "min", qi_make_function(state, "min", 2, __qistd5, NULL));
qi_set(state, false, "max", qi_make_function(state, "max", 2, __qistd7, NULL));
qi_set(state, false, "reverse", qi_make_function(state, "reverse", 1, __qistd9, NULL));
qi_set(state, false, "range", qi_make_function(state, "range", 1, __qistd23, NULL));
qi_set(state, false, "frewind", qi_make_function(state, "frewind", 1, __qistd38, NULL));
qi_set(state, false, "file_read", qi_make_function(state, "file_read", 1, __qistd40, NULL));
qi_set(state, false, "file_write", qi_make_function(state, "file_write", 2, __qistd47, NULL));
qi_set(state, false, "is_defined", qi_make_function(state, "is_defined", 1, __qistd53, NULL));
qi_set(state, false, "list_remove", qi_make_function(state, "list_remove", 2, __qistd56, NULL));
qi_set(state, false, "list_join", qi_make_function(state, "list_join", 1, __qistd63, NULL));
qi_set(state, false, "list_pop_at", qi_make_function(state, "list_pop_at", 2, __qistd74, NULL));
qi_set(state, false, "__cmp", qi_make_function(state, "__cmp", 2, __qistd81, NULL));
qi_set(state, false, "list_sort", qi_make_function(state, "list_sort", 1, __qistd83, NULL));
qi_set(state, false, "list_sorted", qi_make_function(state, "list_sorted", 1, __qistd95, NULL));
qi_set(state, false, "list_shift", qi_make_function(state, "list_shift", 1, __qistd99, NULL));
qi_set(state, false, "list_unshift", qi_make_function(state, "list_unshift", 2, __qistd105, NULL));
qi_set(state, false, "slice", qi_make_function(state, "slice", 1, __qistd107, NULL));
qi_set(state, false, "str_startswith", qi_make_function(state, "str_startswith", 2, __qistd138, NULL));
qi_set(state, false, "str_endswith", qi_make_function(state, "str_endswith", 2, __qistd147, NULL));
qi_set(state, false, "str_split", qi_make_function(state, "str_split", 1, __qistd157, NULL));
qi_set(state, false, "str_replace", qi_make_function(state, "str_replace", 3, __qistd173, NULL));
qi_set(state, false, "table_keys", qi_make_function(state, "table_keys", 1, __qistd186, NULL));
qi_set(state, false, "table_values", qi_make_function(state, "table_values", 1, __qistd193, NULL));
qi_set(state, false, "reduce", qi_make_function(state, "reduce", 2, __qistd200, NULL));
qi_set(state, false, "sum", qi_make_function(state, "sum", 1, __qistd221, NULL));
qi_set(state, false, "product", qi_make_function(state, "product", 1, __qistd226, NULL));
qi_set(state, false, "all", qi_make_function(state, "all", 1, __qistd231, NULL));
qi_set(state, false, "any", qi_make_function(state, "any", 1, __qistd236, NULL));
qi_set(state, false, "map", qi_make_function(state, "map", 2, __qistd241, NULL));
qi_set(state, false, "filter", qi_make_function(state, "filter", 2, __qistd263, NULL));
qi_set(state, false, "str_index", qi_make_function(state, "str_index", 2, __qistd285, NULL));
qi_set(state, false, "str_lstrip", qi_make_function(state, "str_lstrip", 1, __qistd299, NULL));
qi_set(state, false, "str_rstrip", qi_make_function(state, "str_rstrip", 1, __qistd309, NULL));
qi_set(state, false, "str_strip", qi_make_function(state, "str_strip", 1, __qistd320, NULL));
qi_set(state, false, "zip", qi_make_function(state, "zip", 0, __qistd328, NULL));
qi_set(state, false, "enumerate", qi_make_function(state, "enumerate", 1, __qistd338, NULL));
qi_set(state, false, "str_toupper", qi_make_function(state, "str_toupper", 1, __qistd348, NULL));
qi_set(state, false, "str_tolower", qi_make_function(state, "str_tolower", 1, __qistd357, NULL));
qi_set(state, false, "Object", qi_make_function(state, "Object", 1, __qistd366, NULL));
qi_set(state, false, "is_object", qi_make_function(state, "is_object", 1, __qistd371, NULL));
qi_set(state, false, "__class_wrapper", qi_make_function(state, "__class_wrapper", 5, __qistd374, NULL));
qi_set(state, false, "format", qi_make_function(state, "format", 1, __qistd396, NULL));
qi_set(state, false, "formatl", qi_make_function(state, "formatl", 2, __qistd407, NULL));
qi_set(state, false, "formatd", qi_make_function(state, "formatd", 2, __qistd415, NULL));
qi_set(state, false, "getch", qi_make_function(state, "getch", 0, __qistd429, NULL));
qi_set(state, false, "putch", qi_make_function(state, "putch", 1, __qistd433, NULL));
qi_set(state, false, "getline", qi_make_function(state, "getline", 0, __qistd435, NULL));
qi_set(state, false, "input", qi_make_function(state, "input", 0, __qistd438, NULL));
qi_set(state, false, "open", qi_make_function(state, "open", 1, __qistd443, NULL));
qi_set(state, false, "assert", qi_make_function(state, "assert", 1, __qistd446, NULL));
qi_set(state, false, "Error", __qistd447(state));(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd452(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd453(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd454(state)));
qi_decl_const(state, "SEEK_END", qi_make_number(state, 2));
qi_decl_const(state, "SEEK_CUR", qi_make_number(state, 1));
qi_decl_const(state, "SEEK_SET", qi_make_number(state, 0));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd455(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd456(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd457(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd458(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd459(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd460(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd461(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd462(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd463(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd464(state)));
qi_decl_const(state, "__slice", qi_get(state, "slice"));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd465(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd466(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd467(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd468(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd469(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd470(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd471(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd475(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd479(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd483(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd487(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd488(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd489(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd490(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd491(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd492(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd493(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd494(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd495(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd499(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd503(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd507(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd511(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd515(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd519(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd523(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd527(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd528(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd529(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd530(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd531(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd532(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd533(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd534(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd535(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd536(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd538(state)));
(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd542(state)));
}