language

some fools attempt at an interpreted language
Log | Files | Refs | README

object.c (643B)

      1 #include <stdlib.h>
      2 
      3 #include "object.h"
      4 
      5 #include "ns.h"
      6 #include "var.h"
      7 
      8 #include "helper.h"
      9 
     10 ns_t* object_get(var_cont* object)
     11 {
     12 	N_ASSERT(object, "object_get\n");
     13 
     14 	return (ns_t*)object->data;
     15 }
     16 
     17 void object_del(void* object)
     18 {
     19 	N_ASSERT(object, "object_del\n");
     20 
     21 	ns_t* o = object;
     22 
     23 	ns_del(o);
     24 }
     25 
     26 var_cont* object_get_name(ns_t* object, ns_addr name)
     27 {
     28 	N_ASSERT(object, "object_get_name\n");
     29 
     30 	var_cont* value = ns_get(object, 1, name);
     31 	
     32 	return value;
     33 }
     34 
     35 void object_set_name(ns_t* object, ns_addr name, var_cont* var)
     36 {
     37 	N_ASSERT(object, "object_set_name\n");
     38 	N_ASSERT(var, "object_set_name\n");
     39 
     40 	ns_set(object, 1, name, var);
     41 }