96 lines
2.3 KiB
Markdown
96 lines
2.3 KiB
Markdown
# Mumble: A lisp in C
|
|
|
|
## About
|
|
|
|
This is a Lisp written in C. It follows the outline in this [Build Your Own Lisp](https://buildyourownlisp.com/chapter11_variables) book, though it then adds some small tweaks and improvements and quality of life improvements:
|
|
|
|
- A makefile
|
|
- Configurable verbosity levels
|
|
- Different and perhaps slightly more elegant printing functions
|
|
- A slightly different approach to evaluating functions
|
|
- Capturing Ctrl+D
|
|
- Float instead of ints
|
|
|
|
Conversely, it doesn't have:
|
|
- Function currying
|
|
- strings
|
|
- Variable arguments
|
|
- ...
|
|
|
|
Overall this might be mostly of interest as a pointer to the book that this is originally based on. And to readers of that same book, I'd be curious to see what you ended up with.
|
|
|
|
## Installation and usage
|
|
|
|
### Dependencies
|
|
|
|
This depends on [editline](https://github.com/troglobit/editline), which can be installed on Debian/Ubuntu with:
|
|
|
|
```
|
|
git clone https://github.com/troglobit/editline
|
|
./autogen.sh
|
|
./configure
|
|
make all
|
|
sudo make install
|
|
ldconfig
|
|
```
|
|
|
|
Readers might also find it interesting to compile it with [tiny c compiler](https://bellard.org/tcc/) rather than gcc, as it is significantly faster.
|
|
|
|
### Compilation
|
|
|
|
```
|
|
git clone https://github.com/NunoSempere/mumble
|
|
make
|
|
# sudo make install #
|
|
```
|
|
|
|
### Usage
|
|
|
|
Simply call the `./mumble` binary:
|
|
|
|
```
|
|
./mumble
|
|
```
|
|
|
|
## Example usage
|
|
|
|
```
|
|
mumble> (1 2 3)
|
|
mumble> { 1 2 3 }
|
|
mumble> head (1 2 3)
|
|
mumble> { head (1 2 3) }
|
|
mumble> tail { 1 2 3 }
|
|
mumble> list ( 1 2 3 )
|
|
mumble> eval { head {1 2 3} }
|
|
mumble> (eval { head {+ tail head } } ) 1 2 3
|
|
mumble> len {1 2 3}
|
|
mumble> join { {1 2} {3 4} }
|
|
mumble> def {x} { 100 }
|
|
mumble> def {y} 100
|
|
mumble> (x y)
|
|
mumble> VERBOSITY=0
|
|
mumble> VERBOSITY=1
|
|
mumble> VERBOSITY=2
|
|
mumble> def {sq} (@ {x} {* x x})
|
|
mumble> sq 44
|
|
mumble> def {sqsum} (@ {x y} {(+ (sq x) (sq y))})
|
|
mumble> sqsum 2 3
|
|
mumble> def {init} (@ {xs} { list((head xs)) } )
|
|
mumble> def {unwrap} (@ {x} { head (list xx) } )
|
|
mumble> init {1 2}
|
|
mumble> ifelse 1 2 3
|
|
mumble> ifelse 0 1 2
|
|
mumble> ifelse {1 2 3} (1) (1)
|
|
```
|
|
|
|
## To do
|
|
|
|
- [x] Define functions
|
|
- [ ] Define if, = and >
|
|
- [ ] Build fibonacci function
|
|
- Should look something like: def {fib} (@ {x} { ifelse x (+ x (fib (- x 1))) 0 } )
|
|
|
|
## Gotchas
|
|
|
|
This doesn't currently run on Windows. But it easily could, with [preprocessor statements from the book].
|