1
0
mirror of https://github.com/cookiengineer/audacity synced 2025-10-12 01:23:38 +02:00

Usage of _ in Nyquist program bodies

This commit is contained in:
Paul Licameli
2018-03-01 14:52:26 -05:00
parent da9471ac7f
commit 0beb16210f
21 changed files with 136 additions and 133 deletions

View File

@@ -18,6 +18,7 @@ $control thresval (_"Threshold Percentage") int "" 65 5 100
(setq thres (* (/ thresval 100.0) max))
(setq s2 (signal))
(do ((c 0.0) (l NIL) (p T) (v (snd-fetch s2))) ((not v) l)
; "B" seems too short to put into the i18n catalog. Make it a control?
(if (and p (> v thres)) (setq l (cons (list c "B") l)))
(setq p (< v thres))
(setq c (+ c 0.001))