00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023 #pragma once
00024 #ifndef _SEXP_MANIP_H
00025 #define _SEXP_MANIP_H
00026
00027 #include "public/sexp-manip.h"
00028 #include "../../../common/util.h"
00029
00030 OSCAP_HIDDEN_START;
00031
00032 #define SEXP_LSTACK_INIT_SIZE 8
00033 #define SEXP_LSTACK_GROWFAST_TRESH 64
00034 #define SEXP_LSTACK_GROWSLOW_DIFF 8
00035
00036 typedef struct {
00037 SEXP_t *p_list;
00038 size_t l_size;
00039 size_t l_real;
00040 SEXP_t **l_sref;
00041 } SEXP_lstack_t;
00042
00043 SEXP_lstack_t *SEXP_lstack_new (void);
00044 void SEXP_lstack_init (SEXP_lstack_t *stack);
00045 void SEXP_lstack_free (SEXP_lstack_t *stack);
00046 void SEXP_lstack_destroy (SEXP_lstack_t *stack);
00047
00048 SEXP_t *SEXP_lstack_push (SEXP_lstack_t *stack, SEXP_t *ref);
00049 SEXP_t *SEXP_lstack_pop (SEXP_lstack_t *stack);
00050 SEXP_t *SEXP_lstack_top (const SEXP_lstack_t *stack);
00051 SEXP_t *SEXP_lstack_list (SEXP_lstack_t *stack);
00052 size_t SEXP_lstack_depth (SEXP_lstack_t *stack);
00053
00054 OSCAP_HIDDEN_END;
00055
00056 #endif