Rust version of Clojure condp apply expression

condp_apply.rs

// (condp apply [2 3]
//   = "eq"
//   < "lt"
//   > "gt")
// ;;=> "lt"

macro_rules! condp_apply {
    ( $input:tt, {$($func:tt: $r:tt),*} ) => {
        {
            let mut result: &str = "other";
            $(
                if $func($input) {
                    result = $r;
                }
            )*
            result
        }
    };
}

fn fun_a(value: &str) -> bool {
    value == "A"
}

fn fun_b(value: &str) -> bool {
    value == "B"
}

fn main() {
    let input = "A";

    let result: &str = condp_apply!(
        input,
        {
            fun_a: "A",
            fun_b: "B",
            fun_b: "V",
            fun_b: "C"
        }
    );
    println!("{:?}", result);
}

#[cfg(test)]
mod tests {
    use super::*;

    #[test]
    fn test_apply_a() {
        let result: &str = condp_apply!(
        "A",
        {
            fun_a: "A",
            fun_b: "B"
        });

        assert_eq!(result, "A");
    }

    #[test]
    fn test_apply_other() {
        let result: &str = condp_apply!(
        "Z",
        {
            fun_a: "A",
            fun_b: "B"
        });

        assert_eq!(result, "other");
    }

}