diff --git a/gitinspector/comment.py b/gitinspector/comment.py
index 1144b52..ed5361d 100644
--- a/gitinspector/comment.py
+++ b/gitinspector/comment.py
@@ -21,14 +21,15 @@ from __future__ import unicode_literals
 
 __comment_begining__ = {"java": "/*", "c": "/*", "cc": "/*", "cpp": "/*", "h": "/*", "hh": "/*", "hpp": "/*", "html": "<!--",
                         "php": "/*", "py": "\"\"\"", "glsl": "/*", "rb": "=begin", "js": "/*", "jspx": "<!--", "scala": "/*",
-                        "sql": "/*", "tex": "\\begin{comment}", "xhtml": "<!--", "xml": "<!--"}
+                        "sql": "/*", "tex": "\\begin{comment}", "xhtml": "<!--", "xml": "<!--", "ml": "(*", "mli": "(*" }
 
 __comment_end__ = {"java": "*/", "c": "*/", "cc": "*/", "cpp": "*/", "h": "*/", "hh": "*/", "hpp": "*/", "html": "-->",
                    "php": "/*", "py": "\"\"\"", "glsl": "*/", "rb": "=end", "js": "*/", "jspx": "-->", "scala": "*/",
-                   "sql": "*/", "tex": "\\end{comment}", "xhtml": "-->", "xml": "-->"}
+                   "sql": "*/", "tex": "\\end{comment}", "xhtml": "-->", "xml": "-->", "ml": "*)", "mli": "*)" }
 
 __comment__ = {"java": "//", "c": "//", "cc": "//", "cpp": "//", "h": "//", "hh": "//", "hpp": "//", "pl": "#", "php": "//",
-               "py": "#", "glsl": "//", "rb": "#", "js": "//", "scala": "//", "sql": "--", "tex": "%"}
+               "py": "#", "glsl": "//", "rb": "#", "js": "//", "scala": "//", "sql": "--", "tex": "%", "ada": "--", "ads": "--",
+               "adb": "--" }
 
 __comment_markers_must_be_at_begining__ = {"tex": True}