! ----------------------------------------------------------------- ! A Nedit 5.0 Mercury mode ! Luke Evans, Seagate Software ! ! To install, start Nedit with: ! nedit -import ! Then save preferences (defaults) ! ! 12 Jan 1999 LWE Initial. ! Not much more than simple chromacoding ! ----------------------------------------------------------------- nedit.highlightPatterns: Mercury:1:0{\n\ Line_Comment:"%":"$"::Comment::\n\ Keywords:"<(all|and|div|else|end_module|func|if|import_module|implementation|include_module|impure|inst|instance|interface|is|lambda|module|mode|mod|not|or|pragma|pred|rule|semipure|some|then|type|typeclass|when|where)>":::Keyword::\n\ Neck:"<:->":::Keyword::\n\ Type_Introducer:"---\\>":::Keyword::\n\ DCG:"--\\>":::Keyword::\n\ Implies:"-\\>":::Keyword::\n\ String:"""":"""":"\\n":String::\n\ Single_Quoted:"'":"'"::String::\n\ Predicate_Joint:"<,|;|\\.>":::Predicate_Joint::\n\ Number_Literal:"<((0(x|X)[0-9a-fA-F]*)|[0-9.]+((e|E)(\\+|-)?)?[0-9]*)>>":::Numeric Const::\n\ Determinism:"<(det|semidet|multi|nondet|failure|erroneous|cc_multi|cc_nondet)>":::Determinism::\n\ Mode:"<(in|out|uo|ui|di|muo|mui|mdi)>":::Mode::\n\ Braces and Parens:"[{()}]":::Braces and Parens::\n\ } nedit.languageModes: Mercury:.m::::2:2: nedit.styles: Comment:gray:Italic\n\ Keyword:blue:Bold\n\ String:darkGreen:Plain\n\ Numeric Const:darkGreen:Plain\n\ Predicate_Joint:red:Plain\n\ Determinism:brown:Bold\n\ Mode:brown:Italic\n\ Braces and Parens:red:Plain