- (snd_pcm_set_params PCM
- (cfg-lookup NAME "format" SND_PCM_FORMAT_S16_LE)
- SND_PCM_ACCESS_RW_INTERLEAVED
- (cfg-lookup NAME "channels" 2)
- (cfg-lookup NAME "rate" 48000)
- 1 ; soft resample (0/1)
- (cfg-lookup NAME "latency" 100000) ; (microseconds)
- ))
+ (let ((LATENCY (cfg-lookup NAME "latency" 100000)))
+ (snd_pcm_set_params PCM SND_PCM_FORMAT_S16_LE SND_PCM_ACCESS_RW_INTERLEAVED
+ 2 48000 1 LATENCY )))