* Test for triple-quoted string needs to be ended by triple-quoted string case

tests/test/tmultilinestring36.pp

@@ -0,0 +1,13 @@
+{ %Fail}
+{$mode delphi}
+var s : string;
+
+begin
+  s:='''
+Test
+Multi
+Line
+`;
+
+  writeln(s);
+end.