Update of /cvsroot/alsa/alsa-lib/alsalisp In directory sc8-pr-cvs1:/tmp/cvs-serv9376/alsalisp
Modified Files: hello.lisp Log Message: Clemens Ladisch <[EMAIL PROTECTED]> fix some wrong section/file/reference names Index: hello.lisp =================================================================== RCS file: /cvsroot/alsa/alsa-lib/alsalisp/hello.lisp,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- hello.lisp 27 Jun 2003 20:39:02 -0000 1.1 +++ hello.lisp 1 Jul 2003 09:23:38 -0000 1.2 @@ -1,3 +1,12 @@ (princ "Hello ALSA world\n") (princ "One " 1 "\n") (princ "Two " (+ 1 1) "\n") + +(defun myprinc (o) (princ o)) +(myprinc "Printed via myprinc function!\n") + +(defun printnum (from to) (while (<= from to) (princ " " from) (setq from (+ from 1)))) +(princ "Numbers 1-10: ") (printnum 1 10) (princ "\n") + +(defun factorial (n) (when (> n 0) (* n (factorial (- n 1))))) +(princ "Factorial of 10: " (factorial 10) "\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/psa00100006ave/direct;at.asp_061203_01/01 _______________________________________________ Alsa-cvslog mailing list [EMAIL PROTECTED] https://lists.sourceforge.net/lists/listinfo/alsa-cvslog