-
Notifications
You must be signed in to change notification settings - Fork 3
/
sdcg.pl
29 lines (25 loc) · 1.08 KB
/
sdcg.pl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This is the main file of the SDCG compiler library.
% You need to _compile_ this file to use the library.
% Also, to setup paths on your system, you will either have to
% edit the directive below, or set it manually from your own
% code:
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This is the path to directory where the SDCG compiler is located:
% Edit this to reflect the path of your installation.
sdcg_config(sdcg_directory('/homes/hny4/vsaraswa/code/sdcg')).
% Load the compiler library
:- catch(sdcg_directory(Dir),_,sdcg_config(sdcg_directory(Dir))),
atom_concat(Dir, '/util/util.pl',Utilities),
cl(Utilities),
atom_concat(Dir, '/compiler/sdcg.pl', Compiler),
cl(Compiler).
/* Tracing the compiler requires that it is dynamically loaded:
:- catch(sdcg_directory(Dir),_,sdcg_config(sdcg_directory(Dir))),
atom_concat(Dir, '/util/util.pl',Utilities),
[Utilities],
atom_concat(Dir, '/compiler/sdcg.pl', Compiler),
[Compiler].
*/
:- dynamic sdcg_user_option/2.
:- dynamic sdcg_start_definition/2.