branch | physfslayer |
changeset 8520 | 1dedcc37bfe8 |
parent 8437 | 93b647d6a00f |
child 9080 | 9b42757d7e71 |
8056:d5d5e1698554 | 8520:1dedcc37bfe8 |
---|---|
32 procedure OutError(Msg: shortstring; isFatalError: boolean); |
32 procedure OutError(Msg: shortstring; isFatalError: boolean); |
33 begin |
33 begin |
34 WriteLnToConsole(Msg); |
34 WriteLnToConsole(Msg); |
35 if isFatalError then |
35 if isFatalError then |
36 begin |
36 begin |
37 ParseCommand('fatal ' + GetLastConsoleLine, true); |
37 ParseCommand('fatal ' + lastConsoleline, true); |
38 SDL_Quit; |
38 SDL_Quit; |
39 halt(1) |
39 halt(1) |
40 end |
40 end |
41 end; |
41 end; |
42 |
42 |