operators.c
atom_t* op_list_get() {
    operator_t* o = malloc(sizeof(operator_t));
    o->type = LIST_GET;

    atom_t* obj = malloc(sizeof(atom_t));
    obj->val.oper = o;
    obj->type = STD_OP;
    obj->bindings = 0;
    return obj;
}
/* Get list element/sublist. */
Get list element/sublist.
Get list element / sublist .
atom_t* op_list_get() {
    operator_t* o = malloc(sizeof(operator_t));
    o->type = LIST_GET;
    atom_t* obj = malloc(sizeof(atom_t));
    obj->val.oper = o;
    obj->type = STD_OP;
    obj->bindings = 0;
    return obj;
}
atom_t * op_list_get ( ) { operator_t * o = malloc ( sizeof ( operator_t ) ) ; o -> type = LIST_GET ; atom_t * obj = malloc ( sizeof ( atom_t ) ) ; obj -> val . oper = o ; obj -> type = STD_OP ; obj -> bindings = 0 ; return obj ; }
Get list element/sublist.
Get list element / sublist .