[nongnu] elpa/d-mode 505022e 341/346: tests: New testcase

[ELPA Syncer]

branch: elpa/d-mode
commit 505022ebd5d373efae685736bf5d92ab58823e1a
Author: Vladimir Panteleev <g...@thecybershadow.net>
Commit: Vladimir Panteleev <g...@thecybershadow.net>

    tests: New testcase
---
 tests/I0105.d      | 14 ++++++++++++++
 tests/I0105.d.html | 14 ++++++++++++++
 2 files changed, 28 insertions(+)

diff --git a/tests/I0105.d b/tests/I0105.d
new file mode 100644
index 0000000..4309d91
--- /dev/null
+++ b/tests/I0105.d
@@ -0,0 +1,14 @@
+// #run: (d-test-fontification)
+
+unittest
+{
+       assert(absolute("/"[]) == true);
+       assert(absolute(""[]) == false);
+
+       version (Windows)
+       {
+               assert(absolute(r"\"[]) == true);
+               assert(absolute(r"\\"[]) == true);
+               assert(absolute(r"c:"[]) == true);
+       }
+}
diff --git a/tests/I0105.d.html b/tests/I0105.d.html
new file mode 100644
index 0000000..79baaa7
--- /dev/null
+++ b/tests/I0105.d.html
@@ -0,0 +1,14 @@
+<span class="comment-delimiter">// </span><span class="comment">#run: 
(d-test-fontification)
+</span>
+<span class="keyword">unittest</span>
+{
+       <span class="keyword">assert</span>(absolute(<span 
class="string">&quot;/&quot;</span>[]) == <span class="constant">true</span>);
+       <span class="keyword">assert</span>(absolute(<span 
class="string">&quot;&quot;</span>[]) == <span class="constant">false</span>);
+
+       <span class="keyword">version</span> (<span 
class="constant">Windows</span>)
+       {
+               <span class="keyword">assert</span>(absolute(r<span 
class="string">&quot;\&quot;</span>[]) == <span class="constant">true</span>);
+               <span class="keyword">assert</span>(absolute(r<span 
class="string">&quot;\\&quot;</span>[]) == <span class="constant">true</span>);
+               <span class="keyword">assert</span>(absolute(r<span 
class="string">&quot;c:&quot;</span>[]) == <span class="constant">true</span>);
+       }
+}