mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 08:07:56 +02:00
14 lines
268 B
ObjectPascal
14 lines
268 B
ObjectPascal
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.
|