* new test

git-svn-id: trunk@3892 -

.gitattributes

@@ -7184,6 +7184,7 @@ tests/webtbs/tw6435.pp svneol=native#text/plain
 tests/webtbs/tw6491.pp svneol=native#text/plain
 tests/webtbs/tw6624.pp svneol=native#text/plain
 tests/webtbs/tw6684.pp svneol=native#text/plain
+tests/webtbs/tw6700.pp svneol=native#text/plain
 tests/webtbs/tw6735.pp svneol=native#text/plain
 tests/webtbs/tw6742.pp svneol=native#text/plain
 tests/webtbs/tw6767.pp svneol=native#text/plain

tests/webtbs/tw6700.pp

@@ -0,0 +1,17 @@
+program bug;
+
+{$inline on}
+{$goto on}
+
+procedure crasher;inline;
+
+label beg;
+
+begin
+  goto beg;
+beg:
+end;
+
+begin
+  crasher;
+end.