LCPQ
/
EZFIO
mirror of https://gitlab.com/scemama/EZFIO.git
10
0
Fork 0
Code Releases Activity

Error in previous commit

This commit is contained in:
Anthony Scemama 2014-10-17 11:55:07 +02:00
parent f77c499fc2
commit 0c097dac4f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ezfio.ml
View File

@ -104,6 +104,7 @@ let ltrim s =
| ' ' -> do_work (String.sub s 1 (l-1)) (l-1)
| _ -> s
in
let l = String.length s in
if (l > 0) then do_work s l
else s
;;
@ -116,6 +117,7 @@ let rtrim s =
| ' ' -> do_work (String.sub s 0 (newl)) (newl)
| _ -> s
in
let l = String.length s in
if (l > 0) then do_work s l
else s
;;