fpc/tests/webtbf/tw38504.pp
2021-02-21 18:46:00 +00:00

12 lines
115 B
ObjectPascal

{ %fail }
Var
MyVar : char;
Procedure MyProc;
Begin
MyVar := ''; (* <-- two single-quotes *)
End;
Begin
End.