Prolog "main"

Admin User, created Apr 06. 2025
         
/**
* Modern Albufeira Prolog Interpreter
*
* Warranty & Liability
* To the extent permitted by applicable law and unless explicitly
* otherwise agreed upon, XLOG Technologies AG makes no warranties
* regarding the provided information. XLOG Technologies AG assumes
* no liability that any problems might be solved with the information
* provided by XLOG Technologies AG.
*
* Rights & License
* All industrial property rights regarding the information - copyright
* and patent rights in particular - are the sole property of XLOG
* Technologies AG. If the company was not the originator of some
* excerpts, XLOG Technologies AG has at least obtained the right to
* reproduce, change and translate the information.
*
* Reproduction is restricted to the whole unaltered document. Reproduction
* of the information is only allowed for non-commercial uses. Selling,
* giving away or letting of the execution of the library is prohibited.
* The library can be distributed as part of your applications and libraries
* for execution provided this comment remains unchanged.
*
* Restrictions
* Only to be distributed with programs that add significant and primary
* functionality to the library. Not to be distributed with additional
* software intended to replace any components of the library.
*
* Trademarks
* Jekejeke is a registered trademark of XLOG Technologies AG.
*/
:- ensure_loaded('../../transpiler/config.p').
:- ensure_loaded('../../transpiler/cross/helper.p').
:- ensure_loaded('../../transpiler/cross/util.p').
:- ensure_loaded('transpiler.p').
:- ensure_loaded('bundler.p').
% runj
runj :-
env(doge, Doge),
set_prolog_flag(base_url, Doge),
write('j '), time(runj_doge).
% runj_doge
runj_doge :-
transpilej_doge_core,
copyj_doge_lib.
% transpilej_doge_core
transpilej_doge_core :-
transpilej_begin('playerj/drawer/nova/Bootload.java', [defer_meta(true),class('Bootload'),package('nova')]),
transpilej_add('transpiler/cross/albufeira.p', 'playerj/drawer/nova/Bootload.java', [defer_meta(true),method('boot1')]),
transpilej_add('transpiler/drawer/engine.p', 'playerj/drawer/nova/Bootload.java', [defer_meta(true),method('boot3')]),
transpilej_add('transpiler/drawer/core.p', 'playerj/drawer/nova/Bootload.java', [defer_meta(true),method('boot2')]),
transpilej_add('transpiler/drawer/dynamic.p', 'playerj/drawer/nova/Bootload.java', [defer_meta(true),method('boot4')]),
transpilej_add('transpiler/drawer/loader.p', 'playerj/drawer/nova/Bootload.java', [defer_meta(true),method('boot8')]),
transpilej_end('playerj/drawer/nova/Bootload.java', [defer_meta(true),method('boot10')]),
copy_time('transpiler/cross/albufeira.p', 'playerj/drawer/nova/Bootload.java'),
copy_time('transpiler/drawer/core.p', 'playerj/drawer/nova/Bootload.java', [update(true)]),
copy_time('transpiler/drawer/engine.p', 'playerj/drawer/nova/Bootload.java', [update(true)]),
copy_time('transpiler/drawer/dynamic.p', 'playerj/drawer/nova/Bootload.java', [update(true)]),
copy_time('transpiler/drawer/loader.p', 'playerj/drawer/nova/Bootload.java', [update(true)]),
transpilej_begin('playerj/drawer/nova/Streams.java', [class('Streams'),package('nova')]),
transpilej_add('transpiler/drawer/code.p', 'playerj/drawer/nova/Streams.java', [method('boot5')]),
transpilej_add('transpiler/drawer/scanner.p', 'playerj/drawer/nova/Streams.java', [method('boot6')]),
transpilej_add('transpiler/drawer/term.p', 'playerj/drawer/nova/Streams.java', [method('boot7')]),
transpilej_add('transpiler/drawer/session.p', 'playerj/drawer/nova/Streams.java', [method('boot9')]),
transpilej_end('playerj/drawer/nova/Streams.java'),
copy_time('transpiler/drawer/code.p', 'playerj/drawer/nova/Streams.java'),
copy_time('transpiler/drawer/scanner.p', 'playerj/drawer/nova/Streams.java', [update(true)]),
copy_time('transpiler/drawer/term.p', 'playerj/drawer/nova/Streams.java', [update(true)]),
copy_time('transpiler/drawer/session.p', 'playerj/drawer/nova/Streams.java', [update(true)]).
% copyj_doge_lib
copyj_doge_lib :-
copy_pathdirs('transpiler/drawer/liblet/', 'playerj/canned/liblet/'),
clean_pathdirs('transpiler/drawer/liblet/', 'playerj/canned/liblet/', '.p').
/****************************************************************/
/* Initialization */
/****************************************************************/
:- initialization(runj).