Compare commits
No commits in common. "661b3c35a9ad4426271feafaadccc067d3e8f418" and "42753c1b18c74b9ef0f4cdb90272fcf663ac0c56" have entirely different histories.
661b3c35a9
...
42753c1b18
|
|
@ -1,7 +0,0 @@
|
||||||
To install library run
|
|
||||||
|
|
||||||
make SCHEME=chibi LIBRARY=fcgi build install
|
|
||||||
|
|
||||||
|
|
||||||
Change chibi to any other implementation supported by snow-chibi, and library
|
|
||||||
to any filename without suffix in retropikzel/*.sld
|
|
||||||
|
|
@ -52,15 +52,18 @@ hello.scm:
|
||||||
(scheme write)
|
(scheme write)
|
||||||
(retropikzel cgi))
|
(retropikzel cgi))
|
||||||
|
|
||||||
(handle-request
|
|
||||||
'()
|
|
||||||
(lambda (request headers parameters cookies body files)
|
|
||||||
(display "Content-type: text/html")
|
(display "Content-type: text/html")
|
||||||
(display "
|
(display "
|
||||||
")
|
")
|
||||||
(display "
|
(display "
|
||||||
")
|
")
|
||||||
(display "Hello")))
|
(display "Hello")
|
||||||
|
(display "</br>")
|
||||||
|
|
||||||
|
(display "Request: ")
|
||||||
|
(write (get-request))
|
||||||
|
(display "</br>")
|
||||||
|
(cgi-exit)
|
||||||
|
|
||||||
Run:
|
Run:
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -52,13 +52,16 @@ hello.scm:
|
||||||
(scheme write)
|
(scheme write)
|
||||||
(retropikzel cgi))
|
(retropikzel cgi))
|
||||||
|
|
||||||
(handle-request
|
|
||||||
'()
|
|
||||||
(lambda (request headers parameters cookies body files)
|
|
||||||
(display "Content-type: text/html")
|
(display "Content-type: text/html")
|
||||||
(display "\r\n")
|
(display "\r\n")
|
||||||
(display "\r\n")
|
(display "\r\n")
|
||||||
(display "Hello")))
|
(display "Hello")
|
||||||
|
(display "</br>")
|
||||||
|
|
||||||
|
(display "Request: ")
|
||||||
|
(write (get-request))
|
||||||
|
(display "</br>")
|
||||||
|
(cgi-exit)
|
||||||
|
|
||||||
Run:
|
Run:
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -1 +1 @@
|
||||||
1.2.0
|
1.1.0
|
||||||
|
|
|
||||||
|
|
@ -5,11 +5,8 @@
|
||||||
(retropikzel cgi)
|
(retropikzel cgi)
|
||||||
(srfi 64))
|
(srfi 64))
|
||||||
|
|
||||||
(handle-request
|
(test-begin "cgi")
|
||||||
'()
|
|
||||||
(lambda (request headers parameters cookies body files)
|
|
||||||
(display "Content-type: text/html")
|
|
||||||
(display "\r\n")
|
|
||||||
(display "\r\n")
|
|
||||||
(display "Hello")))
|
|
||||||
|
|
||||||
|
(display "Hello")
|
||||||
|
|
||||||
|
(test-end "cgi")
|
||||||
|
|
|
||||||
|
|
@ -1 +1 @@
|
||||||
1.1.0
|
1.0.0
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue