Page source:

// Input should be list of objects [. link="...", title="..." .]
// Result is HTML paragraphs, one link per paragraph

var result = NewPiece("","text/html");

var atag, ptag;
every o in linklist do
   atag = NewNamedPiece("a", NewPiece(o.title,"text/html"));
   atag.href := o.link;
   ptag = NewNamedPiece("p", atag);
   InsertBefore(EndTag(result), ptag)
end;

result