From: Bill Schottstaedt <bil@ccrma.Stanford.EDU>
Subject: Re: "byte compilers, was [d.love@dl.ac.uk: dynamic loading of native code modules]
Date: Mon, 15 Apr 2002 06:27:44 -0700 [thread overview]
Message-ID: <200204151327.GAA21735@cmn14.stanford.edu> (raw)
In-Reply-To: <87lmbpiocf.fsf@raven.i.defaultvalue.org>
With great hesitation and diffidence, on the subject of Guile
compilation, I can offer a simple "accelerator". For context,
in Snd (a sound editor), operations are on hundreds of millions,
occasionally billions of samples; the users are mostly impatient
musicians who view a sound editor as nothing but a necessary
evil; they are not the type that will wait on a multiply. In
95% of the cases in this context, a simple code walker can
ascertain in advance that a given operation (lambda form)
deals with simple data (i.e. floats or ints, not complex or
bignum), and has simple control structures. So, I wrote a
little "byte compiler" of sorts that turns those expressions
into a list of function calls with all the variable/data
addresses precomputed and so on; the evaluator then gets
a pointer to that "parse tree", the current incoming arguments,
and does:
while (!ALL_DONE)
{
curfunc = prog->program[PC++];
(*(curfunc->function))(curfunc->args, ints, dbls);
}
The code runs from 8 to 20 times faster than the Guile evaluator,
still 2 to 3 times slower than the equivalent compiled C code,
but better than 30 times slower! The current version (4 days
work, so still very raw and incomplete) is snd-run.c in the
Snd tarball: ftp://ccrma-ftp.stanford.edu/pub/Lisp/snd-5.tar.gz,
but I'm not really trying to push that code -- more something
along the lines that even a partial acceleration like this
is a real improvement, and easy to write.
_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://mail.gnu.org/mailman/listinfo/guile-user
next prev parent reply other threads:[~2002-04-15 13:27 UTC|newest]
Thread overview: 60+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <E16vpWV-0001wJ-00@giblet>
2002-04-13 8:50 ` [d.love@dl.ac.uk: dynamic loading of native code modules] Neil Jerram
2002-04-14 0:34 ` Rob Browning
[not found] ` <878z7rqfrg.fsf@raven.i.defaultvalue.org>
2002-04-14 2:55 ` Rob Browning
2002-04-24 0:24 ` Thien-Thi Nguyen
[not found] ` <E170AaI-00070x-00@giblet>
2002-04-24 5:25 ` Rob Browning
[not found] ` <87znztllbx.fsf@raven.i.defaultvalue.org>
2002-05-14 10:57 ` Thien-Thi Nguyen
[not found] ` <E177a03-0000H2-00@giblet>
2002-05-14 16:11 ` Bill Gribble
[not found] ` <1021392674.802.71.camel@flophouse>
2002-05-14 20:54 ` Thien-Thi Nguyen
[not found] ` <m3n0w8ugmp.fsf@laruns.ossau.uklinux.net>
2002-04-14 0:58 ` Rob Browning
2002-04-14 21:30 ` Marius Vollmer
[not found] ` <874rifqeo8.fsf@raven.i.defaultvalue.org>
2002-04-14 22:22 ` Neil Jerram
[not found] ` <m3bsclsyxn.fsf@laruns.ossau.uklinux.net>
2002-04-15 4:21 ` Rob Browning
2002-04-15 12:15 ` Marius Vollmer
[not found] ` <87lmbpiocf.fsf@raven.i.defaultvalue.org>
2002-04-15 13:27 ` Bill Schottstaedt [this message]
2002-04-24 7:34 ` "byte compilers, was " Thien-Thi Nguyen
2002-04-16 20:23 ` Neil Jerram
[not found] ` <m3sn5vpf43.fsf@laruns.ossau.uklinux.net>
2002-04-17 5:25 ` Rob Browning
2002-04-20 8:14 ` Thien-Thi Nguyen
[not found] ` <E16yq0k-0003ji-00@giblet>
2002-04-20 11:07 ` Neil Jerram
[not found] ` <873cxxkvj8.fsf@zagadka.ping.de>
2002-04-16 20:24 ` Neil Jerram
[not found] ` <m3n0w3pf1n.fsf@laruns.ossau.uklinux.net>
2002-04-17 0:53 ` NIIBE Yutaka
2002-04-17 5:36 ` Rob Browning
[not found] ` <200204170053.g3H0rX008200@mule.m17n.org>
2002-04-20 7:57 ` Thien-Thi Nguyen
[not found] ` <874riahonj.fsf@raven.i.defaultvalue.org>
2002-04-17 5:43 ` Rob Browning
2002-04-20 7:53 ` Thien-Thi Nguyen
[not found] ` <E16ypgs-0003jQ-00@giblet>
2002-04-21 15:20 ` Rob Browning
[not found] ` <87ofgdqdr9.fsf@raven.i.defaultvalue.org>
2002-04-21 15:51 ` Robert A. Uhl
[not found] ` <20020421095106.A31437@4dv.net>
2002-04-21 16:27 ` Rob Browning
2002-05-14 8:53 ` Thien-Thi Nguyen
2002-04-23 21:19 ` news
[not found] ` <87ads6nf1v.fsf@zagadka.ping.de>
2002-04-15 17:58 ` Andreas Rottmann
[not found] ` <87it6s7sjz.fsf@alice.rhinosaur.lan>
2002-04-15 19:06 ` Marius Vollmer
2002-04-24 8:00 ` Thien-Thi Nguyen
[not found] ` <E170Hh6-0007Y8-00@giblet>
2002-04-24 14:33 ` Rob Browning
[not found] ` <87662hkvya.fsf@raven.i.defaultvalue.org>
2002-04-24 14:51 ` rm
[not found] ` <20020424145130.GC17392@www>
2002-04-24 15:14 ` Andreas Rottmann
2002-04-24 15:28 ` Rob Browning
[not found] ` <87y9fd5dsj.fsf@alice.rhinosaur.lan>
2002-04-24 15:48 ` Rob Browning
[not found] ` <87vgahjdwc.fsf@raven.i.defaultvalue.org>
2002-04-24 16:15 ` Bill Gribble
[not found] ` <1019664949.936.80.camel@flophouse>
2002-04-24 16:24 ` Rob Browning
2002-04-24 18:10 ` Andreas Rottmann
[not found] ` <87ofg955n8.fsf@alice.rhinosaur.lan>
2002-04-24 20:36 ` Rob Browning
2002-04-25 2:05 ` Joshua Judson Rosen
[not found] ` <20020425020550.GL29646@linger.twisted-muse.org>
2002-04-25 3:03 ` Rob Browning
2002-04-24 18:06 ` Andreas Rottmann
[not found] ` <87sn5l55us.fsf@alice.rhinosaur.lan>
2002-04-24 20:40 ` Rob Browning
[not found] ` <87sn5khlub.fsf@raven.i.defaultvalue.org>
2002-04-24 20:53 ` Andreas Rottmann
[not found] ` <0204291926190H.10649@locke.free-expression.org>
2002-04-30 1:35 ` Thien-Thi Nguyen
[not found] ` <E172MY6-0002fd-00@giblet>
2002-04-30 2:33 ` Lynn Winebarger
2002-05-04 0:19 ` Thien-Thi Nguyen
[not found] ` <871yd5ktf5.fsf@raven.i.defaultvalue.org>
2002-05-15 0:19 ` Thien-Thi Nguyen
2002-04-24 18:34 ` Thien-Thi Nguyen
[not found] ` <E170Rb4-0008B0-00@giblet>
2002-04-24 18:58 ` Rob Browning
[not found] ` <873cxkj54j.fsf@raven.i.defaultvalue.org>
2002-04-25 5:32 ` Thien-Thi Nguyen
2002-05-01 5:00 ` Lynn Winebarger
[not found] ` <0205010000300Q.10649@locke.free-expression.org>
2002-05-01 13:50 ` Rob Browning
2002-04-24 0:52 ` Thien-Thi Nguyen
2002-04-20 9:06 ` Thien-Thi Nguyen
[not found] ` <E16yqp7-0003n6-00@giblet>
[not found] ` <m3elhasjez.fsf@laruns.ossau.uklinux.net>
2002-04-20 12:44 ` Thien-Thi Nguyen
2002-04-24 0:09 ` Thien-Thi Nguyen
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
List information: https://www.gnu.org/software/guile/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=200204151327.GAA21735@cmn14.stanford.edu \
--to=bil@ccrma.stanford.edu \
/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.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).