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-highlighter
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
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
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Cloogle
clean-highlighter
Commits
7ecdbbd1
Verified
Commit
7ecdbbd1
authored
Jul 04, 2018
by
Camil Staps
🚀
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Fix
#8
: remove special case for newline in types
parent
0d3b56e3
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
81 additions
and
2 deletions
+81
-2
clean.js
clean.js
+1
-2
tests/instances-Applicative
tests/instances-Applicative
+80
-0
No files found.
clean.js
View file @
7ecdbbd1
...
...
@@ -207,6 +207,7 @@ function highlightClean(func, callback, start) {
'
keyword
'
,
'
whitespace
'
,
'
keyword
'
,
'
whitespace
'
,
'
punctuation
'
]
,
'
type
'
],
[
/
(\()(\S
+
)(\))
/
,[
'
punctuation
'
,
'
funcname
'
,
'
punctuation
'
],
'
funcargs
'
],
[
/
(
infix
[
rl
]?)(\s
+
)(\d
*
)
/
,
[
'
keyword
'
,
'
whitespace
'
,
'
keyword
'
]],
[
/
(
foreign export
(?:
(?:
c|std
)
call
)?)
/
,
...
...
@@ -259,7 +260,6 @@ function highlightClean(func, callback, start) {
[
/
(\|
}
)
/
,
[
'
punctuation
'
],
'
jump:funcargs
'
],
],
type
:
[
[
/
(\n)
/
,
[
'
whitespace
'
],
'
pop
'
],
[
/
(
where
)
/
,
[
'
keyword
'
],
'
pop
'
],
[
/
(
of
)
/
,
[
'
keyword
'
],
'
typeOfPattern
'
],
[
/
([
a-z
][\w
`
]
*
)
/
,
[
'
typevar
'
]],
...
...
@@ -303,7 +303,6 @@ function highlightClean(func, callback, start) {
[
/
([
*>-
]
+
\|\})
/
,
[
'
punctuation
'
],
'
jump:contextType
'
]
],
contextType
:
[
[
/
(\n)
/
,
[
'
whitespace
'
],
'
pop:2;macro
'
],
[
/
(
special
)
/
,
[
'
keyword
'
],
'
pop:2;special
'
],
[
/
(
,
)
/
,
[
'
punctuation
'
]],
[
/
(
&
)
/
,
[
'
punctuation
'
],
'
pop
'
],
...
...
tests/instances-Applicative
0 → 100644
View file @
7ecdbbd1
-----
instance Functor (Const m)
instance Functor (WrappedMonad m) | Monad m
instance Applicative (Const m) | Monoid m
instance Applicative (WrappedMonad m) | Monad m
instance Monad (WrappedMonad m) | Monad m
-----
keyword instance
whitespace
classname Functor
whitespace
punctuation (
type Const
whitespace
typevar m
punctuation )
whitespace \n
keyword instance
whitespace
classname Functor
whitespace
punctuation (
type WrappedMonad
whitespace
typevar m
punctuation )
whitespace
punctuation |
whitespace
classname Monad
whitespace
typevar m
whitespace \n
keyword instance
whitespace
classname Applicative
whitespace
punctuation (
type Const
whitespace
typevar m
punctuation )
whitespace
punctuation |
whitespace
classname Monoid
whitespace
typevar m
whitespace \n
keyword instance
whitespace
classname Applicative
whitespace
punctuation (
type WrappedMonad
whitespace
typevar m
punctuation )
whitespace
punctuation |
whitespace
classname Monad
whitespace
typevar m
whitespace \n
keyword instance
whitespace
classname Monad
whitespace
punctuation (
type WrappedMonad
whitespace
typevar m
punctuation )
whitespace
punctuation |
whitespace
classname Monad
whitespace
typevar m
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