| (setq snd_card_aliases_array | |
| ( | |
| ("YMF724" . "YMF744") | |
| ("YMF724F" . "YMF744") | |
| ("YMF740" . "YMF744") | |
| ("YMF740C" . "YMF744") | |
| ("YMF754" . "YMF744") | |
| ("CMIPCI" . "CMI8338") | |
| ("CMI8738" . "CMI8338") | |
| ("CMI8738-MC4" . "CMI8738-MC6") | |
| ("E-mu APS" . "EMU10K1") | |
| ("GUS Max" . "GUS") | |
| ("GUS ACE" . "GUS") | |
| ("GUS Extreme" . "GUS") | |
| ("AMD InterWave" . "GUS") | |
| ("Dynasonic 3-D" . "GUS") | |
| ("InterWave STB" . "GUS") | |
| ) | |
| ) | |
| (defun snd_card_alias (cardname) | |
| (setq r (assq cardname snd_card_aliases_array)) | |
| (setq r (if (null r) cardname r)) | |
| (unsetq r) | |
| ) | |
| (defun snd_card_alias_unset () | |
| (unsetq snd_card_aliases_array snd_card_alias) | |
| ) |