Update of /project/pal/cvsroot/pal/examples In directory clnet:/tmp/cvs-serv16632/examples

Modified Files: utils.lisp Log Message: Few name changes, RELT -> RANDOM-ELT

--- /project/pal/cvsroot/pal/examples/utils.lisp 2007/07/16 14:44:12 1.1 +++ /project/pal/cvsroot/pal/examples/utils.lisp 2007/07/24 12:55:05 1.2 @@ -27,9 +27,9 @@ (mapcar (pal:curry '* 2 2) '(1 2 3 4 5))

-;; RELT returns a random element in a sequence +;; RANDOM-ELT returns a random element in a sequence

-(pal:relt (mapcar (pal:curry '* 2 2) '(1 2 3 4 5))) +(pal:random-elt (mapcar (pal:curry '* 2 2) '(1 2 3 4 5)))

;; CLAMPs a value between min and max @@ -41,3 +41,8 @@

(pal:data-path "foo.png")

+ +;; LOAD-FOREIGN-LIBRARIES loads all the required dynamic libraries. Normally you don't need to use this +;; but if you are distributing apps with CLisp you need to call this in your init-fn before any other PAL functions. + +(pal:load-foreign-libraries) \ No newline at end of file