package Ġpl . edu . ag h . cli m ant . visitor . expression Ċ Ċ import Ġpl . edu . ag h . cli m ant . C lim Ant Base Visitor Ċ import Ġpl . edu . ag h . cli m ant . C lim Ant Parser . Parameter Context Ċ import Ġpl . edu . ag h . cli m ant . C lim Ant Parser . Parameter With DefaultValue Context Ċ import Ġpl . edu . ag h . cli m ant . domain . statements . expression . Expression Ċ import Ġpl . edu . ag h . cli m ant . domain . statements . expression . Parameter Ċ import Ġpl . edu . ag h . cli m ant . domain . types . Type Ċ import Ġpl . edu . ag h . cli m ant . util . get From Type Context ĊĊ Ċ class ĠParameter Expression Visitor ( private Ġval Ġexpression Visitor : ĠExpression Visitor ) Ġ: ĊĠĠĠ ĠC lim Ant Base Visitor < Parameter >() Ġ{ ĊĠĠĠ Ġoverride Ġfun Ġvisit Parameter ( ctx : ĠParameter Context ): ĠParameter Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġname : ĠString Ġ= Ġctx . identifier (). text ĊĠĠĠĠĠĠĠ Ġval Ġtype : ĠType Ġ= Ġget From Type Context ( ctx . type ()) !! ĊĠĠĠĠĠĠĠ Ġreturn ĠParameter ( name , Ġtype , Ġnull ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġvisit Parameter With DefaultValue ( ctx : ĠParameter With DefaultValue Context ): ĠParameter Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġname : ĠString Ġ= Ġctx . identifier (). text ĊĠĠĠĠĠĠĠ Ġval Ġtype : ĠType Ġ= Ġget From Type Context ( ctx . type ()) !! ĊĠĠĠĠĠĠĠ Ġval ĠdefaultValue : ĠExpression Ġ= Ġctx . expression (). accept ( expression Visitor ) ĊĠĠĠĠĠĠĠ Ġreturn ĠParameter ( name , Ġtype , ĠdefaultValue ) ĊĠĠĠ Ġ} Ċ Ċ }