root/tags/lgt2212/configs/qphook.ql

Revision 1540, 0.6 KB (checked in by pmoura, 4 years ago)

Updated release number to 2.21.2.

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