1#!/usr/bin/env clif 
    2
    3% :- throw('dont call lauchclio!').
    4
    5:- initialization cp_server.    6
    7:- dynamic   user:file_search_path/2.    8:- multifile user:file_search_path/2.    9
   10/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
   11This file provides a skeleton startup file.  It can be localized by running
   12
   13    % ./configure			(Unix)
   14    % Double-clicking win-config.exe	(Windows)
   15
   16After  that,  the  system  may  be  customized  by  copying  or  linking
   17customization  files  from  config-available    to  config-enabled.  See
   18config-enabled/README.txt for details.
   19
   20To run the system, do one of the following:
   21
   22    * Running for development
   23      Run ./run.pl (Unix) or open run.pl by double clicking it (Windows)
   24
   25    * Running as Unix daemon (service)
   26      See daemon.pl
   27- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
   28
   29% Setup search path for cliopatria. We add  both a relative and absolute
   30% path. The absolute path allow us to  start in any directory, while the
   31% relative one ensures that the system remains working when installed on
   32% a device that may be mounted on a different location.
   33
   34add_relative_search_path(Alias, Abs) :-
   35	is_absolute_file_name(Abs), !,
   36	prolog_load_context(file, Here),
   37	relative_file_name(Abs, Here, Rel),
   38	assertz(user:file_search_path(Alias, Rel)).
   39add_relative_search_path(Alias, Rel) :-
   40	assertz(user:file_search_path(Alias, Rel)).
   41
   42% :- use_module(cliopatria_binding).
   43user:file_search_path(cliopatria, '../../ClioPatria').
   44:- add_relative_search_path(cliopatria, '../../ClioPatria').   45
   46% Make loading files silent. Comment if you want verbose loading.
   47
   48:- current_prolog_flag(verbose, Verbose),
   49   asserta(saved_verbose(Verbose)),
   50   set_prolog_flag(verbose, silent).   51
   52
   53		 /*******************************
   54		 *	      LOAD CODE		*
   55		 *******************************/
   56
   57% Use the ClioPatria help system.  May   be  commented to disable online
   58% help on the source-code.
   59
   60:- use_module(cliopatria('applications/help/load')).   61
   62% Load ClioPatria itself.  Better keep this line.
   63
   64:- use_module(cliopatria(cliopatria)).   65
   66% Load package manager
   67
   68:- use_module(library(cpack/cpack)).   69
   70% Load the remainder of the  configuration. The directory config-enabled
   71% can also be used to  load   additional  (plugin)  functionality.
   72
   73:- use_module(library(conf_d)).   74
   75:- load_conf_d([ 'config-enabled' ], []).   76
   77% :- ensure_loaded(logicmoo(dbase/dbase_rdf_entailment)).
   78
   79
   80% Get back normal verbosity of the toplevel.
   81
   82:- (   retract(saved_verbose(Verbose))
   83   ->  set_prolog_flag(verbose, Verbose)
   84   ;   true
   85   ).