From 5b965d180a1f536affd51ffc2b51d5e90fbc362d Mon Sep 17 00:00:00 2001 From: David Thompson Date: Tue, 15 Dec 2020 17:39:01 -0500 Subject: Add SDL_GetPerformanceCounter and SDL_GetPerformanceFrequency bindings. --- sdl2/bindings.scm | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'sdl2/bindings.scm') diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm index 373f3aa..a9fa17c 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -1007,6 +1007,12 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-get-ticks uint32 "SDL_GetTicks" '()) +(define-foreign sdl-get-performance-counter + uint64 "SDL_GetPerformanceCounter" '()) + +(define-foreign sdl-get-performance-frequency + uint64 "SDL_GetPerformanceFrequency" '()) + ;;; ;;; File I/O -- cgit v1.2.3