mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-16 09:53:36 +00:00
2f99cd4440
Branches: main, 10.04
samples/README:
samples/java_interface/README:
samples/java_interface/java_calls_mercury/JavaMain.java:
samples/java_interface/java_calls_mercury/Makefile:
samples/java_interface/java_calls_mercury/java_main_int.m:
samples/java_interface/java_calls_mercury/mercury_lib.m:
samples/java_interface/java_calls_mercury/mercury_main.m:
samples/java_interface/mercury_calls_java/JavaMain.java:
samples/java_interface/mercury_calls_java/Makefile:
samples/java_interface/mercury_calls_java/java_main_int.m:
samples/java_interface/mercury_calls_java/mercury_main.m:
Add examples of Mercury/Java integration.
25 lines
672 B
Mathematica
25 lines
672 B
Mathematica
% This source file is hereby placed in the public domain. -fjh (the author).
|
|
|
|
:- module mercury_main.
|
|
:- interface.
|
|
:- import_module io.
|
|
|
|
:- pred main(io::di, io::uo) is det.
|
|
|
|
:- implementation.
|
|
|
|
% Nothing from mercury_lib is used in mercury_main.
|
|
% The import is needed to make sure mmake includes
|
|
% mercury_lib in the executable.
|
|
:- import_module mercury_lib.
|
|
|
|
% import the module which defines the Mercury interface to the
|
|
% Java method java_main().
|
|
:- import_module java_main_int.
|
|
|
|
% main just invokes java_main
|
|
main(!IO) :-
|
|
io.write_string("In Mercury main, about to call java_main...\n", !IO),
|
|
java_main(!IO),
|
|
io.write_string("Back in Mercury main.\n", !IO).
|