X-Git-Url: https://git.verplant.org/?a=blobdiff_plain;f=src%2Flisp%2Flisp.cpp;h=39313d21f43e3012f814427bd978e4df348959f3;hb=bb1e51d77df632eca2c4977429e831ae44e0dc98;hp=aa7bca963d6799e4212434be1435cefbabac3585;hpb=c0093d25093395cb62fc2526ab42be65a9f015b8;p=supertux.git diff --git a/src/lisp/lisp.cpp b/src/lisp/lisp.cpp index aa7bca963..39313d21f 100644 --- a/src/lisp/lisp.cpp +++ b/src/lisp/lisp.cpp @@ -1,8 +1,7 @@ // $Id$ // -// TuxKart - a fun racing game with go-kart -// Copyright (C) 2004 Matthias Braun -// code in this file based on lispreader from Mark Probst +// SuperTux +// Copyright (C) 2006 Matthias Braun // // This program is free software; you can redistribute it and/or // modify it under the terms of the GNU General Public License @@ -17,13 +16,14 @@ // You should have received a copy of the GNU General Public License // along with this program; if not, write to the Free Software // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + #include -#include "lisp.h" +#include "lisp.hpp" namespace lisp { - + Lisp::Lisp(LispType newtype) : type(newtype) { @@ -65,7 +65,7 @@ Lisp::print(int indent) const { for(int i = 0; i < indent; ++i) printf(" "); - + if(type == TYPE_CONS) { printf("(\n"); const Lisp* lisp = this;