sdl

#lang racket
(require sdl)

(define error (SDL_Init SDL_INIT_JOYSTICK))
(display error)

(printf "\nNumSticks\n")
(SDL_NumJoysticks)

(SDL_JoystickNameForIndex 1)


(printf "Quit")
(SDL_Quit)