fork download
  1. program ideone;
  2.  
  3. type T = record
  4. items: array of T;
  5. end;
  6.  
  7. var x: T;
  8.  
  9. begin
  10. WriteLn(Length(x.items));
  11. end.
Success #stdin #stdout 0s 276KB
stdin
Standard input is empty
stdout
0