Changeset 496 for abuse/trunk/src/menu.cppTweet

Timestamp:

Apr 17, 2011, 11:56:55 PM (12 years ago)

Author:

Sam Hocevar

Message:

lisp: implement LObject::Eval.

File:

• abuse/trunk/src/menu.cpp (modified) (1 diff)

abuse/trunk/src/menu.cpp

@@ -385 +385 @@
 //    char *prog="((\"art/help.spe\" . \"sell2\")(\"art/help.spe\" . \"sell4\")(\"art/help.spe\" . \"sell3\")(\"art/endgame.spe\" . \"credit\"))";
 //    char *prog="((\"art/endgame.spe\" . \"credit\") (\"art/help.spe\" . \"sell6\"))";
-    char const *prog="((\"art/endgame.spe\" . \"credit\"))";
-    ss->SetValue((LObject *)compile(prog));
+    char const *prog = "((\"art/endgame.spe\" . \"credit\"))";
+    ss->SetValue(LObject::Compile(prog));
     current_space=sp;
   }