[[ Foundation ]] Added MCListAppendSubstring.

runrevmark · runrevmark · commit 4c122d28e49c · 2013-10-04T13:22:33.000+01:00
diff --git a/libfoundation/include/foundation.h b/libfoundation/include/foundation.h
@@ -1751,6 +1751,9 @@ 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 substring to the list.
+bool MCListAppendSubstring(MCListRef list, MCStringRef value, MCRange range);
+
 // Append a sequence of native chars as an element.
 bool MCListAppendNativeChars(MCListRef list, const char_t *chars, uindex_t char_count);
 
diff --git a/libfoundation/src/foundation-list.cpp b/libfoundation/src/foundation-list.cpp
@@ -138,6 +138,11 @@ bool MCListAppendNativeChars(MCListRef self, const char_t *p_chars, uindex_t p_c
 	return MCStringAppendNativeChars(self -> buffer, p_chars, p_char_count);
 }
 
+bool MCListAppendSubstring(MCListRef self, MCStringRef p_string, MCRange p_range)
+{
+	return MCListAppendFormat(self, "%*@", &p_range, p_string);
+}
+
 bool MCListIsEmpty(MCListRef self)
 {
 	return self -> buffer == nil;

Original file line number	Diff line number	Diff line change
`@@ -138,6 +138,11 @@ bool MCListAppendNativeChars(MCListRef self, const char_t *p_chars, uindex_t p_c`
`138`	`138`	`return MCStringAppendNativeChars(self -> buffer, p_chars, p_char_count);`
`139`	`139`	`}`
`140`	`140`
	`141`	`+bool MCListAppendSubstring(MCListRef self, MCStringRef p_string, MCRange p_range)`
	`142`	`+{`
	`143`	`+ return MCListAppendFormat(self, "%*@", &p_range, p_string);`
	`144`	`+}`
	`145`	`+`
`141`	`146`	`bool MCListIsEmpty(MCListRef self)`
`142`	`147`	`{`
`143`	`148`	`return self -> buffer == nil;`