scope.c File Reference

#include "gwion_util.h"

Go to the source code of this file.

Functions
static ANN Map	scope_back (const Scope s)
ANN vtype	scope_lookup0 (const Scope s, const vtype xid)
ANN vtype	scope_lookup1 (const Scope s, const vtype xid)
ANN vtype	scope_lookup2 (const Scope s, const vtype xid)
ANN void	scope_add (const Scope s, const vtype xid, const vtype value)
ANN void	scope_commit (const Scope s)
ANN void	scope_init (MemPool p, Scope a)
ANN Scope	new_scope (MemPool p)
ANN void	scope_release (Scope a)
ANN void	free_scope (MemPool p, Scope a)
ANN bool	scope_iter (struct scope_iter *iter, void *ret)

Function Documentation

free_scope()

ANN void free_scope	(	MemPool	p,
		Scope	a )

Definition at line 58 of file scope.c.

                                        {
  scope_release(a);
  mp_free(p, Scope, a);
}

new_scope()

ANN Scope new_scope

(

MemPool

p

)

Definition at line 46 of file scope.c.

                               {
  Scope a = mp_calloc(p, Scope);
  scope_init(p, a);
  return a;
}

scope_add()

ANN void scope_add	(	const Scope	s,
		const vtype	xid,
		const vtype	value )

Definition at line 28 of file scope.c.

                                                                      {
  if (VLEN(s) > 1)
    map_set(scope_back(s), xid, value);
  else
    map_set(&s->map, xid, value);
}

scope_back()

static ANN Map scope_back ( const Scope s )

inlinestatic

Definition at line 3 of file scope.c.

                                                {
  return (Map)&VPTR((Vector)s, VLEN(s) - 1);
}

scope_commit()

ANN void scope_commit

(

const Scope

s

)

Definition at line 35 of file scope.c.

                                     {
  map_commit((Map)&VPTR(s, 0), &s->map);
  map_clear(&s->map);
}

scope_init()

ANN void scope_init	(	MemPool	p,
		Scope	a )

Definition at line 40 of file scope.c.

                                        {
  vector_init((Vector)&a->map);
  vector_init((Vector)a);
  scope_push(p, a);
}

scope_iter()

ANN bool scope_iter	(	struct scope_iter *	iter,
		void *	ret )

Definition at line 63 of file scope.c.

                                                        {
  m_uint       size  = map_size(&iter->s->map);
  const m_uint vsize = vector_size((Vector)iter->s);
  const m_uint vec   = vsize - iter->vec;
  Map          map   = &iter->s->map;
  if (vsize == iter->vec) {
    if (iter->idx == size) return false;
  } else {
    map  = (Map)&VPTR(iter->s, vec - 1);
    size = map_size(map);
    if (iter->idx == size) {
      ++iter->vec;
      iter->idx = 0;
      return scope_iter(iter, ret);
    }
  }
  *(vtype *)ret = map_at(map, size - ++iter->idx);
  return true;
}

scope_lookup0()

ANN vtype scope_lookup0	(	const Scope	s,
		const vtype	xid )

Definition at line 7 of file scope.c.

                                                        {
  const Map   map = scope_back(s);
  const vtype ret = map_get(map, xid);
  if (!ret && VLEN(s) == 1) return map_get(&s->map, (vtype)xid);
  return ret;
}

scope_lookup1()

ANN vtype scope_lookup1	(	const Scope	s,
		const vtype	xid )

Definition at line 14 of file scope.c.

                                                        {
  for (m_uint i = VLEN(s) + 1; --i;) {
    const Map   map = (Map)&VPTR(s, i - 1);
    const vtype ret = map_get(map, xid);
    if (ret) return ret;
  }
  return map_get(&s->map, (vtype)xid);
}

scope_lookup2()

ANN vtype scope_lookup2	(	const Scope	s,
		const vtype	xid )

Definition at line 23 of file scope.c.

                                                        {
  const Map map = (Map)&VPTR(s, 0);
  return map_get(map, xid) ?: map_get(&s->map, (vtype)xid);
}

scope_release()

ANN void scope_release

(

Scope

a

)

Definition at line 52 of file scope.c.

                                {
  map_release((Map)&VPTR(a, 0));
  vector_release((Vector)a);
  vector_release((Vector)&a->map);
}