equal
deleted
inserted
replaced
15 if runQueue <> nil then |
15 if runQueue <> nil then |
16 begin |
16 begin |
17 if runQueue^.gameType = gtPreview then |
17 if runQueue^.gameType = gtPreview then |
18 sendUI(mtRenderingPreview, nil, 0); |
18 sendUI(mtRenderingPreview, nil, 0); |
19 |
19 |
20 ipcCleanEngineQueue(); |
20 ipcRemoveBarrierFromEngineQueue(); |
21 RunEngine(runQueue^.argumentsNumber, @runQueue^.argv); |
21 RunEngine(runQueue^.argumentsNumber, @runQueue^.argv); |
22 |
22 |
23 sendConfig(runQueue) |
23 sendConfig(runQueue) |
24 end |
24 end |
25 end; |
25 end; |
34 |
34 |
35 procedure queueExecution(var config: TGameConfig); |
35 procedure queueExecution(var config: TGameConfig); |
36 var pConfig, t, tt: PGameConfig; |
36 var pConfig, t, tt: PGameConfig; |
37 i: Longword; |
37 i: Longword; |
38 begin |
38 begin |
|
39 ipcSetEngineBarrier(); |
|
40 |
39 new(pConfig); |
41 new(pConfig); |
40 pConfig^:= config; |
42 pConfig^:= config; |
41 |
43 |
42 with pConfig^ do |
44 with pConfig^ do |
43 begin |
45 begin |