From 1809f886d8f519bf203857a25fb831f1c9def315 Mon Sep 17 00:00:00 2001
From: Martin Nilsson <mani@lysator.liu.se>
Date: Thu, 10 Apr 2003 21:48:13 +0200
Subject: [PATCH] Test #"" with different newlines.
Rev: src/testsuite.in:1.636
---
src/testsuite.in | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/src/testsuite.in b/src/testsuite.in
index 1d1df4a895..fa43153068 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-test_true([["$Id: testsuite.in,v 1.635 2003/04/08 15:10:18 mast Exp $"]]);
+test_true([["$Id: testsuite.in,v 1.636 2003/04/10 19:48:13 nilsson Exp $"]]);
// This triggered a bug only if run sufficiently early.
test_compile_any([[#pike 7.2]])
@@ -7168,6 +7168,10 @@ test_true(intp(__BUILD__))
test_true(intp(__REAL_BUILD__))
test_eq(__PIKE__,1)
+test_eq( compile_string("string a=#\"a\nb\";")()->a, "a\nb" )
+test_eq( compile_string("string a=#\"a\r\nb\";")()->a, "a\nb" )
+test_eq( compile_string("string a=#\"a\n\rb\";")()->a, "a\nb" )
+
// #define
test_any([[
#define FOOa 1
--
GitLab