419 

   419 

   420 procedure ControllerInit;

   420 procedure ControllerInit;

   421 var j: Integer;

   421 var j: Integer;

   422 begin

   422 begin

   423 ControllerEnabled:= 0;

   423 ControllerEnabled:= 0;

   425 exit; // joystick subsystem disabled on iPhone

   425 exit; // joystick subsystem disabled on iPhone

   426 {$ENDIF}

   426 {$ENDIF}

   427 

   427 

   428 SDL_InitSubSystem(SDL_INIT_JOYSTICK);

   428 SDL_InitSubSystem(SDL_INIT_JOYSTICK);

   429 ControllerNumControllers:= SDL_NumJoysticks();

   429 ControllerNumControllers:= SDL_NumJoysticks();