basis/locals/backend/backend.factor

   1 ! Copyright (C) 2008 Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: slots.private ;
   4 IN: locals.backend
   5
   6 : local-value ( box -- value ) 2 slot ; inline
   7
   8 : set-local-value ( value box -- ) 2 set-slot ; inline