tgrovel-example.lisp - clic - Clic is an command line interactive client for gopher written in Common LISP
(HTM) git clone git://bitreich.org/clic/ git://hg6vgqziawt5s4dj.onion/clic/
(DIR) Log
(DIR) Files
(DIR) Refs
(DIR) Tags
(DIR) LICENSE
---
tgrovel-example.lisp (420B)
---
1 (in-package #:cffi-example)
2
3 (define "a0(x)" "+x+x")
4 (define "a1(x)" "a0(+x+x)")
5 (define "a2(x)" "a1(+x+x)")
6 (define "a3(x)" "a2(+x+x)")
7 (define "a4(x)" "a3(+x+x)")
8 (define "a5(x)" "a4(+x+x)")
9
10 (define "A0" "a0(1)")
11 (define "A1" "a1(1)")
12 (define "A2" "a2(1)")
13 (define "A3" "a3(1)")
14 (define "A4" "a4(1)")
15
16 (constant (+a0+ "A0"))
17 (constant (+a1+ "A1"))
18 (constant (+a2+ "A2"))
19 (constant (+a3+ "A3"))
20 (constant (+a4+ "A4"))