fml 0.6.2

Friendly Markup Language
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

use crate::{
    ast::*,
    parser::{
        Stream,
        functions::{macros::*, styles::*},
    },
};
use winnow::{
    Result,
    ascii::*,
    combinator::{repeat, *},
    error::{ContextError, ParserError, StrContext},
    prelude::*,
    token::*,
};

pub fn nestables<'i>(input: &mut Stream<'i>) -> Result<FmlValue> {
    alt((quote, list)).parse_next(input)
}

fn quote<'i>(input: &mut Stream<'i>) -> Result<FmlValue> {
    let scope: String = llp!(">").parse_next(input)?;
    let mut state = input.state.clone();
    state.is_sol = true;
    state.is_in_heading = false;
    inner_fml(&scope, state).map(FmlValue::Quote)
}

fn list<'i>(input: &mut Stream<'i>) -> Result<FmlValue> {
    let scope: String = llp!("-").parse_next(input)?;
    let next_line = || {
        alt((
            preceded(
                opt::<_, _, ContextError<_>, _>('\\'),
                (line_ending, '-', space1).take(),
            ),
            preceded('\\', line_ending),
        ))
    };

    let mut items: Vec<String> = repeat(
        1..,
        repeat_till(
            1..,
            alt((preceded(space0, next_line()), not!(line_ending))),
            alt((
                delimited(space0, line_ending, not(("-", space1))),
                preceded(space0, eof),
            )),
        )
        .map(|(x, _): (String, _)| x),
    )
    .parse(&scope[..])
    .map_err(|e| e.into_inner())?;

    let mut state = input.state.clone();
    state.is_in_heading = false;
    state.is_sol = true; // these will allow quoted headings and nested quotes

    let mut values = vec![];
    for item in items {
        values.push(
            fml_values(Stream {
                input: &item,
                state: state.clone(),
            })
            .map(ListItem)?,
        )
    }

    Ok(FmlValue::List(FmlList(values)))
}