package Ġorg . living doc . reports . html . elements Ċ Ċ import Ġorg . living doc . results . Status Ċ Ċ /** Ċ Ġ* ĠA Ġlink Ġelement Ġin Ġa ĠHTML Ġreport Ċ Ġ* Ċ Ġ* Ġ@ param Ġlink Address ĠThe Ġaddress Ġthe Ġlink Ġis Ġpointing Ġto Ċ Ġ*/ Ċ class ĠHtml Link ( link Address : ĠString ) Ġ: ĊĠĠĠ ĠHtml Element (" a ") Ġ{ ĊĊĠĠĠ Ġinit Ġ{ ĊĠĠĠĠĠĠĠ Ġattr (" href ", Ġlink Address ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ/** ĊĠĠĠĠ Ġ* ĠA Ġlink Ġelement Ġin Ġa ĠHTML Ġreport ĊĠĠĠĠ Ġ* ĊĠĠĠĠ Ġ* Ġ@ param Ġlink Address ĠThe Ġaddress Ġthe Ġlink Ġis Ġpointing Ġto ĊĠĠĠĠ Ġ* Ġ@ param Ġvalue ĠThe Ġtext Ġdisplayed Ġby Ġthe Ġlink ĊĠĠĠĠ Ġ*/ ĊĠĠĠ Ġconstructor ( link Address : ĠString , Ġvalue : ĠString ) Ġ: ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthis ( link Address ) Ġ{ ĊĠĠĠĠĠĠĠ Ġtext Ġ{ Ġvalue Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ/** ĊĠĠĠĠ Ġ* ĠA Ġlink Ġelement Ġin Ġa ĠHTML Ġreport ĊĠĠĠĠ Ġ* ĊĠĠĠĠ Ġ* Ġ@ param Ġlink Address ĠThe Ġaddress Ġthe Ġlink Ġis Ġpointing Ġto ĊĠĠĠĠ Ġ* Ġ@ param Ġblock ĠA Ġlambda Ġgenerating Ġthe Ġcontent Ġof Ġthis Ġlink ĊĠĠĠĠ Ġ*/ ĊĠĠĠ Ġconstructor ( link Address : ĠString , Ġblock : ĠHtml Link . () Ġ-> ĠUnit ) Ġ: ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthis ( link Address ) Ġ{ ĊĠĠĠĠĠĠĠ Ġblock () ĊĠĠĠ Ġ} Ċ } Ċ Ċ /** Ċ Ġ* ĠGenerates Ġa Ġlink Ġthat Ġpoints Ġto Ġa Ġtest Ġexecution Ċ Ġ*/ Ċ fun ĠHtml Link . result Link ( className : ĠString , Ġstatus : ĠStatus ) Ġ{ ĊĠĠĠ Ġcss Class ( determine Css Class For BackgroundColor ( status )) ĊĠĠĠ Ġtext Ġ{ ĠclassName Ġ} Ċ } Ċ