| (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) |
| ) |
