BreakingtheIce lossage

38 views
Skip to first unread message

Devon

unread,
Aug 30, 2012, 3:02:47 AM8/30/12
to webl...@googlegroups.com

$ sbcl --no-sysinit --no-userinit --eval '(setq sb-impl::*default-external-format* :utf-8)' --load ~/quicklisp/setup.lisp
This is SBCL 1.0.55, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses.  See the CREDITS and COPYING files in the
distribution for more information.
* (ql:quickload "weblocks")
To load "weblocks":
  Load 1 ASDF system:
    weblocks
; Loading "weblocks"
.............
("weblocks")
* (weblocks:start-weblocks)

#<WEBLOCKS:WEBLOCKS-ACCEPTOR (host *, port 8080)>
NIL
* (asdf:run-shell-command "curl http://127.0.0.1:8080 &>/dev/tty")
[2012-08-30 02:19:14 [DEBUG]] Application dispatch failed for '/'
127.0.0.1 - [2012-08-30 02:19:14] "GET / HTTP/1.1" 200 393 "-" "curl/7.19.7 (universal-apple-darwin10.0) libcurl/7.19.7 OpenSSL/0.9.8r zlib/1.2.3"
<html>
  <head>
    <title>Welcome to Hunchentoot!</title>
  </head>
  <body>
    <h1>Welcome</h1>
    <p>
      When you're reading this message, Hunchentoot has been properly installed.
    </p>
    <p>
      Please read the <a href="hunchentoot-doc.html">documentation</a>.
    </p>
    <p>
      <img src="img/made-with-lisp-logo.jpg" width="300" height="100"/>
    </p>
  </body>
</html>

0
* (weblocks:defwebapp our-application :prefix "/")

NIL
* (defun init-user-session (comp)
    (setf (weblocks:composite-widgets comp)
          (list "Hello!")))

INIT-USER-SESSION
* (weblocks:reset-sessions)

* (asdf:run-shell-command "curl http://127.0.0.1:8080 &>/dev/tty")
[2012-08-30 02:29:13 [DEBUG]] Application dispatch failed for '/'
127.0.0.1 - [2012-08-30 02:29:13] "GET / HTTP/1.1" 200 393 "-" "curl/7.19.7 (universal-apple-darwin10.0) libcurl/7.19.7 OpenSSL/0.9.8r zlib/1.2.3"
<html>
  <head>
    <title>Welcome to Hunchentoot!</title>
  </head>
  <body>
    <h1>Welcome</h1>
    <p>
      When you're reading this message, Hunchentoot has been properly installed.
    </p>
    <p>
      Please read the <a href="hunchentoot-doc.html">documentation</a>.
    </p>
    <p>
      <img src="img/made-with-lisp-logo.jpg" width="300" height="100"/>
    </p>
  </body>
</html>

0
* (quit)
$ uname -a
Darwin RA.local 10.8.0 Darwin Kernel Version 10.8.0: Tue Jun  7 16:33:36 PDT 2011; root:xnu-1504.15.3~1/RELEASE_I386 i386
$ 
Reply all
Reply to author
Forward
0 new messages