summaryrefslogtreecommitdiff
path: root/fpcsrc/tests/webtbs/tw6865.pp
blob: 107cd8c1f7e6dd0c1a408a2fee24043613c9e56d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
program utf8;
{$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
{$ifdef mswindows}{$apptype console}{$endif}
uses
 {$ifdef FPC}{$ifdef linux}cthreads,{$endif}{$endif}
 sysutils;

 //compile with -Fcutf8

const
 widestringconst = widestring('abc');
begin
end.