source:
branches/gdl-frontend/playground/abcl-test/lisp-code/test-code/functions.lisp
Last change on this file was 395, checked in by , 14 years ago | |
---|---|
File size: 202 bytes |
Line | |
---|---|
1 | (defun print-line(param) |
2 | (format t "~a~%" param)) |
3 | |
4 | |
5 | (defun add(a b) |
6 | (+ a b)) |
7 | |
8 | |
9 | |
10 | (let ((line-str (concatenate 'string "the result of 6 + 2 is " (write-to-string (add 6 2))))) |
11 | (print-line line-str)) |
Note: See TracBrowser
for help on using the repository browser.