Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-and-itasks
clean-ide
Commits
96b18ae0
Commit
96b18ae0
authored
Feb 27, 2013
by
John van Groningen
Browse files
fix function non_space_left
parent
ba3c1b44
Changes
1
Hide whitespace changes
Inline
Side-by-side
Pm/PmDriver.icl
View file @
96b18ae0
...
...
@@ -951,7 +951,9 @@ where
non_space_left
::
!
Int
->
Int
non_space_left
i
|
i
<
size_s
&&
isSpace
s
.[
i
]
=
non_space_left
(
i
+1
)
|
i
<
size_s
&&
isSpace
s
.[
i
]
=
non_space_left
(
i
+1
)
=
i
lSplit
::
!.
Char
!
String
->
[
String
]
lSplit
c
s
=
lsplit
c
s
(
dec
(
size
s
))
[]
...
...
Write
Preview
Supports
Markdown
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