diff options
author | Erik de Castro Lopo <erikd@mega-nerd.com> | 2016-05-29 07:26:39 +1000 |
---|---|---|
committer | Erik de Castro Lopo <erikd@mega-nerd.com> | 2016-05-29 07:26:40 +1000 |
commit | 1e6701011425edb3553abc17c094a2a9faee4fd5 (patch) | |
tree | 37e8d2672b04fbf4b87b8f84359f52c1875a1c7f /rts | |
parent | d40682ec74d802376d7cf50f2d3612b3292b29c5 (diff) | |
download | haskell-1e6701011425edb3553abc17c094a2a9faee4fd5.tar.gz |
RtsFlags.c: Const correct fixes
Test Plan: validate
Reviewers: hvr, austin, simonmar, bgamari
Reviewed By: bgamari
Subscribers: thomie
Differential Revision: https://phabricator.haskell.org/D2275
Diffstat (limited to 'rts')
-rw-r--r-- | rts/RtsFlags.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c index 31a2c8b4f2..1ec5db0bb0 100644 --- a/rts/RtsFlags.c +++ b/rts/RtsFlags.c @@ -1609,8 +1609,8 @@ static rtsBool read_heap_profiling_flag(const char *arg) case 'b': if (arg[2] != '\0' && arg[3] != '\0') { { - char *left = strchr(arg, '{'); - char *right = strrchr(arg, '}'); + const char *left = strchr(arg, '{'); + const char *right = strrchr(arg, '}'); // curly braces are optional, for // backwards compat. |