fpc/tests/webtbs/tw6451.pp
Jonas Maebe 5ec4616c85 + forgot to commit earlier
git-svn-id: trunk@8296 -
2007-08-22 06:56:41 +00:00

10 lines
215 B
ObjectPascal

{ %fail }
{$codepage utf8}
{ can't convert widechar to char, because don't know what }
{ encoding to use at compile-time }
const abc : array [1..4] of char = ('a','é','b','c');
begin
end.