Changeset 484 for abuse/trunk/src/endgame.cppTweet

Timestamp:

Apr 17, 2011, 10:28:20 AM (11 years ago)

Author:

Sam Hocevar

Message:

lisp: populate LispSymbol? with symbol-related methods.

File:

• abuse/trunk/src/endgame.cpp (modified) (4 diffs)

abuse/trunk/src/endgame.cpp

@@ -153 +153 @@
 
 
-  int explo_snd=lnumber_value(symbol_value(make_find_symbol("P_EXPLODE_SND")));
-  int space_snd=lnumber_value(symbol_value(make_find_symbol("SPACE_SND")));
-  int zip_snd=lnumber_value(symbol_value(make_find_symbol("SHIP_ZIP_SND")));
+  int explo_snd = lnumber_value(LispSymbol::FindOrCreate("P_EXPLODE_SND")->GetValue());
+  int space_snd = lnumber_value(LispSymbol::FindOrCreate("SPACE_SND")->GetValue());
+  int zip_snd = lnumber_value(LispSymbol::FindOrCreate("SHIP_ZIP_SND")->GetValue());
 
 
@@ -370 +370 @@
     cmap[i]=pal->find_closest(i*256/32,i*256/32,i*256/32);
 
-  void *end_plot=symbol_value(make_find_symbol("plot_end"));
+  void *end_plot = LispSymbol::FindOrCreate("plot_end")->GetValue();
 
 
@@ -427 +427 @@
   image *im=cache.img(cache.reg("art/endgame.spe","tbc",SPEC_IMAGE,1));
 
-  void *to_be=symbol_value(make_find_symbol("to_be_continued"));
+  void *to_be = LispSymbol::FindOrCreate("to_be_continued")->GetValue();
   p_ref r1(to_be);
 
-  void *mid_plot=symbol_value(make_find_symbol("plot_middle"));
+  void *mid_plot = LispSymbol::FindOrCreate("plot_middle")->GetValue();
   p_ref r2(mid_plot);
-
 
   int dx=(xres+1)/2-im->width()/2,dy=(yres+1)/2-im->height()/2;
@@ -486 +485 @@
   int dx=(xres+1)/2-320/2,dy=(yres+1)/2-200/2;
 
-  void *end_plot=symbol_value(make_find_symbol("plot_end"));
+  void *end_plot = LispSymbol::FindOrCreate("plot_end")->GetValue();
   p_ref r2(end_plot);