freepascal(fpc trunk 3.3.1)支持多行字符串

最近看fpcsrc(fpc trunk-3.3.1)源码发现freepascal已支持多行字符串，默认是禁用的，如要启用多行字符串用：

{$modeswitch MULTILINESTRINGS} 

多行字符串前后用`

  s:String=
  `freepascal多行字符
  测试
  还真行的哦`
  ;

完整测试代码：

unit Unit1;

{$mode objfpc}{$H+}
{$$modeswitch MULTILINESTRINGS}
interface

uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls;

type

  { TForm1 }

  TForm1 = class(TForm)
    Memo1: TMemo;
    procedure FormCreate(Sender: TObject);
  private

  public

  end;

var
  Form1: TForm1;
  s:String=
  `freepascal多行字符
  测试
  还真行的哦`
  ;
implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.FormCreate(Sender: TObject);
begin
  Memo1.Lines.Add(s);
end;

end.

 如果加：

{$MultiLineStringTrimLeft auto} //消除左边空格

  s:String=
  `freepascal多行字符
  测试
  还真行的哦`
  ;