language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-30 07:14:46 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 7

parse a shortname prefix before Effects

Browse source
This commit is contained in:
Folkert 2021-01-31 13:43:19 +01:00
parent 44fd0351be
commit 53afa3c3fc
4 changed files with 12 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
compiler/parse/src/header.rs
View file

@ -143,11 +143,13 @@ pub struct PlatformHeader<'a> {
pub after_provides: &'a [CommentOrNewline<'a>],
}
/// e.g. fx.Effects
#[derive(Clone, Debug, PartialEq)]
pub struct Effects<'a> {
pub spaces_before_effects_keyword: &'a [CommentOrNewline<'a>],
pub spaces_after_effects_keyword: &'a [CommentOrNewline<'a>],
pub spaces_after_type_name: &'a [CommentOrNewline<'a>],
pub type_shortname: &'a str,
pub type_name: &'a str,
pub entries: Vec<'a, Loc<TypedIdent<'a>>>,
}

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

@ -490,6 +490,11 @@ fn effects<'a>() -> impl Parser<'a, Effects<'a>> {
let (spaces_before_effects_keyword, state) =
skip_second!(space1(0), ascii_string("effects")).parse(arena, state)?;
let (spaces_after_effects_keyword, state) = space1(0).parse(arena, state)?;
// e.g. `fx.`
let (type_shortname, state) =
skip_second!(lowercase_ident(), ascii_char(b'.')).parse(arena, state)?;
let ((type_name, spaces_after_type_name), state) =
and!(uppercase_ident(), space1(0)).parse(arena, state)?;
let (entries, state) = collection!(
@ -506,6 +511,7 @@ fn effects<'a>() -> impl Parser<'a, Effects<'a>> {
spaces_before_effects_keyword,
spaces_after_effects_keyword,
spaces_after_type_name,
type_shortname,
type_name,
entries,
},