Type detection: Difference between revisions

Content added Content deleted
Line 1,226:
c : char;
 
procedure printtext (var source : sourcetype);
begin
case source.kind of
Line 1,273:
c : char;
 
procedure printtext (var source : sourcetype);
begin
case source.kind of