From: "Stephen J. Turnbull" <stephen@xemacs.org>
To: Ivan Kanis <ivan.kanis@googlemail.com>
Cc: emacs devel <emacs-devel@gnu.org>
Subject: Re: random doesn't feel very random, random doesn't feel very random, Re: random doesn't feel very random
Date: Sat, 25 Aug 2012 03:50:02 +0900 [thread overview]
Message-ID: <87ehmwuntx.fsf@uwakimon.sk.tsukuba.ac.jp> (raw)
In-Reply-To: <87d32g9pmq.fsf@googlemail.com>
Ivan Kanis writes:
> "Stephen J. Turnbull" <stephen@xemacs.org> wrote:
> > To avoid this behavior, use `(random t)'
>
> I do.
Where? I don't see it in your `ivan-emms-pick-album' function. Note,
this will only help across Emacs sessions; within one session the
random function should maintain state across calls to your function,
so it should give different sequences every time as long as you never
exist Emacs.
> > If it always plays tracks from the same subset of your
> > collection, but in different orders, you may have made a
> > programming error.
>
> It sort of does that.
I still don't understand what buggy behavior you are seeing. Without
a precise description, it's hard to guess what might be wrong in your
code or in `random'.
> (defun ivan-emms-pick-album (dir length)
> "Return a LENGTH albums in a directory DIR."
> (let* ((index 0)
> (ret (make-vector length nil))
> (album (ivan-emms-list-subdir
> (concat ivan-emms-dir dir)))
> (album-length (length album)))
> (while (< index length)
> (aset ret index
> (nth (random album-length) album))
> (setq index (1+ index)))
> ret))
That's the code without WITH-CACHE. I don't see any problems with it.
Unfortunately the attachment seems to have been stripped so I don't
know what might be going wrong in `ivan-emms-list-subdir' or the code
that calls `ivan-emms-pick-album'. (Probably nothing, but I can't
review it.)
If you do `M-x (ivan-emms-list-subdir (concat ivan-emms-dir "FOO")) RET'
(with some value for FOO that actually exists and contains albums),
does the answer look right?
next prev parent reply other threads:[~2012-08-24 18:50 UTC|newest]
Thread overview: 43+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-08-24 5:47 random doesn't feel very random Ivan Kanis
2012-08-24 6:22 ` Tassilo Horn
2012-08-24 17:19 ` random doesn't feel very random, random doesn't feel very random, " Ivan Kanis
2012-08-24 18:50 ` Stephen J. Turnbull [this message]
2012-08-25 7:46 ` Ivan Kanis
2012-08-24 6:30 ` Leo
2012-08-24 22:48 ` Richard Stallman
2012-08-24 22:57 ` Andreas Schwab
2012-08-25 20:55 ` Richard Stallman
2012-08-25 23:25 ` Leo
2012-08-26 13:12 ` Richard Stallman
2012-08-26 14:24 ` Achim Gratz
2012-08-26 23:22 ` Leo
2012-08-27 0:50 ` Stefan Monnier
2012-08-27 6:31 ` Simon Leinen
2012-08-27 3:41 ` Richard Stallman
2012-08-27 4:48 ` Stefan Monnier
2012-08-31 9:41 ` Eli Zaretskii
2012-08-31 15:06 ` Stefan Monnier
2012-08-31 15:23 ` chad
2012-08-31 17:50 ` Eli Zaretskii
2012-08-31 19:43 ` Stefan Monnier
2012-09-01 1:18 ` Paul Eggert
2012-09-01 7:19 ` Achim Gratz
2012-09-01 13:19 ` Paul Eggert
2012-09-04 19:19 ` Nix
2012-09-04 20:07 ` Paul Eggert
2012-09-04 20:11 ` Nix
2012-09-02 12:27 ` Jason Rumney
2012-09-02 13:08 ` Stefan Monnier
2012-09-01 7:22 ` Ivan Kanis
2012-09-01 11:13 ` joakim
2012-08-31 23:04 ` Leo
2012-08-27 5:17 ` Achim Gratz
2012-08-31 9:42 ` Eli Zaretskii
2012-08-31 15:07 ` Stefan Monnier
2012-08-31 17:50 ` Eli Zaretskii
2012-08-26 9:06 ` Ivan Kanis
2012-08-24 7:03 ` Stephen J. Turnbull
2012-08-24 9:10 ` Paul Eggert
2012-08-24 17:45 ` Stephen J. Turnbull
2012-08-24 12:45 ` OT: appropriateness of "random" for playlist generation (was: random doesn't feel very random) Jeremiah Dodds
2012-08-24 14:37 ` random doesn't feel very random Drew Adams
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87ehmwuntx.fsf@uwakimon.sk.tsukuba.ac.jp \
--to=stephen@xemacs.org \
--cc=emacs-devel@gnu.org \
--cc=ivan.kanis@googlemail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.