mishoo / sytes Goto Github PK
View Code? Open in Web Editor NEWA Common Lisp library for making simple websites quickly
Home Page: http://lisperator.net/sytes/
A Common Lisp library for making simple websites quickly
Home Page: http://lisperator.net/sytes/
Sytes -- a library for making quick websites with Common Lisp ============================================================= Sytes implements a Lispy template language, as well as Hunchentoot handlers for easily mapping HTTP requests to templates on disk. Templates may “inherit” from other templates, or process other templates. The language available in templates is a Scheme-like mini-language providing very few primitive operations. More info at http://lisperator.net/sytes/ License ------- Copyright 2012-2014 (c) Mihai Bazon <[email protected]> Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: * Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. * Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER “AS IS” AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
It's currently unavailable there.
The tutorial on Lisperator is very helpful but a full Sytes example project would be great. Do you have any plans to share the source of Lisperator?
I get the following error after checking out the latest commit from GH into ~/quicklisp/local-projects/
& trying to do a (ql:quickload :sytes)
. I'm running Clozure Common Lisp Version 1.8-r15286M (WindowsX8632).
Error details as reported by SLIME:
value SYTES.%RUNTIME%::|body| is not of the expected type LIST.
[Condition of type TYPE-ERROR]
Restarts:
0: [LOAD-SOURCE] Load "home:quicklisp;local-projects;sytes;template;compiler.lisp" instead of "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
1: [RECOMPILE] Compile "home:quicklisp;local-projects;sytes;template;compiler.lisp" into "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" then load "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" again
2: [RETRY-LOAD] Retry loading #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
3: [SKIP-LOAD] Skip loading #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
4: [LOAD-OTHER] Load other file instead of #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
5: [TRY-RECOMPILING] Recompile compiler and try loading it again
--more--
Backtrace:
0: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|condition| SYTES.%RUNTIME%::|body|)
1: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|defmacro| (SYTES.%RUNTIME%::|when| (SYTES.%RUNTIME%::|condition| . SYTES.%RUNTIME%::|body|) SYTES.%RUNTIME%::\
..))))))
2: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|eval-when-compile
| (SYTES.%RUNTIME%::\
..))))))
3: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|strcat| ((SYTES.%RUNTIME%::|eval-when-compile
| SYTES.%RUNTIME%::\
((SYTES.%RUNTIME%::|lambda| # SYTES.%RUNTIME%::\
# SYTES.%RUNTIME%::\
#) NIL) ..))..
4: (SYTES.TEMPLATE::COMPILE (SYTES.%RUNTIME%::|strcat| ..))) :CONTEXT #S(SYTES.TEMPLATE::CONTEXT :NAME "TOPLEVEL" :PARENT NIL :ROOT ...))
5: (#<Anonymous Function #xD7FD7B6>)
6: (CCL::$FASL-LFUNCALL #<CCL::FASLSTATE #x448512EE>)
7: (CCL::%FASLOAD "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" #(#<Compiled-function CCL::$FASL-NOOP (Non-..
8: (CCL::%LOAD #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" NIL NIL :ERROR :DEFAULT)
9: (LOAD #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR ..
10: (MAP NIL #<Compiled-function LOAD #x4115986> (#P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"))
11: (CCL::%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE (NIL #<STANDARD-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)> . 287221254))
12: (CCL::%%STANDARD-COMBINED-METHOD-DCODE (NIL (#<STANDARD-METHOD ASDF:PERFORM :AFTER (ASDF:OPERATION ASDF:COMPONENT)>) #<STANDARD-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)>) 287221254)
13: (NIL #<Unknown Arguments>)
14: (CCL::%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (T T)> . 287221321))
15: (#<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)> #<LOAD-OP (:VERBOSE NIL) #xD518DB6> #<CL-SOURCE-FILE "sytes" "template" "compiler">)
16: (CCL::%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (T T)> . 287221321))
17: (#<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS :AROUND (T T)> #<LOAD-OP (:VERBOSE NIL) #xD518DB6> #<CL-SOURCE-FILE "sytes" "template" "compiler">)
18: (CCL::%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS :AROUND (T T)> #<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)> ..) 287221321)
19: (NIL #<Unknown Arguments>)
--more--
What license is this work under?
A declarative, efficient, and flexible JavaScript library for building user interfaces.
🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.
TypeScript is a superset of JavaScript that compiles to clean JavaScript output.
An Open Source Machine Learning Framework for Everyone
The Web framework for perfectionists with deadlines.
A PHP framework for web artisans
Bring data to life with SVG, Canvas and HTML. 📊📈🎉
JavaScript (JS) is a lightweight interpreted programming language with first-class functions.
Some thing interesting about web. New door for the world.
A server is a program made to process requests and deliver data to clients.
Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.
Some thing interesting about visualization, use data art
Some thing interesting about game, make everyone happy.
We are working to build community through open source technology. NB: members must have two-factor auth.
Open source projects and samples from Microsoft.
Google ❤️ Open Source for everyone.
Alibaba Open Source for everyone
Data-Driven Documents codes.
China tencent open source team.