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/gamma.cpp

    r632 r635  
    189189                fprintf(fp, "(setq darkest_gray %ld)\n", dg);
    190190                fclose(fp);
    191                 int sp = current_space;
    192                 current_space = PERM_SPACE;
     191                LSpace *sp = LSpace::Current;
     192                LSpace::Current = &LSpace::Perm;
    193193                LSymbol::FindOrCreate("darkest_gray")->SetNumber(dg);
    194194
    195                 current_space = sp;
     195                LSpace::Current = sp;
    196196            }
    197197            else
Note: See TracChangeset for help on using the changeset viewer.