diff --git a/util/ReportTcl.cc b/util/ReportTcl.cc
index 80c06f1a..7bb49375 100644
--- a/util/ReportTcl.cc
+++ b/util/ReportTcl.cc
@@ -77,7 +77,7 @@ encapSeekProc(ClientData instanceData,
 }  // extern "C"
 
 Tcl_ChannelType tcl_encap_type_stdout = {
-    "file",
+    (char*)"file",
     TCL_CHANNEL_VERSION_5,
 #if TCL_MAJOR_VERSION < 9
     encapCloseProc,