scope.h File Reference

scope functions More...

Go to the source code of this file.

Data Structures
struct	Scope_
struct	scope_iter

Typedefs
typedef struct Scope_ *	Scope

Functions
ANN Scope	new_scope (MemPool)
ANN void	scope_init (MemPool, Scope)
ANEW ANN Vector	scope_get (const Scope)
ANN vtype	scope_lookup0 (const Scope, const vtype)
ANN vtype	scope_lookup1 (const Scope, const vtype)
ANN vtype	scope_lookup2 (const Scope, const vtype)
ANN void	scope_add (const Scope, const vtype, const vtype)
ANN void	scope_commit (const Scope)
ANN void	scope_release (Scope)
ANN void	free_scope (MemPool, Scope)
static ANN void	scope_push (MemPool p NUSED, const Scope s)
static ANN void	scope_pop (MemPool p NUSED, const Scope s)
static ANN void	_scope_init (const Scope s)
ANN bool	scope_iter (struct scope_iter *iter, void *ret)

Detailed Description

scope functions

Definition in file scope.h.

Typedef Documentation

Scope

typedef struct Scope_ * Scope

Function Documentation

_scope_init()

static ANN void _scope_init ( const Scope s )

inlinestatic

Definition at line 37 of file scope.h.

                                                  {
  vector_init((Vector)(void *)s);
}

free_scope()

ANN void free_scope ( MemPool p, Scope a )

extern

Definition at line 58 of file scope.c.

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

new_scope()

ANN Scope new_scope ( MemPool p )

extern

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 )

extern

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_commit()

ANN void scope_commit ( const Scope s )

extern

Definition at line 35 of file scope.c.

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

scope_get()

ANEW ANN Vector scope_get ( const Scope )

extern

scope_init()

ANN void scope_init ( MemPool p, Scope a )

extern

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 )

extern

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 )

extern

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 )

extern

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_pop()

static ANN void scope_pop ( MemPool p NUSED, const Scope s )

inlinestatic

Definition at line 32 of file scope.h.

                                                                 {
  const m_uint back = vector_pop((Vector)(void *)s);
  map_release((Map)&back);
}

scope_push()

static ANN void scope_push ( MemPool p NUSED, const Scope s )

inlinestatic

Definition at line 27 of file scope.h.

                                                                  {
  vector_add((Vector)(void *)s, 0);
  map_init((Map)&VPTR(s, VLEN(s) - 1));
}

scope_release()

ANN void scope_release ( Scope a )

extern

Definition at line 52 of file scope.c.

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