Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
pub
frama-c
Commits
ca15ad69
Commit
ca15ad69
authored
Oct 13, 2020
by
Andre Maroneze
💬
Committed by
Virgile Prevosto
Oct 19, 2020
Browse files
[Filepath] robustify to_base_uri
parent
17b9a5b7
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/libraries/utils/filepath.ml
View file @
ca15ad69
...
...
@@ -286,7 +286,9 @@ module Normalized = struct
Buffer
.
contents
buf
in
let
uri
=
try
String
.
sub
uri
1
(
String
.
length
uri
-
1
)
if
String
.
get
uri
0
=
'
/
'
then
String
.
sub
uri
1
(
String
.
length
uri
-
1
)
else
uri
with
Invalid_argument
_
->
uri
in
res
,
uri
...
...
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