talexander/organic
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Add support for empty lesser blocks.

Browse Source
This commit is contained in:
Tom Alexander 2023-09-06 18:11:57 -04:00
parent 6e2fc362ea
commit 3fc3a5d1ef
Signed by: talexander
GPG Key ID: D3A179C9A53C0EDE
3 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
org_mode_samples/lesser_element/lesser_block/src_empty.org Normal file
View File

@ -0,0 +1,2 @@
#+begin_src
#+end_src

2
src/compare/diff.rs
View File

@ -1223,6 +1223,8 @@ fn compare_src_block<'s>(
Ok(_) => {} Ok(_) => {}
}; };
// TODO: Compare :language :switches :parameters :number-lines :preserve-indent :retain-labels :use-labels :label-fmt :value
Ok(DiffResult { Ok(DiffResult {
status: this_status, status: this_status,
name: emacs_name.to_owned(), name: emacs_name.to_owned(),

7
src/parser/util.rs
View File

@ -8,7 +8,6 @@ use nom::combinator::not;
use nom::combinator::opt; use nom::combinator::opt;
use nom::combinator::peek; use nom::combinator::peek;
use nom::combinator::recognize; use nom::combinator::recognize;
use nom::combinator::verify;
use nom::multi::many0; use nom::multi::many0;
use nom::multi::many_till; use nom::multi::many_till;
use nom::sequence::tuple; use nom::sequence::tuple;
@ -160,9 +159,9 @@ pub fn text_until_exit<'b, 'g, 'r, 's>(
context: RefContext<'b, 'g, 'r, 's>, context: RefContext<'b, 'g, 'r, 's>,
input: OrgSource<'s>, input: OrgSource<'s>,
) -> Res<OrgSource<'s>, OrgSource<'s>> { ) -> Res<OrgSource<'s>, OrgSource<'s>> {
recognize(verify( recognize(many_till(
many_till(anychar, parser_with_context!(exit_matcher_parser)(context)), anychar,
|(children, _exit_contents)| !children.is_empty(), parser_with_context!(exit_matcher_parser)(context),
))(input) ))(input)
} }