%
/*
*/
^\s*:-\s(category|object|protocol)(?=[(])
^\s*:-\send_(category|object|protocol)(?=[.])
^\s*:-\smodule(?=[(])
^\s*:-\sp(ublic|r(otected|ivate))(?=[(])
^\s*:-\se(ncoding|xport)(?=[(])
^\s*:-\sin(fo|itialization)(?=[(])
^\s*:-\s(dynamic|synchronized|threaded)(?=[.])
^\s*:-\s(a(lias|tomic)|d(ynamic|iscontiguous)|m(eta_predicate|ode|ultifile)|synchronized)(?=[(])
^\s*:-\sop(?=[(])
^\s*:-\s(calls|use(s|_module))(?=[(])
(extends|i(nstantiates|mp(lements|orts))|specializes)(?=[(])
\b(after|before)(?=[(])
\b(parameter|this|se(lf|nder))(?=[(])
\b(current_predicate|predicate_property)(?=[(])
\b(expand_term|term_expansion|phrase)(?=[(])
\b(abolish|c(reate|urrent))_(object|protocol|category)(?=[(])
\b(object|protocol|category)_property(?=[(])
\bextends_(object|protocol)(?=[(])
\bimplements_protocol(?=[(])
\b(instantiates|specializes)_class(?=[(])
\bimports_category(?=[(])
\b(current_event|(abolish|define)_events)(?=[(])
\b(current|set)_logtalk_flag(?=[(])
\blogtalk_(compile|l(ibrary_path|oad))(?=[(])
\b(clause|retract(all)?)(?=[(])
\ba(bolish|ssert(a|z))(?=[(])
\b(ca(ll|tch)|throw)(?=[(])
\b(fail|true)\b
\b((bag|set)of|f(ind|or)all)(?=[(])
\bthreaded(_(call|once|ignore|race|exit|peek|wait|notify))?(?=[(])
\bunify_with_occurs_check(?=[(])
\b(functor|arg|copy_term)(?=[(])
\b(rem|mod|abs|sign)(?=[(])
\bfloat(_(integer|fractional)_part)?(?=[(])
\b(floor|truncate|round|ceiling)(?=[(])
\b(cos|atan|exp|log|s(in|qrt))(?=[(])
\b(var|atom(ic)?|integer|float|compound|n(onvar|umber))(?=[(])
\b(current|set)_(in|out)put(?=[(])
\b(open|close)(?=[(])
\bflush_output(?=[(])
\bflush_output\b
\b(stream_property|at_end_of_stream|set_stream_position)(?=[(])
\b(nl|(get|peek|put)_(byte|c(har|ode)))(?=[(])
\bnl\b
\bread(_term)?(?=[(])
\bwrite(q|_(canonical|term))?(?=[(])
\b(current_)?op(?=[(])
\b(current_)?char_conversion(?=[(])
\batom_(length|c(hars|o(ncat|des)))(?=[(])
\b(char_code|sub_atom)(?=[(])
\bnumber_c(hars|odes)(?=[(])
\b(set|current)_prolog_flag(?=[(])
\bhalt\b
\bhalt(?=[(])
\bonce(?=[(])
\brepeat\b
[_A-Z]+[a-zA-Z0-9]*
0'[[:alnum:]]
0b[0-1]+
0o[0-7]+
0x[[:xdigit:]]+
'
'
"
"
{
}
0'.
0b[0-1]+
0o[0-7]+
0x[0-9a-fA-F]+
\d+(\.\d+)?([eE]([-+])?\d+)?
::
^^
!
,
;
-->
->
=
\=
@=<
==
\==
@<
@>
@>=
=..
is
=:=
=\=
<
=<
>
>=
\+
+
-
*
//
/
**
>>
<<
/\
\/
\
.
\s:-($|\s)
+
-
?
@
abolish
abolish_category
abolish_events
abolish_object
abolish_protocol
after
alias
arg
asserta
assertz
atom
atomic
atom_chars
atom_codes
atom_concat
atom_length
at_end_of_stream
bagof
before
call
calls
catch
category
category_property
char_code
char_conversion
clause
close
compound
copy_term
create_category
create_object
create_protocol
current_category
current_char_conversion
current_event
current_input
current_logtalk_flag
current_object
current_op
current_output
current_predicate
current_prolog_flag
current_protocol
define_events
discontiguous
dynamic
encoding
end_category
end_object
end_protocol
expand_term
extends
extends_object
extends_protocol
fail
findall
float
flush_output
forall
functor
get_byte
get_char
get_code
halt
implements
implements_protocol
imports
imports_category
info
initialization
instantiates
instantiates_class
integer
logtalk_compile
logtalk_library_path
logtalk_load
meta_predicate
mode
nl
nonvar
number
number_chars
number_codes
object
object_property
once
op
open
parameter
peek_byte
peek_char
peek_code
phrase
predicate_property
private
protected
protocol
protocol_property
public
put_byte
put_char
put_code
read
read_term
repeat
retract
retractall
self
sender
setof
set_input
set_logtalk_flag
set_output
set_prolog_flag
set_stream_position
specializes
specializes_class
stream_property
sub_atom
synchronized
term_expansion
this
threaded
threaded_call
threaded_once
threaded_ignore
threaded_race
threaded_exit
threaded_peek
threaded_wait
threaded_notify
throw
true
unify_with_occurs_check
uses
var
write
writeq
write_canonical