Skip to content
Snippets Groups Projects
Select Git revision
  • e18acc06e94b797afbcc4613e5fab2aa3097638c
  • master default
  • dbck-q-n-d-link
  • foutput-text_stat-override
  • generations
  • text-stat-sha256
  • use-nettle
  • import-nettle
  • refactor-cached_get_text
  • refactor-cached_get_text-part-2
  • add-text_store
  • introduce-generation_position
  • remove-reclamation
  • dbfile-temp-filenames
  • sstrdup
  • dbfile_open_read-check-magic
  • adns_dist
  • liboop_dist
  • search
  • isc
  • dbdbckmultiplechoice
  • last.cvs.revision
  • 2.1.2
  • 2.1.1
  • 2.1.0
  • adns_1_0
  • liboop_0_9
  • 2.0.7
  • search_bp
  • 2.0.6
  • 2.0.5
  • isc_1_01
  • Protocol-A-10.4
  • 2.0.4
  • 2.0.3
  • 2.0.2
  • 2.0.1
  • 2.0.0
  • isc_1_00
  • isc_merge_1999_05_01
  • isc_merge_1999_04_21
41 results

prot-a-parse.c

Blame
  • Stack.pmod 1.17 KiB
    #define error(X) throw( ({ (X), backtrace()[0..sizeof(backtrace())-2] }) )
    
    class stack {
      int ptr;
      array arr;
    
      void push(mixed val)
      {
        if(ptr == sizeof(arr)) {
          arr += allocate(ptr);
        }
        arr[ptr++] = val;
      }
    
      mixed top()
      {
        if (ptr) {
          return(arr[ptr-1]);
        }
        error("Stack underflow\n");
      }
    
      void quick_pop(void|int val)
      {
        if (val) {
          if (ptr < val) {
    	ptr = 0;
          } else {
    	ptr -= val;
          }
        } else {
          if (ptr > 0) {
    	ptr--;
          }
        }
      }
    
      mixed pop(void|int val)
      {
        mixed foo;
    
        if (val) {
          if (ptr <= 0) {
    	error("Stack underflow\n");
          }
    
          if (ptr < val) {
            val = ptr;
          }
          ptr -= val;
          foo = arr[ptr..ptr + val - 1];
     
          for (int i=0; i < val; i++) {
            arr[ptr + i] = 0;       /* Don't waste references */
          }
        } else {
          if(--ptr < 0)
    	error("Stack underflow\n");
        
          foo=arr[ptr];
          arr[ptr]=0; /* Don't waste references */
        }
        return foo;
      }
    
      void reset(int|void initial_size)
      {
        arr = allocate(initial_size || 32);
        ptr = 0;
      }
    
      void create(int|void initial_size)
      {
        arr = allocate(initial_size || 32);
      }
    };