Comment and constrain instance methods

Author: japhb

lib/Terminal/Widgets/Volatile/DirTree.rakumod

@@ -7,7 +7,9 @@ role Node {
     has IO::Path:D() $.path is required;
     has Node         $.parent;
 
-    method gist() {
+
+    #| Simplified gist that does not traverse parents
+    method gist(::?CLASS:D:) {
         my $short-name = self.^name.subst('Terminal::Widgets::Volatile::', '');
         $short-name ~ ':' ~ $!path.path
     }
@@ -22,7 +24,9 @@ class File does Node {
 class SymLink does Node {
     has IO::Path:D() $.target is required;
 
-    method gist() {
+
+    #| Standard node gist plus target
+    method gist(::?CLASS:D:) {
         self.Node::gist ~ ' => ' ~ $!target.path
     }
 }
@@ -31,7 +35,9 @@ class Dir does Node {
     has Node:D    @!children   is built;
     has Instant:D $.cache-time .= from-posix-nanos(0);
 
-    method children(Bool:D :$refresh = False) {
+
+    #| Lazily find (and cache) children, forcing a refresh if requested
+    method children(::?CLASS:D: Bool:D :$refresh = False) {
         # XXXX: For now, just fake real caching and be lazy
         if $refresh || !$!cache-time {
             $!cache-time = now;