Merge pull request #94 from GooseDB/prolog

Ascii for Prolog

Author: o2sh

resources/prolog.ascii

@@ -0,0 +1,18 @@
+{0}            bin_search(Elt,Li{1}st,{0}Re
+{0}         sult):-length(List,N{1}), {0}bin_se
+{0}      arch_inner(Elt,List,1,N{1},Re{0}sult).bi
+{0}     n_search_inner(Elt,List,{1}J,J{0},J):-nth(J
+{0}    ,List,Elt).bin_search_inn{1}er({0}Elt,List,Be
+{0}   gin,End,M{1}id):-Begin{0} < End,{1}Mid{0} is (Begin+E
+{0}  nd) div 2{1},n({0}thMid,L{1}is{0}t,Elt){1}.bi{0}n_search_inn
+{0}  er(Elt,L{1}is{0}t,B{1}egin,{0}End{1},R{0}esul{1}t):{0}-Begin < End,
+{0}  Mid is ({1}De{0}gi{1}n+En{0}d) {1}d{0}i{1}v{0} 2,nt{1}h(M{0}id,List,MidEl
+{0}  t),MidEl{1}t<{0}El{1}t,NewBeg{0}i{1}n i{0}s M{1}id+{0}1,bin_search_
+{0}  inner(El{1}t,L{0}ist{1},Ne{0}wBeg{1}in{0},End,{1}Result). bin{0}_se
+{0}  arch_inn{1}er(E{0}lt,List,{1}Be{0}gin,End{1},Result):-Be{0}gi
+{0}   n<End,M{1}id is (Begin{0}+End) div 2,nth(Mid,Li
+{0}    st,Mid{1}Elt{0}),MidElt>Elt,NewEnd is Mid-1,b
+{0}      in_s{1}ear{0}ch_inner(Elt,List,Begin,NewEn
+{0}       d,R{1}esu{0}lt).n_factorial(0,1).n_fact
+{0}         o{1}ria{0}l(N,F):-N #>0,N1#=N-1,n_f
+{0}           {1}ac{0}torial(N1,F1),F#=N *F1.

src/language.rs

@@ -32,6 +32,7 @@ pub enum Language {
     ObjectiveC,
     Perl,
     Php,
+    Prolog,
     PureScript,
     Python,
     R,
@@ -83,6 +84,7 @@ impl std::fmt::Display for Language {
             Language::Scala => write!(f, "Scala"),
             Language::Shell => write!(f, "Shell"),
             Language::Swift => write!(f, "Swift"),
+            Language::Prolog => write!(f, "Prolog"),
             Language::Perl => write!(f, "Perl"),
             Language::Php => write!(f, "Php"),
             Language::Tcl => write!(f, "Tcl"),
@@ -123,6 +125,7 @@ impl From<tokei::LanguageType> for Language {
             tokei::LanguageType::Lua => Language::Lua,
             tokei::LanguageType::Nim => Language::Nim,
             tokei::LanguageType::ObjectiveC => Language::ObjectiveC,
+            tokei::LanguageType::Prolog => Language::Prolog,
             tokei::LanguageType::Perl => Language::Perl,
             tokei::LanguageType::Php => Language::Php,
             tokei::LanguageType::PureScript => Language::PureScript,
@@ -172,6 +175,7 @@ impl Language {
             Language::ObjectiveC => include_str!("../resources/objectivec.ascii"),
             Language::Perl => include_str!("../resources/perl.ascii"),
             Language::Php => include_str!("../resources/php.ascii"),
+            Language::Prolog => include_str!("../resources/prolog.ascii"),
             Language::PureScript => include_str!("../resources/purescript.ascii"),
             Language::Python => include_str!("../resources/python.ascii"),
             Language::R => include_str!("../resources/r.ascii"),
@@ -218,6 +222,7 @@ impl Language {
             Language::ObjectiveC => vec![Color::BrightBlue, Color::Blue],
             Language::Perl => vec![Color::BrightBlue],
             Language::Php => vec![Color::BrightWhite],
+            Language::Prolog => vec![Color::Blue, Color::Red],
             Language::PureScript => vec![Color::White],
             Language::Python => vec![Color::Blue, Color::Yellow],
             Language::R => vec![Color::White, Color::Blue],
@@ -318,6 +323,7 @@ fn get_all_language_types() -> Vec<tokei::LanguageType> {
         tokei::LanguageType::ObjectiveC,
         tokei::LanguageType::Perl,
         tokei::LanguageType::Php,
+        tokei::LanguageType::Prolog,
         tokei::LanguageType::PureScript,
         tokei::LanguageType::Python,
         tokei::LanguageType::R,