[[ Foundation ]] Added MCListAppendFormat() method.

runrevmark · runrevmark · commit fc73dac05e63 · 2013-10-04T12:28:02.000+01:00
diff --git a/libfoundation/include/foundation.h b/libfoundation/include/foundation.h
@@ -1743,8 +1743,13 @@ bool MCListCreateMutable(char_t delimiter, MCListRef& r_list);
 
 // Eventually this will accept any value type, but for now - just strings, names, and booleans.
 bool MCListAppend(MCListRef list, MCValueRef value);
+
+// Append a sequence of native chars as an element.
 bool MCListAppendNativeChars(MCListRef list, const char_t *chars, uindex_t char_count);
 
+// Append a formatted string as an element.
+bool MCListAppendFormat(MCListRef list, const char *format, ...);
+
 // Make an immutable copy of the list.
 // Note that this method is fragile at the moment and should only be used to
 // copy a list out of an autolistref that is about to be deallocated.
diff --git a/libfoundation/src/foundation-list.cpp b/libfoundation/src/foundation-list.cpp
@@ -103,6 +103,28 @@ bool MCListCopyAsStringAndRelease(MCListRef self, MCStringRef& r_string)
 	return true;
 }
 
+bool MCListAppendFormat(MCListRef self, const char *p_format, ...)
+{
+	bool t_success;
+	t_success = true;
+
+	MCStringRef t_string;
+	t_string = nil;
+	
+	va_list t_args;
+	va_start(t_args, p_format);
+	t_success = MCStringFormatV(t_string, p_format, t_args);
+	va_end(t_args);
+	
+	if (t_success)
+		t_success = MCListAppend(self, t_string);
+	
+	if (t_string != nil)
+		MCValueRelease(t_string);
+	
+	return t_success;
+}
+
 bool MCListAppendNativeChars(MCListRef self, const char_t *p_chars, uindex_t p_char_count)
 {
 	bool t_first = self->buffer == nil;
