mirror of
https://github.com/Orc/discount.git
synced 2026-09-29 04:09:47 +03:00
173 lines
2.7 KiB
Raku
173 lines
2.7 KiB
Raku
. tests/functions.sh
|
||
|
||
title "code blocks"
|
||
|
||
rc=0
|
||
MARKDOWN_FLAGS=
|
||
|
||
try 'format for code block html' \
|
||
' this is
|
||
code' \
|
||
'<pre><code>this is
|
||
code
|
||
</code></pre>'
|
||
|
||
try 'fenced code disabled backtick' \
|
||
'```
|
||
|
||
unrecognized code!
|
||
```' \
|
||
'<p>```</p>
|
||
|
||
<p>unrecognized code!
|
||
```</p>'
|
||
|
||
# no <pre/> proves it’s the inline variant of `code` delimitation
|
||
try 'fenced code disabled backtick as inline code' \
|
||
'```
|
||
inline code?
|
||
```' \
|
||
'<p><code>
|
||
inline code?
|
||
</code></p>'
|
||
|
||
try 'fenced code disabled tilde' \
|
||
'~~~
|
||
|
||
unrecognized code!
|
||
~~~' \
|
||
'<p>~~~</p>
|
||
|
||
<p>unrecognized code!
|
||
~~~</p>'
|
||
|
||
try -ffencedcode 'fenced code block with blank lines' \
|
||
'~~~
|
||
code!
|
||
|
||
still code!
|
||
~~~' \
|
||
'<pre><code>code!
|
||
|
||
still code!
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block' \
|
||
'~~~
|
||
code!
|
||
~~~' \
|
||
'<pre><code>code!
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block in list' \
|
||
'1. ~~~
|
||
code block
|
||
~~~' \
|
||
'<ol>
|
||
<li><pre><code>code block
|
||
</code></pre></li>
|
||
</ol>'
|
||
|
||
try -ffencedcode 'fenced code block in blockquote' \
|
||
'>~~~
|
||
code
|
||
~~~' \
|
||
'<blockquote><pre><code>code
|
||
</code></pre></blockquote>'
|
||
|
||
try -ffencedcode 'unterminated fenced code block' \
|
||
'~~~
|
||
code' \
|
||
'<p>~~~
|
||
code</p>'
|
||
|
||
try -ffencedcode 'fenced code block with tildes' \
|
||
'~~~~~
|
||
~~~
|
||
code with tildes
|
||
~~~
|
||
~~~~~' \
|
||
'<pre><code>~~~
|
||
code with tildes
|
||
~~~
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'paragraph with trailing fenced block' \
|
||
'text text text
|
||
text text text
|
||
~~~
|
||
code code code?
|
||
~~~' \
|
||
'<p>text text text
|
||
text text text
|
||
~~~
|
||
code code code?
|
||
~~~</p>'
|
||
|
||
try -ffencedcode 'fenced code blocks with backtick delimiters' \
|
||
'```
|
||
code
|
||
```' \
|
||
'<pre><code>code
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block with mismatched delimters' \
|
||
'```
|
||
code
|
||
~~~' \
|
||
'<p>```
|
||
code
|
||
~~~</p>'
|
||
|
||
try -ffencedcode 'fenced code block with lang attribute' \
|
||
'```lang
|
||
code
|
||
```' \
|
||
'<pre><code class="lang">code
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block with lang-name attribute' \
|
||
'```lang-name
|
||
code
|
||
```' \
|
||
'<pre><code class="lang-name">code
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block with lang_name attribute' \
|
||
'```lang_name
|
||
code
|
||
```' \
|
||
'<pre><code class="lang_name">code
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block with lang attribute and space' \
|
||
'``` lang
|
||
code
|
||
```' \
|
||
'<pre><code class="lang">code
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block with lang attribute and multiple spaces' \
|
||
'``` lang
|
||
code
|
||
```' \
|
||
'<pre><code class="lang">code
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block with lang-name attribute and space' \
|
||
'``` lang-name
|
||
code
|
||
```' \
|
||
'<pre><code class="lang-name">code
|
||
</code></pre>'
|
||
|
||
try -ffencedcode 'fenced code block with lang_name attribute and space' \
|
||
'``` lang_name
|
||
code
|
||
```' \
|
||
'<pre><code class="lang_name">code
|
||
</code></pre>'
|
||
|
||
summary $0
|
||
exit $rc
|