blob: 12275693f484a04c3b75fdcc8329b2ff5984e4bb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
; JSON-RPC test case
(define (echo x ref) (ref "echo" x))
; ATOMPub test case
(define (getall ref)
(ref "getall")
)
(define (get id ref)
(ref "get" id)
)
(define (post entry ref)
(ref "post" entry)
)
(define (put id entry ref)
(ref "put" id entry)
)
(define (delete id ref)
(ref "delete" id)
)
|
