1
0
mirror of https://github.com/janet-lang/janet synced 2025-10-17 00:37:39 +00:00

Ensure no carriage returns end up in doc strings.

This commit is contained in:
Calvin Rose
2019-07-12 09:14:37 -04:00
parent 2e6ee39506
commit e528b86a2a
3 changed files with 10 additions and 6 deletions

View File

@@ -126,4 +126,8 @@
(assert (= (type (buffer-float64-view 0)) :number) "issue #142 nanbox hijack 2")
(assert (= (type (unmarshal @"\xC8\xbc\x9axV4\x92\xfe\xff")) :number) "issue #142 nanbox hijack 3")
# Make sure Carriage Returns don't end up in doc strings.
(assert (not (string/find "\r" (get ((fiber/getenv (fiber/current)) 'cond) :doc))) "no \\r in doc strings")
(end-suite)