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
//! Provides parsers for literals.
use nom::branch::alt;
use nom::combinator::map;
use crate::parsers::prefix_expr;
use crate::parsers::{atomic_formula, ParseResult, Span};
use crate::types::Literal;
/// Parser combinator that parses a literal, i.e. `<atomic formula(t)> | (not <atomic formula(t)>)`.
///
/// ## Example
/// ```
/// # use nom::character::complete::alpha1;
/// # use pddl::parsers::{literal, parse_name, preamble::*};
/// # use pddl::{AtomicFormula, EqualityAtomicFormula, PredicateAtomicFormula, Predicate, Literal};
/// assert!(literal(parse_name)(Span::new("(= x y)")).is_value(
/// Literal::AtomicFormula(
/// AtomicFormula::Equality(
/// EqualityAtomicFormula::new(
/// "x".into(),
/// "y".into()
/// )
/// )
/// )
/// ));
/// assert!(literal(parse_name)(Span::new("(not (= x y))")).is_value(
/// Literal::NotAtomicFormula(
/// AtomicFormula::Equality(
/// EqualityAtomicFormula::new(
/// "x".into(),
/// "y".into()
/// )
/// )
/// )
/// ));
/// ```
pub fn literal<'a, F, O>(inner: F) -> impl FnMut(Span<'a>) -> ParseResult<'a, Literal<O>>
where
F: Clone + FnMut(Span<'a>) -> ParseResult<'a, O>,
{
let is = map(atomic_formula(inner.clone()), |af| Literal::new(af));
let is_not = map(prefix_expr("not", atomic_formula(inner)), |af| {
Literal::new_not(af)
});
alt((is_not, is))
}
#[cfg(test)]
mod tests {
use crate::parsers::{literal, parse_name, Span, UnwrapValue};
use crate::{AtomicFormula, EqualityAtomicFormula, Literal};
#[test]
fn test_parse() {
assert!(
literal(parse_name)(Span::new("(= x y)")).is_value(Literal::AtomicFormula(
AtomicFormula::Equality(EqualityAtomicFormula::new("x".into(), "y".into()))
))
);
assert!(literal(parse_name)(Span::new("(not (= x y))")).is_value(
Literal::NotAtomicFormula(AtomicFormula::Equality(EqualityAtomicFormula::new(
"x".into(),
"y".into()
)))
));
}
}