Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
C
clean-sapl
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
2
Issues
2
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
clean-and-itasks
clean-sapl
Commits
3661fd4e
Verified
Commit
3661fd4e
authored
Jun 27, 2018
by
Camil Staps
🚀
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
parser: remove exponentialness; allow empty files (fixes
#3
)
parent
2cafe6ba
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
5 deletions
+3
-5
src/Sapl/SaplParser.icl
src/Sapl/SaplParser.icl
+3
-5
No files found.
src/Sapl/SaplParser.icl
View file @
3661fd4e
...
@@ -307,11 +307,9 @@ typed_fun name type ts =
...
@@ -307,11 +307,9 @@ typed_fun name type ts =
skip_newlines
[
TEndOfLine
:
ts
]
=
skip_newlines
ts
skip_newlines
[
TEndOfLine
:
ts
]
=
skip_newlines
ts
skip_newlines
ts
=
returnS
ts
skip_newlines
ts
=
returnS
ts
program
ts
fs
=
program
ts
fs
=
skip_newlines
ts
>>=
\
ts
skip_newlines
ts
|
isEmpty
ts
->
returnS
(
fs
,
ts
)
>>=
\
ts
=
func
ts
|
otherwise
->
func
ts
>>=
\(
f
,
ts
)
->
program
ts
[
f
:
fs
]
>>=
\(
f
,
ts
)
=
skip_newlines
ts
>>=
\
ts
=
if
(
length
ts
==
0
)
(
returnS
([
f
:
fs
],
ts
))
(
program
ts
[
f
:
fs
])
parse
::
[
PosToken
]
->
MaybeError
ErrorMsg
([
FuncType
],
ParserState
)
parse
::
[
PosToken
]
->
MaybeError
ErrorMsg
([
FuncType
],
ParserState
)
parse
pts
parse
pts
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment