catools: Fix syntax error from vxWorks gcc.

src/catools/tool_lib.c

@@ -447,9 +447,11 @@ char *dbr2str (const void *value, unsigned type)
         dbr_char_t *s = (dbr_char_t*) dbr_value_ptr(pv->value, pv->dbrType); \
         size_t len = strlen((char*)s);                                  \
         unsigned long elems = reqElems && (reqElems < pv->nElems) ? reqElems : pv->nElems; \
+        int dlen;                                                       \
+        char *d;                                                        \
         if (len < elems) elems = len;                                   \
-        int dlen = epicsStrnEscapedFromRawSize((char*)s, elems);        \
-        char *d = calloc(dlen+1, sizeof(char));                         \
+        dlen = epicsStrnEscapedFromRawSize((char*)s, elems);            \
+        d = calloc(dlen+1, sizeof(char));                               \
         if(d) {                                                         \
             epicsStrnEscapedFromRaw(d, dlen+1, (char*)s, elems);        \
             printf("%c%s", fieldSeparator, d);                          \