Merge pull request #30 from augmentable-dev/add-lisps

add Common Lisp and Emacs Lisp

Author: patrickdevivo

pkg/comments/comments.go

@@ -37,6 +37,16 @@ var HashStyleCommentOptions *lege.ParseOptions = &lege.ParseOptions{
 	},
 }
 
+// LispStyleCommentOptions ..
+var LispStyleCommentOptions *lege.ParseOptions = &lege.ParseOptions{
+	Boundaries: []lege.Boundary{
+		{
+			Start: ";",
+			End:   "\n",
+		},
+	},
+}
+
 // Language is a source language (i.e. "Go")
 type Language string
 
@@ -57,6 +67,8 @@ var LanguageParseOptions map[Language]*lege.ParseOptions = map[Language]*lege.Pa
 	"Objective-C":  CStyleCommentOptions,
 	"Groovy":       CStyleCommentOptions,
 	"Swift":        CStyleCommentOptions,
+	"Common Lisp":  LispStyleCommentOptions,
+	"Emacs Lisp":   LispStyleCommentOptions,
 }
 
 // Comments is a list of comments

pkg/comments/comments_test.go

@@ -0,0 +1,33 @@
+package comments
+
+import (
+	"testing"
+)
+
+func TestJSFiles(t *testing.T) {
+	var comments Comments
+	err := SearchDir("testdata/javascript", func(comment *Comment) {
+		comments = append(comments, comment)
+	})
+	if err != nil {
+		t.Fatal(err)
+	}
+
+	if len(comments) != 2 {
+		t.Fail()
+	}
+}
+
+func TestLispFiles(t *testing.T) {
+	var comments Comments
+	err := SearchDir("testdata/lisp", func(comment *Comment) {
+		comments = append(comments, comment)
+	})
+	if err != nil {
+		t.Fatal(err)
+	}
+
+	if len(comments) != 1 {
+		t.Fail()
+	}
+}

pkg/comments/testdata/javascript/hello_world.js

@@ -0,0 +1,9 @@
+// this is a js comment
+
+function helloWorld() {
+    return "hello world"
+}
+
+/* this is a block comment
+that spans multiple lines
+*/

pkg/comments/testdata/lisp/hello_world.lisp

@@ -0,0 +1,2 @@
+; Comment
+(+ 1 1)