language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-28 14:24:45 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

don't leak implementation details

Browse source
This commit is contained in:
Folkert 2021-03-09 23:20:31 +01:00
parent bd61a03ae0
commit 91271d0308
5 changed files with 42 additions and 55 deletions
Download patch file Download diff file Expand all files Collapse all files

12
compiler/parse/src/module.rs
View file

@ -16,11 +16,17 @@ use crate::type_annotation;
use bumpalo::collections::Vec;
use roc_region::all::Located;
pub fn header<'a>() -> impl Parser<'a, Module<'a>, SyntaxError<'a>> {
specialize(|e, _, _| SyntaxError::Header(e), header_help())
pub fn parse_header<'a>(
arena: &'a bumpalo::Bump,
state: State<'a>,
) -> Result<(Module<'a>, State<'a>), EHeader<'a>> {
match header().parse(arena, state) {
Ok((_, module, state)) => Ok((module, state)),
Err((_, fail, _)) => Err(fail),
}
}
fn header_help<'a>() -> impl Parser<'a, Module<'a>, EHeader<'a>> {
fn header<'a>() -> impl Parser<'a, Module<'a>, EHeader<'a>> {
use crate::parser::keyword_e;
one_of![

14
compiler/parse/src/test_helpers.rs
View file

@ -1,7 +1,7 @@
use crate::ast;
use crate::blankspace::space0_before;
use crate::expr::expr;
use crate::module::{header, module_defs};
use crate::module::module_defs;
use crate::parser::{loc, Parser, State, SyntaxError};
use bumpalo::collections::Vec;
use bumpalo::Bump;
@ -14,18 +14,6 @@ pub fn parse_expr_with<'a>(
parse_loc_with(arena, input).map(|loc_expr| loc_expr.value)
}
pub fn parse_header_with<'a>(
arena: &'a Bump,
input: &'a str,
) -> Result<ast::Module<'a>, SyntaxError<'a>> {
let state = State::new_in(arena, input.trim().as_bytes());
let answer = header().parse(arena, state);
answer
.map(|(_, loc_expr, _)| loc_expr)
.map_err(|(_, fail, _)| fail)
}
#[allow(dead_code)]
pub fn parse_defs_with<'a>(
arena: &'a Bump,

41
compiler/parse/tests/test_parse.rs
View file

@ -2433,9 +2433,8 @@ mod test_parse {
app "test-app" packages {} imports [] provides [] to blah
"#
);
let actual = roc_parse::module::header()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
let actual = roc_parse::module::parse_header(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.0);
assert_eq!(Ok(expected), actual);
}
@ -2474,9 +2473,8 @@ mod test_parse {
"#
);
let actual = roc_parse::module::header()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
let actual = roc_parse::module::parse_header(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.0);
assert_eq!(Ok(expected), actual);
}
@ -2530,9 +2528,8 @@ mod test_parse {
"#
);
let actual = roc_parse::module::header()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
let actual = roc_parse::module::parse_header(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.0);
assert_eq!(Ok(expected), actual);
}
@ -2576,9 +2573,8 @@ mod test_parse {
let expected = roc_parse::ast::Module::Platform { header };
let src = "platform rtfeldman/blah requires {} exposes [] packages {} imports [] provides [] effects fx.Blah {}";
let actual = roc_parse::module::header()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
let actual = roc_parse::module::parse_header(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.0);
assert_eq!(Ok(expected), actual);
}
@ -2646,9 +2642,8 @@ mod test_parse {
effects fx.Effect {}
"#
);
let actual = roc_parse::module::header()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
let actual = roc_parse::module::parse_header(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.0);
assert_eq!(Ok(expected), actual);
}
@ -2678,9 +2673,8 @@ mod test_parse {
interface Foo exposes [] imports []
"#
);
let actual = roc_parse::module::header()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
let actual = roc_parse::module::parse_header(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.0);
assert_eq!(Ok(expected), actual);
}
@ -2710,9 +2704,8 @@ mod test_parse {
interface Foo.Bar.Baz exposes [] imports []
"#
);
let actual = roc_parse::module::header()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
let actual = roc_parse::module::parse_header(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.0);
assert_eq!(Ok(expected), actual);
}
@ -2818,7 +2811,7 @@ mod test_parse {
let actual = module_defs()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
.map(|tuple| tuple.0);
assert!(actual.is_ok());
}
@ -2840,7 +2833,7 @@ mod test_parse {
let actual = module_defs()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
.map(|tuple| tuple.0);
assert!(actual.is_ok());
}
@ -2861,7 +2854,7 @@ mod test_parse {
let actual = module_defs()
.parse(&arena, State::new_in(&arena, src.as_bytes()))
.map(|tuple| tuple.1);
.map(|tuple| tuple.0);
dbg!(&actual);