Method main

src/examples/java/system/Init.java:13–48

(String[] args)

public class Init {
    public static void main(String[] args) throws Exception {
        // CLI options: https://www.swi-prolog.org/pldoc/man?section=cmdline
        // https://www.swi-prolog.org/FAQ/FindResources.html


        if (System.getenv("SWI_HOME_DIR") != null ||
                System.getenv("SWI_EXEC_FILE") != null ||
                System.getenv("SWIPL_BOOT_FILE") != null) {
           String init_swi_config =
                    String.format("%s %s %s -F swipl -g true -q --no-signals --no-packs",
                            System.getenv("SWI_EXEC_FILE") == null ? "swipl" :
                                    System.getenv("SWI_EXEC_FILE"),
                            System.getenv("SWIPL_BOOT_FILE") == null ? "" :
                                    String.format("-x %s", System.getenv("SWIPL_BOOT_FILE")),
                            System.getenv("SWI_HOME_DIR") == null ? "" :
                                    String.format("--home=%s", System.getenv("SWI_HOME_DIR")));
            System.out.println(String.format("\nSWIPL initialized with: %s", init_swi_config));

            JPL.setDefaultInitArgs(init_swi_config.split("\\s+"));    // initialize SWIPL engine
        } else
            System.out.println("No explicit initialization done: no SWI_HOME_DIR, SWI_EXEC_FILE, or SWIPL_BOOT_FILE defined");

//        JPL.setTraditional();
        JPL.init();
        System.out.println("Prolog engine actual init args: " + Arrays.toString(Prolog.get_actual_init_args()));

        System.out.println();
        System.out.println("==========================================================");
        report_selected_flags();
        System.out.println("==========================================================");
        report_versions();
        System.out.println("==========================================================");
        report_all_flags();


    }

    public static void report_selected_flags() {
        System.out.println("REPORTING SELECTED FLAGS: \n");