From 076f5c0d1eece7b78df8ddd9e97fcb68c6efaa5b Mon Sep 17 00:00:00 2001
From: Rob Rix <rob.rix@github.com>
Date: Tue, 13 Sep 2016 11:59:46 -0400
Subject: [PATCH] Stub in a spec for sourceSpanToRange.

---
 test/Source/Spec.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/test/Source/Spec.hs b/test/Source/Spec.hs
index 0e1c6e3f0..3285a816b 100644
--- a/test/Source/Spec.hs
+++ b/test/Source/Spec.hs
@@ -15,3 +15,6 @@ spec = parallel $ do
     prop "produces exhaustive ranges" $
       \ s -> let source = fromList s in
         foldMap (`slice` source) (actualLineRanges (totalRange s) source) `shouldBe` source
+
+  describe "sourceSpanToRange" $
+    prop "is one-indexed" pending