Marc Weustink wrote:
program TypeTest;
{$mode objfpc}{$h+}

type
  TMyA = type String;
  TMyB = type String;

var
  A: TMyA;
  B: TMyB;
  S: String;

begin
  S := 'Some value';
  A := S;
  B := S;

  S := A;
  S := B;

  A := B;
  B := A;
end.

Well, assign works, but if you use them as var Parameters it works not! It's also nice if you have got overloaded functions.

-Ivo
_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to