/* * This file is part of the Fun programming language. * https://fun-lang.xyz/ * * Copyright 2025 Johannes Findeisen * Licensed under the terms of the Apache-2.0 license. * https://opensource.org/license/apache-2-0 * * Added: 2025-12-10 (split from set_unset_save.c) */ /* OP_INI_SAVE */ #ifdef FUN_WITH_INI case OP_INI_SAVE: { Value vpath = pop_value(vm); Value vh = pop_value(vm); const char *path = (vpath.type==VAL_STRING)?vpath.s:NULL; dictionary *d = ini_get((vh.type==VAL_INT)?(int)vh.i:0); int ok = 0; if (d && path) { FILE *f = fopen(path, "w"); if (f) { iniparser_dump_ini(d, f); fclose(f); ok = 1; } } free_value(vpath); free_value(vh); push_value(vm, make_int(ok)); break; } #endif