 		;;
 		("\\\\?=" . 'logtalk-built-in-predicate-face)
 		;;
-		;; dcgs
+		;; dcgs:
+		;;
 		("-->" . 'logtalk-built-in-predicate-face)
 		;;
 		;; evaluable functors:


;; Author: Paulo Moura
;; Creation date: November 15, 2003
;; Last modification date: January 30, 2004
;; Version: 0.5

;; Installation:

		;; implementation defined hooks functions:
		;;
		("\\(\\(?:curren\\|se\\)t_prolog_flag\\|halt\\)\\([(]\\)" 1 'logtalk-built-in-predicate-face)
		("\\<halt\\>" . 'logtalk-built-in-predicate-face)
		;;
		;; atomic term processing:
		;;
		("\\(atom_\\(?:c\\(?:hars\\|o\\(?:des\\|ncat\\)\\)\\|length\\)\\|char_code\\|number_c\\(?:\\(?:har\\|ode\\)s\\)\\|sub_atom\\)\\([(]\\)" 1 'logtalk-built-in-predicate-face)
		;;
		;; bitwise functors:
		;;
		("/\\\\\\|<<\\|>>\\|\\\\/" . 'logtalk-built-in-predicate-face)
		("\\\\" . 'logtalk-built-in-predicate-face)
		;;
		;; clause operator:
		;;
		("\\<:-\\>" . 'logtalk-default-face)
	))


(setq logtalk-font-lock-operators
