Update of /cvsroot/super-tux/supertux/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9632
Modified Files:
sector.cpp
Log Message:
- read gravity has real, instead of int
Index: sector.cpp
===================================================================
RCS file: /cvsroot/super-tux/supertux/src/sector.cpp,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- sector.cpp 9 Jun 2004 05:23:19 -0000 1.8
+++ sector.cpp 13 Jun 2004 17:54:28 -0000 1.9
@@ -72,13 +72,14 @@
for(lisp_object_t* cur = lispreader.get_lisp(); !lisp_nil_p(cur);
cur = lisp_cdr(cur)) {
std::string token = lisp_symbol(lisp_car(lisp_car(cur)));
+ // FIXME: doesn't handle empty data
lisp_object_t* data = lisp_car(lisp_cdr(lisp_car(cur)));
LispReader reader(lisp_cdr(lisp_car(cur)));
if(token == "name") {
name = lisp_string(data);
} else if(token == "gravity") {
- gravity = lisp_integer(data);
+ gravity = lisp_real(data);
} else if(token == "music") {
song_title = lisp_string(data);
load_music();
|
