Scheme stuff

Here is a collection of the stuff I have done in Scheme that I decided to release. I use GNU Guile Scheme for my Scheme system because it is powerful and Free.

Libraries

These are libraries that either someone else or I wrote. If someone else wrote it, I probably just ported it to guile 1.7 (and decided that it was too much work to just release a patch).

• Proc-rename. Put this file in [your guile site dir]/proc-rename.scm (make sure to un-gzip it...). Then (use-modules (proc-rename)). This library exports one procedure: (symbol-prefix-renamer newprefix) . So what does it do exactly (I'm the master of delayed explanation)? When you (use-modules (foo bar)) and you want to rename the symbols in the module, right now you have to use symbol-prefix-proc. This creates a problem: What if the author of the module already prefixed the module and you don't want to use the prefix s/he chose? Enter symbol-prefix-renamer. Give it the prefix you would like to replace the old prefix with as it's argument and it will rename all of the prefixes to use the new prefix (or add a prefix if the symbol is un-prefixed). E.g. if you create a renamer that renames the prefix to foo these are the transformations you will get: bar:foo => foo:foo, bar => foo:bar, quux:moo:foo => foo:moo:foo. I have decided to release this into the public domain.UPDATE (2002-07-16): I have updated the implementation; it is better now (I guess it could be faster too). Also, the module is now (proc-rename) instead of (cke proc-rename).
• defstruct This is a macro that allow for the creation of structures. It has been adapted from Teach Yourself Scheme in Fixnum Days by Dorai Sitiram. The book said all of its code is public domain, and my version is also public domain (all I did was change one or two commands to work with guile). Modified 2002-02-04: Now defined in its own module 'defstruct'
• Guile Debconf Bindings. These provide a usable interface to Debconf using Guile Scheme. You can now write Debconf scripts using Guile Scheme! It is at version 0.1.1, so don't expect much. I will be writing docs at a later date. Or maybe not. I don't have too much interest in this right now and the interface appears to work well enough that it could be used for real debconf stuff if you wanted too. It just doesn't feel 100% "schemy" yet.

Misc. Stuff

These are just a few miscellaneous things I have written that might be useful to other people.

• vector-resize. This does what its name suggests--it contains a r5rs macro that resizes vectors. You call it as (vector-resize some-vec newsize). It will destructively modify some-vec and resize it to the newsize. If the newsize is smaller it will be shrunk, if it is larger it will be expanded and the additional elements will be unspecified. If you are using this with a Scheme system other than Guile, just remove the (use-modules (ice-9 syncase)) at the top of the file and it should work since Guile uses the r5rs macro implementation that most other Scheme systems use.

Programs

I write stuff in Scheme when I want to do it fast. Writing stuff in C or C++ is much more time consuming than using Scheme, unless I have to do more low level stuff (or write an X app...guile-gtk isn't really all that great, but gnome-guile 2.0 should be much better). Here are a few small programs that I have written in Scheme. NOTE: I have only tested these with Guile 1.7 and 1.5.x! They may work with older versions. If they do, then email me telling me what version it was.

• OGG/MP3 to RIFF-WAV. This is a small script that uses ogg123 and mpg321 to convert the files given to it on the command line into wavs that are dumped into the current directory. You might want to run it in an empty dir. I may generalize it in the future to allow user-configurable file formats, but don't count on it. Un-gzip the file in a directory in your path. You may want to rename oggmpthree2wav.scm to something better (like oggmpthree2wav). This script is released into the public domain.
• CDRDAO Table of Contents Generator. The current version (1.01) was released on 2002-08-27 and contains two bugfixes for random support that I recently noticed (five minutes before I uploaded the new version). This generates a quick and dirty TOC file for cdrdao. Unpack this into a directory in your path, and optionally rename it from cdrtoc.scm to cdrtoc (which is nicer looking I guess). Give it a list of files to put in the TOC on as its arguments. It will create the toc as track.toc in the current directory. It will assume you are trying to create an audio CD with no gaps between tracks, so you may want to edit it if you want to use data tracks or include special pregaps. This makes the generation of TOC files much less tedious! This script is released into the public domain.

Last modified: Mon May 17 13:20:22 EDT 2004