[:!let modifier [expr {[:pinfo get -default 0 bundle call-protected]?"protected":""}]] [:!let depr [expr {[:!get @deprecated]?"deprecated":""}]] [:!let prefix [expr {[[:get_owning_partof] pinfo get -default 0 bundle ismetaclass] ? "cls": "obj"}]]

[:print_name -status]

$prefix ${:name} [:pinfo get -default "" bundle parametersyntax]
[:as_text]
[:?var :@method {
[:for sm [:get_sub_methods] { [$sm render -initscript [list set supermethod [current]] submethod] }] } - { [:?var :@parameter {
Parameters:
[:for param [:!get @parameter] {
[$param print_name] [:? {[$param eval {info exists :@spec}] && [$param @spec] ne ""} {: [$param @spec]}] [$param statusmark] [$param as_text] [join [$param pinfo get -default "" validation]] [:? {[$param eval {info exists :default}]} {
Default Value: [$param default]
}]
}]
}] [:?var :@return {
Returns: [:!let ret [:!get @return]] [:? {[$ret eval {info exists :@spec}] && [$ret @spec] ne ""} {[$ret @spec]}]
[join [$ret pinfo get -default "" validation]] [$ret as_text]
}] }] [:? {[:!get @deprecated]} {
Deprecated
}] [:? {[:!get @syshook] || [:pinfo exists bundle type]} {
Implementation details:
[:pinfo get bundle type]
[:? {[:!get @syshook]} {
internally called, redefinable hook
}]
}] [:? {[:pinfo get -default 0 bundle redefine-protected]} {
Protection:
redefine-protected
}]