# Komodo Prolog language service.
#
# Generated by 'luddite.py' on Thu Jan 25 00:42:37 2007.
#

import logging
from koUDLLanguageBase import KoUDLLanguage


log = logging.getLogger("koPrologLanguage")
#log.setLevel(logging.DEBUG)


def registerLanguage(registry):
    log.debug("Registering language Prolog")
    registry.registerLanguage(KoPrologLanguage())


class KoPrologLanguage(KoUDLLanguage):
    name = "Prolog"
    lexresLangName = "Prolog"
    _reg_desc_ = "%s Language" % name
    _reg_contractid_ = "@activestate.com/koLanguage?language=%s;1" % name
    _reg_clsid_ = "{35651479-A79A-40FD-A1FC-126E38701D15}"
    defaultExtension = '.pro'
    sample = """:-foo.   %comment

foo(_,[]).
foo(X,Y,[_|R]):-not(X=Y),!,fail.
foo(_X,[]):- _X is 3.14 + 1.
foo(F:B):-(F,B);(B,bar(['foo',"bar"])).

/* comment
   more comment */
"""    

    lang_from_udl_family = {'SSL': None, 'M': None}