static void saveDocument (TextEditor me, MelderFile file) {
autostring32 text = GuiText_getString (my textWidget);
MelderFile_writeText (file, text.peek(), Melder_getOutputEncoding ());
my dirty = false;
MelderFile_copy (file, & my file);
if (my v_fileBased ()) Thing_setName (me, Melder_fileToPath (file));
}
void Strings_writeToRawTextFile (Strings me, MelderFile file) {
autoMelderString buffer;
for (long i = 1; i <= my numberOfStrings; i ++) {
MelderString_append (& buffer, my strings [i], L"\n");
}
MelderFile_writeText (file, buffer.string);
}
void TableOfReal_writeToHeaderlessSpreadsheetFile (TableOfReal me, MelderFile file) {
try {
autoMelderString buffer;
MelderString_copy (& buffer, L"rowLabel");
for (long icol = 1; icol <= my numberOfColumns; icol ++) {
MelderString_appendCharacter (& buffer, '\t');
wchar_t *s = my columnLabels [icol];
MelderString_append (& buffer, s != NULL && s [0] != '\0' ? s : L"?");
}
MelderString_appendCharacter (& buffer, '\n');
for (long irow = 1; irow <= my numberOfRows; irow ++) {
wchar_t *s = my rowLabels [irow];
MelderString_append (& buffer, s != NULL && s [0] != '\0' ? s : L"?");
for (long icol = 1; icol <= my numberOfColumns; icol ++) {
MelderString_appendCharacter (& buffer, '\t');
double x = my data [irow] [icol];
MelderString_append (& buffer, Melder_double (x));
}
MelderString_appendCharacter (& buffer, '\n');
}
MelderFile_writeText (file, buffer.string, Melder_getOutputEncoding ());
} catch (MelderError) {
Melder_throw (me, ": not saved to tab-separated file.");
}
}
