--langdef=gprolog --langmap=perl:.pm.perl --langmap=gprolog:.pl --regex-gprolog=/^([a-z][a-zA-Z0-9_]*)[ \t]*(\(.*\))?[ \t]*(:-|\.)/\1/p,predicate/ --regex-gprolog=/^:- ?foreign\(([a-z][a-zA-Z0-9_]*)[ \t,(]/\1/f,foreign/ --regex-gprolog=/^:- ?dynamic\(([a-z][a-zA-Z0-9_]*)\//\1/d,dynamic/