INTERFACE Loc;

IMPORT ID;

TYPE
  T = REF RECORD
    pkg    : ID.T;
    subdir : ID.T;
    next   : T;
  END;

PROCEDURE Add (pkg, subdir: ID.T): T;

END Loc.