git-svn-id: trunk@46661 -
@@ -13,4 +13,6 @@ begin
s:=#42;
foo(s[1]);
Writeln(ord(s[1]));
+ if ord(s[1])<>32 then
+ halt(1);
end.