caixa-ast 0.1.34

Span-aware Lisp AST for the caixa ecosystem — shared by caixa-fmt, caixa-lint, caixa-lsp. Compatible with tatara-lisp's Sexp.
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

//! Visitor — depth-first walk over a [`crate::Node`] tree.

use crate::node::{Node, NodeKind};

/// Visitor trait — override the methods you care about, defaults recurse.
pub trait Visitor {
    fn visit_node(&mut self, node: &Node) {
        walk(self, node);
    }
}

pub fn walk<V: Visitor + ?Sized>(v: &mut V, node: &Node) {
    match &node.kind {
        // Map and Vector are compound and MUST recurse. The `_` arm
        // below is a silent trap for new compound variants: it makes a
        // missing recursion compile cleanly and simply not visit the
        // children, so every lint that walks the tree would quietly stop
        // seeing anything nested inside `{ … }` or `[ … ]`.
        NodeKind::List(items) | NodeKind::Map(items) | NodeKind::Vector(items) => {
            for item in items {
                v.visit_node(item);
            }
        }
        NodeKind::Quote(inner)
        | NodeKind::Quasiquote(inner)
        | NodeKind::Unquote(inner)
        | NodeKind::UnquoteSplice(inner) => {
            v.visit_node(inner);
        }
        _ => {}
    }
}