From 0769d964a0f41a0f0d0e7e3115cf9cfdd3586d4a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=D0=9C=D0=B0=D0=B7=D0=B4=D0=B0=D0=B9=D1=89=D0=B8=D0=BA?= Date: Wed, 11 May 2016 13:33:14 +0300 Subject: [PATCH] =?UTF-8?q?=D0=90=D0=B2=D1=82=D0=BE=D1=82=D0=B5=D1=81?= =?UTF-8?q?=D1=82,=20=D0=B2=D0=BE=D1=81=D0=BF=D1=80=D0=BE=D0=B8=D0=B7?= =?UTF-8?q?=D0=B2=D0=BE=D0=B4=D1=8F=D1=89=D0=B8=D0=B9=20=D0=BE=D1=88=D0=B8?= =?UTF-8?q?=D0=B1=D0=BA=D1=83=20=D1=81=C2=A0=D0=B4=D0=B2=D0=BE=D0=B9=D0=BD?= =?UTF-8?q?=D1=8B=D0=BC=D0=B8=20=D0=BA=D0=B0=D0=B2=D1=8B=D1=87=D0=BA=D0=B0?= =?UTF-8?q?=D0=BC=D0=B8=20=D0=B2=C2=A0BE-Refal5=20(#2)?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Tests/Refal5-double-quote.MP/~Defs/Raw.rsym | 7 +++++++ .../Tests/Refal5-double-quote.MP/~ROut/Raw.rout | 16 ++++++++++++++++ Sources/Compiler/Tests/Refal5-double-quote.mref | 9 +++++++++ Sources/Compiler/Tests/details.mk | 2 ++ 4 files changed, 34 insertions(+) create mode 100644 Sources/Compiler/Tests/Refal5-double-quote.MP/~Defs/Raw.rsym create mode 100644 Sources/Compiler/Tests/Refal5-double-quote.MP/~ROut/Raw.rout create mode 100644 Sources/Compiler/Tests/Refal5-double-quote.mref diff --git a/Sources/Compiler/Tests/Refal5-double-quote.MP/~Defs/Raw.rsym b/Sources/Compiler/Tests/Refal5-double-quote.MP/~Defs/Raw.rsym new file mode 100644 index 0000000..a505715 --- /dev/null +++ b/Sources/Compiler/Tests/Refal5-double-quote.MP/~Defs/Raw.rsym @@ -0,0 +1,7 @@ +$module Raw; + + +$entry Check; +$entry Make; + +$end Raw. diff --git a/Sources/Compiler/Tests/Refal5-double-quote.MP/~ROut/Raw.rout b/Sources/Compiler/Tests/Refal5-double-quote.MP/~ROut/Raw.rout new file mode 100644 index 0000000..834242c --- /dev/null +++ b/Sources/Compiler/Tests/Refal5-double-quote.MP/~ROut/Raw.rout @@ -0,0 +1,16 @@ +v ROUT3 Module Refal 0.1 +r file Tests\Refal5-double-quote.MP\~ROut\Raw.rout + +b Entry::Raw::Make#28 +c $Entry::Raw::Make#28$ { +c = +c "The quick brown fox jumps over the lazy dog" +c "The quick brown fox jumps over the lazy dog" ; +c } + +b Entry::Raw::Check#12 +c $Entry::Raw::Check#12$ { +c "The quick brown fox jumps over the lazy dog" = +c ; +c } + diff --git a/Sources/Compiler/Tests/Refal5-double-quote.mref b/Sources/Compiler/Tests/Refal5-double-quote.mref new file mode 100644 index 0000000..2db0b62 --- /dev/null +++ b/Sources/Compiler/Tests/Refal5-double-quote.mref @@ -0,0 +1,9 @@ +$PROGRAM Tests::Refal5-double-quote; + +$IMPORT Raw; + +$ENTRY Go = >>; + +Last s.First s.Last = s.Last; + +$END Tests::Refal5-double-quote. \ No newline at end of file diff --git a/Sources/Compiler/Tests/details.mk b/Sources/Compiler/Tests/details.mk index e69de29..03bcdf7 100644 --- a/Sources/Compiler/Tests/details.mk +++ b/Sources/Compiler/Tests/details.mk @@ -0,0 +1,2 @@ +Tests/Refal5-double-quote.test: profile=R5 +Tests/Refal5-double-quote.test: TESTFLAGS=+MP:Tests/Refal5-double-quote.MP