478 end;

   478 end;

   479 

   479 

   480 procedure freeEverything (complete:boolean);

   480 procedure freeEverything (complete:boolean);

   481 begin

   481 begin

   482     if complete then

   482     if complete then

   484         WriteLnToConsole('Freeing resources...');

   484         WriteLnToConsole('Freeing resources...');

   485         uAI.freeModule;             // AI things need to be freed first

   485         uAI.freeModule;             // AI things need to be freed first

   486         uAIMisc.freeModule;         //stub

   486         uAIMisc.freeModule;         //stub

   487         uAILandMarks.freeModule;

   487         uAILandMarks.freeModule;

   488         uCaptions.freeModule;

   488         uCaptions.freeModule;

   504 {$IFDEF USE_TOUCH_INTERFACE}uTouch.freeModule;{$ENDIF}  //stub

   504 {$IFDEF USE_TOUCH_INTERFACE}uTouch.freeModule;{$ENDIF}  //stub

   505 {$IFDEF ANDROID}GLUnit.freeModule;{$ENDIF}

   505 {$IFDEF ANDROID}GLUnit.freeModule;{$ENDIF}

   506         uTextures.freeModule;

   506         uTextures.freeModule;

   507         uPhysFSLayer.freeModule;

   507         uPhysFSLayer.freeModule;

   508         uLocale.freeModule;

   508         uLocale.freeModule;

   510 

   510 

   511     uIO.freeModule;

   511     uIO.freeModule;

   512     uLand.freeModule;

   512     uLand.freeModule;

   513     uLandPainted.freeModule;

   513     uLandPainted.freeModule;

   514 

   514