diff options
Diffstat (limited to 'src/lisp/ao_lisp_os.h')
| -rw-r--r-- | src/lisp/ao_lisp_os.h | 16 | 
1 files changed, 13 insertions, 3 deletions
| diff --git a/src/lisp/ao_lisp_os.h b/src/lisp/ao_lisp_os.h index 5fa3686b..4285cb8c 100644 --- a/src/lisp/ao_lisp_os.h +++ b/src/lisp/ao_lisp_os.h @@ -41,13 +41,23 @@ ao_lisp_os_led(int led)  	printf("leds set to 0x%x\n", led);  } +#define AO_LISP_JIFFIES_PER_SECOND	100 +  static inline void -ao_lisp_os_delay(int delay) +ao_lisp_os_delay(int jiffies)  {  	struct timespec ts = { -		.tv_sec = delay / 1000, -		.tv_nsec = (delay % 1000) * 1000000, +		.tv_sec = jiffies / AO_LISP_JIFFIES_PER_SECOND, +		.tv_nsec = (jiffies % AO_LISP_JIFFIES_PER_SECOND) * (1000000000L / AO_LISP_JIFFIES_PER_SECOND)  	};  	nanosleep(&ts, NULL);  } + +static inline int +ao_lisp_os_jiffy(void) +{ +	struct timespec tp; +	clock_gettime(CLOCK_MONOTONIC, &tp); +	return tp.tv_sec * AO_LISP_JIFFIES_PER_SECOND + (tp.tv_nsec / (1000000000L / AO_LISP_JIFFIES_PER_SECOND)); +}  #endif | 
