Correct minor const error

git-svn-id: http://svn.cactuscode.org/flesh/trunk@5106 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 1 insertions, 1 deletions

diff --git a/src/piraha/Call.cc b/src/piraha/Call.cc
index 21ab5c54..a59d287b 100644
--- a/src/piraha/Call.cc
+++ b/src/piraha/Call.cc
@@ -252,7 +252,7 @@ smart_ptr<Value> find_val(smart_ptr<Group> gr,std::string thorn,std::string name
         case PARAMETER_KEYWORD:
             {
                 ret->type = PIR_STRING;
-                const char *s = *(const char **)result;
+                const char *s = *(const char *const *)result;
                 ret->sdata += s;
             }
             break;