Update of /cvsroot/alsa/alsa-lib/alsalisp
In directory sc8-pr-cvs1:/tmp/cvs-serv9993/alsalisp
Modified Files:
hctl.lisp
Log Message:
Added some hctl_elem functions to alisp
Index: hctl.lisp
===================================================================
RCS file: /cvsroot/alsa/alsa-lib/alsalisp/hctl.lisp,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- hctl.lisp 29 Jul 2003 13:19:19 -0000 1.2
+++ hctl.lisp 30 Jul 2003 19:14:01 -0000 1.3
@@ -44,6 +44,12 @@
(princ "hctl open success: " hctl "\n")
(setq hctl (ahandle hctl))
(princ "open hctl: " hctl "\n")
+ (princ "load hctl: " (acall 'hctl_load hctl) "\n")
+ (princ "first : " (acall 'hctl_first_elem hctl) "\n")
+ (princ "last : " (acall 'hctl_last_elem hctl) "\n")
+ (princ "next (first): " (acall 'hctl_elem_next (acall 'hctl_first_elem hctl))
"\n")
+ (princ "prev (last) : " (acall 'hctl_elem_prev (acall 'hctl_last_elem hctl))
"\n")
+ (princ "first info : " (acall 'hctl_elem_info (acall 'hctl_first_elem hctl))
"\n")
(setq hctl (acall 'hctl_close hctl))
(if (= hctl 0)
(princ "hctl close success\n")
-------------------------------------------------------
This SF.Net email sponsored by: Free pre-built ASP.NET sites including
Data Reports, E-commerce, Portals, and Forums are available now.
Download today and enter to win an XBOX or Visual Studio .NET.
http://aspnet.click-url.com/go/psa00100003ave/direct;at.aspnet_072303_01/01
_______________________________________________
Alsa-cvslog mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/alsa-cvslog
