 (make-face 'logtalk-variable-face)
 (set-face-foreground 'logtalk-variable-face "dark slate grey")
 
+(make-face 'logtalk-number-face)
+(set-face-foreground 'logtalk-number-face "dark blue")
+
 
 ;; set the font-lock-comment-face to the logtalk-comment-face
 

;; set the font-lock-string-face to the logtalk-string-face

(setq font-lock-string-face 'logtalk-string-face)



(setq logtalk-font-lock-strings

	))


(setq logtalk-font-lock-numbers
	'(
		("\\<\\(0x[a-fA-F0-9]+\\)\\>" 1 'logtalk-number-face)
		("\\<\\(0o[0-7]+\\)\\>" 1 'logtalk-number-face)
		("\\<\\(0b[0-1]+\\)\\>" 1 'logtalk-number-face)
;;		("\\<\\(0['][a-zA-Z0-9]\\)\\>" 1 'logtalk-number-face)
;;		("\\<\\([0-9]+[.][0-9]+[eE][-+][1-9][0-9]+\\)\\>" 1 'logtalk-number-face)
		("\\<\\([0-9]+[.][0-9]+\\)\\>" 1 'logtalk-number-face)
		("\\<\\([0-9]+\\)\\>" 1 'logtalk-number-face)
	))


(setq logtalk-font-lock-variables
	'(
		("\\<\\([_A-Z][a-zA-Z0-9_]*\\)\\>" 1 'logtalk-variable-face)
	))


(setq logtalk-font-lock-keywords
