freepascal.compiler/tests/webtbs/uw35918a.pp

unit uw35918a;

{$mode objfpc}{$H+}  
{$ModeSwitch prefixedattributes}

interface

uses
  Classes, SysUtils, uw35918c;

type

  { TTest1 }

  { TTest2 }

  TTest2 = class
  private
    FField2: String;
  published
    [Attruvute()]
    property Field2: String read FField2;
  end;

implementation

end.