root/tags/lgt2311/configs/qphook.ql

Revision 3986, 0.7 KB (checked in by pmoura, 13 months ago)

Updated the release number to 2.31.1.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
Line 
1%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2%
3%  Logtalk - Open source object-oriented logic programming language
4%  Release 2.31.1
5%
6%  integration code for Qu-Prolog 7.1 and later versions
7%  used when generating a new interpreter that embeds Logtalk
8%
9%  last updated: February 20, 2006
10%
11%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
12
13
14main(Args) :-
15    current_prolog_flag(version, Version),
16    (   process_symbol(_), member('gui', Args) ->
17        global_state_set('$gui_state', gui),
18        start_thread_gui
19    ;   global_state_set('$gui_state', dumb)
20    ),
21    write_term_list([wa('Qu-Prolog '), w(Version), nl]),
22    interpreter.
Note: See TracBrowser for help on using the browser.