Index: generic/nsfError.c
===================================================================
diff -u -N -rdbd95b0155c23213b81125e318b0691cb75f66f5 -r453ad27418d60f0ab744ae4ac911bcd5e2505140
--- generic/nsfError.c	(.../nsfError.c)	(revision dbd95b0155c23213b81125e318b0691cb75f66f5)
+++ generic/nsfError.c	(.../nsfError.c)	(revision 453ad27418d60f0ab744ae4ac911bcd5e2505140)
@@ -48,10 +48,11 @@
 			    NsfObject *contextObject, const char *pattern)
   nonnull(1) nonnull(2) returns_nonnull;
 
+
 /*
  *----------------------------------------------------------------------
  *
- * NsfDStringPrintf --
+ * NsfDStringVPrintf --
  *
  *      Appends to a Tcl_DString a formatted value. This function
  *      iterates until it has sufficiently memory allocated.
@@ -66,7 +67,7 @@
  */
 
 void
-NsfDStringPrintf(Tcl_DString *dsPtr, const char *fmt, va_list vargs) {
+NsfDStringVPrintf(Tcl_DString *dsPtr, const char *fmt, va_list vargs) {
   int      result, failure, offset = dsPtr->length, avail = dsPtr->spaceAvl;
   va_list  vargsCopy;
 
@@ -127,7 +128,34 @@
   }
 }
 
+/*
+ *----------------------------------------------------------------------
+ * Nsf_DStringPrintf --
+ *
+ *      Append a sequence of values using a format string.
+ *
+ * Results:
+ *      Pointer to the current string value.
+ *
+ * Side effects:
+ *      None.
+ *
+ *----------------------------------------------------------------------
+ */
 
+void
+Nsf_DStringPrintf(Tcl_DString *dsPtr, const char *fmt, ...)
+{
+    va_list         ap;
+
+    assert(dsPtr != NULL);
+    assert(fmt != NULL);
+
+    va_start(ap, fmt);
+    NsfDStringVPrintf(dsPtr, fmt, ap);
+    va_end(ap);
+}
+
 /*
  *----------------------------------------------------------------------
  *
@@ -182,7 +210,7 @@
   Tcl_DStringInit(&ds);
 
   va_start(ap, fmt);
-  NsfDStringPrintf(&ds, fmt, ap);
+  NsfDStringVPrintf(&ds, fmt, ap);
   va_end(ap);
 
   Tcl_SetObjResult(interp, Tcl_NewStringObj(Tcl_DStringValue(&ds), -1));