bug fix

diff --git a/modules/src/em_mes/C_ms_src.c b/modules/src/em_mes/C_ms_src.c
index 61ba3fc..651c448 100644 (file)
--- a/modules/src/em_mes/C_ms_src.c
+++ b/modules/src/em_mes/C_ms_src.c
@@ -12,6 +12,6 @@ C_ms_src(nlines, filnam)
 {
        C_mes_begin(ms_src);
        C_cst((arith)nlines);
-       C_scon(filnam, strlen(filnam) + 1);
+       C_scon(filnam, (arith)(strlen(filnam) + 1));
        C_mes_end();
 }