frames.c

   1 /*
   2  *  Copyright 2001-2004 David Abrahams.
   3  *  Distributed under the Boost Software License, Version 1.0.
   4  *  (See accompanying file LICENSE_1_0.txt or http://www.boost.org/LICENSE_1_0.txt)
   5  */
   6
   7 # include "frames.h"
   8 # include "lists.h"
   9
  10 void frame_init( FRAME* frame )
  11 {
  12     frame->prev = 0;
  13     lol_init(frame->args);
  14     frame->module = root_module();
  15     frame->rulename = "module scope";
  16     frame->procedure = 0;
  17 }
  18
  19 void frame_free( FRAME* frame )
  20 {
  21     lol_free( frame->args );
  22 }