|
Last change
on this file since 80 was
80,
checked in by Sam Hocevar, 14 years ago
|
- Adding the Golgotha source code. Not sure what's going to be interesting
in there, but since it's all public domain, there's certainly stuff to
pick up.
|
|
File size:
306 bytes
|
| Line | |
|---|
| 1 | (def_class base_class nil
|
|---|
| 2 | (base_var 'holy_cow_man))
|
|---|
| 3 |
|
|---|
| 4 | (def_class color nil
|
|---|
| 5 | (red 255)
|
|---|
| 6 | (green 255)
|
|---|
| 7 | (blue 255))
|
|---|
| 8 |
|
|---|
| 9 | (print (new color 128 0 5))
|
|---|
| 10 |
|
|---|
| 11 |
|
|---|
| 12 | (def_class test_class base_class
|
|---|
| 13 | (x 4)
|
|---|
| 14 | (y 5)
|
|---|
| 15 | (z 6)
|
|---|
| 16 | (my_symbol 'hello_there)
|
|---|
| 17 | (my_string "string")
|
|---|
| 18 | )
|
|---|
| 19 |
|
|---|
| 20 | (setf test (new test_class))
|
|---|
Note: See
TracBrowser
for help on using the repository browser.
