Ignore:
Timestamp:
May 11, 2011, 1:26:11 AM (11 years ago)
Author:
Sam Hocevar
Message:

lisp: refactor Lisp spaces so that they are real objects, and get rid
of the unused USER_SPACE.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • abuse/trunk/src/game.cpp

    r632 r635  
    699699  {
    700700    screen->dirt_off();
    701     clear_tmp();
     701    LSpace::Tmp.Clear();
    702702    l_post_render->EvalFunction(NULL);
    703     clear_tmp();
     703    LSpace::Tmp.Clear();
    704704    screen->dirt_on();
    705705  }
     
    19851985void Game::step()
    19861986{
    1987   clear_tmp();
     1987  LSpace::Tmp.Clear();
    19881988  if(current_level)
    19891989  {
     
    22822282        if(!strcmp(argv[i], "-lisp"))
    22832283        {
    2284             lisp_init();
     2284            Lisp::Init();
    22852285            char const *eof_char = "Ctrl-D";
    22862286            fprintf(stderr,
     
    23282328/*      if(DEFINEDP(symbol_function(l_next_song)))  // if user function installed, call it to load up next song
    23292329      {
    2330     int sp = current_space;
    2331     current_space = PERM_SPACE;
     2330    int sp = LSpace::Current;
     2331    LSpace::Current = SPACE_PERM;
    23322332    ((LSymbol *)l_next_song)->EvalFunction(NULL);
    2333     current_space = sp;
     2333    LSpace::Current = sp;
    23342334      } */
    23352335    }
     
    24592459
    24602460        game_net_init(argc, argv);
    2461         lisp_init();
     2461        Lisp::Init();
    24622462
    24632463        dev_init(argc, argv);
     
    25882588        }
    25892589
    2590         lisp_uninit();
     2590        Lisp::Uninit();
    25912591
    25922592#if !defined __CELLOS_LV2__
Note: See TracChangeset for help on using the changeset viewer.