Why Gemfury? Push, build, and install  RubyGems npm packages Python packages Maven artifacts PHP packages Go Modules Debian packages RPM packages NuGet packages

Repository URL to install this package:

Details    
fpc-src / usr / share / fpcsrc / 3.0.0 / tests / tbs / tb0383.pp
Size: Mime:
type
  enum1 = (one,two,three);
  enum2 = (een,twee,drie);

procedure p1(e:enum1);
begin
end;

var
  e2 : enum2;
begin
  e2:=een;
  p1(enum1(e2));
end.