add support for Fortran 90 #138

Author: o2sh

Diff for: resources/f90.ascii

@@ -0,0 +1,19 @@
+{0}   _{2} _  _ 
+{0} _|_{2}(_|/ \
+{0} o| {2} _|\_/
+
+{1}    /\
+{1}   /  \
+{1}  |    |
+{1}  |{3}NASA{1}|
+{1}  |    |
+{1}  |    |
+{1}  |    |
+{1} '      `
+{1} |      |
+{1} |      |
+{1} |______|
+{1}  '-`'-`   .
+{1}  / . \'\ . .'
+{1} ''( .'\.' ' .;'
+{1}'.;.;' ;'.;' ..;;'

Diff for: src/language.rs

@@ -20,6 +20,7 @@ pub enum Language {
     Elm,
     Erlang,
     Forth,
+    FortranModern,
     FSharp,
     Go,
     Haskell,
@@ -70,6 +71,7 @@ impl std::fmt::Display for Language {
             Language::Elm => write!(f, "Elm"),
             Language::Erlang => write!(f, "Erlang"),
             Language::Forth => write!(f, "Forth"),
+            Language::FortranModern => write!(f, "Fortran"),
             Language::FSharp => write!(f, "FSharp"),
             Language::Go => write!(f, "Go"),
             Language::Haskell => write!(f, "Haskell"),
@@ -123,6 +125,7 @@ impl From<tokei::LanguageType> for Language {
             tokei::LanguageType::Elm => Language::Elm,
             tokei::LanguageType::Erlang => Language::Erlang,
             tokei::LanguageType::Forth => Language::Forth,
+            tokei::LanguageType::FortranModern => Language::FortranModern,
             tokei::LanguageType::FSharp => Language::FSharp,
             tokei::LanguageType::Go => Language::Go,
             tokei::LanguageType::Haskell => Language::Haskell,
@@ -175,6 +178,7 @@ impl Language {
             Language::Elm => include_str!("../resources/elm.ascii"),
             Language::Erlang => include_str!("../resources/erlang.ascii"),
             Language::Forth => include_str!("../resources/forth.ascii"),
+            Language::FortranModern => include_str!("../resources/f90.ascii"),
             Language::FSharp => include_str!("../resources/fsharp.ascii"),
             Language::Go => include_str!("../resources/go.ascii"),
             Language::Haskell => include_str!("../resources/haskell.ascii"),
@@ -226,6 +230,12 @@ impl Language {
             Language::Elm => vec![Color::BrightBlack, Color::Green, Color::Yellow, Color::Cyan],
             Language::Erlang => vec![Color::BrightRed],
             Language::Forth => vec![Color::BrightRed],
+            Language::FortranModern => vec![
+                Color::BrightWhite,
+                Color::BrightRed,
+                Color::BrightGreen,
+                Color::BrightBlue
+            ],
             Language::FSharp => vec![Color::BrightBlue, Color::Cyan],
             Language::Go => vec![Color::White],
             Language::Haskell => vec![Color::BrightBlue, Color::BrightMagenta, Color::Blue],
@@ -337,6 +347,7 @@ fn get_all_language_types() -> Vec<tokei::LanguageType> {
         tokei::LanguageType::Elm,
         tokei::LanguageType::Erlang,
         tokei::LanguageType::Forth,
+        tokei::LanguageType::FortranModern,
         tokei::LanguageType::FSharp,
         tokei::LanguageType::Go,
         tokei::LanguageType::Haskell,