RosettaCodeData/Task/Singly-linked-list-Element-definition/Pascal/singly-linked-list-element-definition.pas

type
  PLink = ^TLink;
  TLink = record
    FNext: PLink;
    FData: integer;
  end;