pddl 0.2.0

A PDDL 3.1 parser, strongly typed
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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76

//! Provides parsers for f-heads.

use nom::branch::alt;
use nom::character::complete::multispace1;
use nom::combinator::map;
use nom::sequence::preceded;
use nom::Parser;

use crate::parsers::{parens, space_separated_list0, ParseResult, Span};
use crate::parsers::{parse_function_symbol, parse_term};
use crate::types::FunctionHead;

/// Parses an f-head.
///
/// ## Example
/// ```
/// # use pddl::parsers::{parse_f_head, preamble::*};
/// # use pddl::{FunctionTerm, Variable, FunctionSymbol, Term, FunctionHead};
/// assert!(parse_f_head("fun-sym").is_value(
///     FunctionHead::new(FunctionSymbol::string("fun-sym"))
/// ));
///
/// assert!(parse_f_head("(fun-sym)").is_value(
///     FunctionHead::new(FunctionSymbol::string("fun-sym"))
/// ));
///
/// assert!(parse_f_head("(fun-sym term)").is_value(
///     FunctionHead::with_terms(FunctionSymbol::string("fun-sym"), [
///         Term::Name("term".into())
///     ])
/// ));
///```
pub fn parse_f_head<'a, T: Into<Span<'a>>>(input: T) -> ParseResult<'a, FunctionHead> {
    let simple = map(parse_function_symbol, FunctionHead::new);
    let simple_parens = map(parens(parse_function_symbol), FunctionHead::new);
    let with_terms = map(
        parens((
            parse_function_symbol,
            preceded(multispace1, space_separated_list0(parse_term)),
        )),
        |(symbol, terms)| FunctionHead::with_terms(symbol, terms),
    );

    alt((simple, simple_parens, with_terms)).parse(input.into())
}

impl crate::parsers::Parser for FunctionHead {
    type Item = FunctionHead;

    /// See [`parse_f_head`].
    fn parse<'a, S: Into<Span<'a>>>(input: S) -> ParseResult<'a, Self::Item> {
        parse_f_head(input)
    }
}

#[cfg(test)]
mod tests {
    use crate::parsers::UnwrapValue;
    use crate::{FunctionHead, FunctionSymbol, Parser, Term};

    #[test]
    fn test_parse() {
        assert!(FunctionHead::parse("fun-sym")
            .is_value(FunctionHead::new(FunctionSymbol::string("fun-sym"))));

        assert!(FunctionHead::parse("(fun-sym)")
            .is_value(FunctionHead::new(FunctionSymbol::string("fun-sym"))));

        assert!(
            FunctionHead::parse("(fun-sym term)").is_value(FunctionHead::with_terms(
                FunctionSymbol::string("fun-sym"),
                [Term::Name("term".into())]
            ))
        );
    }
}