Permalink
Browse files

New package and minor change to -run

  • Loading branch information...
trishume committed Jun 11, 2012
1 parent df7839e commit f2124d5b4697dab952659085ed593b4503d12925
View
Binary file not shown.
Binary file not shown.
View
Binary file not shown.
View
@@ -2281,14 +2281,13 @@ void EdRun_RunProgramNoEditor (const char *pmTestDirectory, const char *pmTestFi
myFontSize = 9;
}
}
-
if (!MIO_Init_Run (pmTestFileName,
NULL,
FALSE,
NULL,
FALSE, FALSE,
myExecutionDirectory, // Execution directory
- FALSE, // Graphics Mode
+ TRUE, // Graphics Mode
gProperties.runConsoleFontName, // Run window font name
myFontSize, // Run window font size
0, // Run window font width
@@ -2320,6 +2319,8 @@ void EdRun_RunProgramNoEditor (const char *pmTestDirectory, const char *pmTestFi
{
MyExecuteQuantum (&myNumErrors, NULL);
+ // If we're using sprites, then it may be time to update the screen.
+ MIO_UpdateSpritesIfNecessary ();
Ed_ProcessWaitingEvents (stTuringProgramWaitingForEvent);
} while (stRunStatus.state != Finished);
View
@@ -21,7 +21,7 @@ var sum := 0
for i : 1..100
sum += collatz(90)
end for
-put "its:",sums
+put "its:",sum
put "time:",Time.Elapsed - start
delay(2000)
Binary file not shown.
View
Binary file not shown.

0 comments on commit f2124d5

Please sign in to comment.