From 1dc7ecfdc5b7388bc1f6771328770c18aad2f372 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 21 Jan 2009 20:12:09 -0600 Subject: [PATCH] lol the hak...fix coming up --- vm/image.c | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/vm/image.c b/vm/image.c index 08aae5898c..f7ecd34aa8 100755 --- a/vm/image.c +++ b/vm/image.c @@ -112,9 +112,10 @@ bool save_image(const F_CHAR *filename) FILE* file; F_HEADER h; - F_CHAR temporary_filename[] = "##saving-factor-image##"; + F_CHAR temporary_filename[] = STRING_LITERAL("##saving-factor-image##"); - file = OPEN_WRITE(temporary_filename); + file = OPEN_WRITE(filename); + //file = OPEN_WRITE(temporary_filename); if(file == NULL) { print_string("Cannot open image file: "); print_native_string(filename); nl(); @@ -165,11 +166,13 @@ bool save_image(const F_CHAR *filename) return false; } + return true; + if(MOVE_FILE_FAILS(temporary_filename, filename)) { print_string("Failed to rename tempoarary image file: "); print_string(strerror(errno)); nl(); - if(DELETE_FILE_FAILS(temporary_filename)) - print_string("Failed to clean up temporary image file: "); print_string(strerror(errno)); nl(); + //if(DELETE_FILE_FAILS(temporary_filename)) + //print_string("Failed to clean up temporary image file: "); print_string(strerror(errno)); nl(); return false; }