Skip to content
Snippets Groups Projects
Select Git revision
  • f19a068ded953e58994ec3251e9984b9e75bfcd2
  • master default protected
  • siv-mode
  • delete-des-compat
  • delete-rsa_blind
  • aes-struct-layout
  • master-updates
  • release-3.4-fixes
  • struct-layout
  • attribute-deprecated
  • rename-data-symbols
  • x86_64-sha_ni-sha256
  • ecc-params-tweak
  • delete-old-aes
  • cmac-support
  • x86_64-sha_ni-sha1
  • gcm-ctr-opt
  • ctr-opt
  • skein
  • api-opaque-fix
  • curve448
  • nettle_3.4.1_release_20181204
  • nettle_3.4.1rc1
  • nettle_3.4_release_20171119
  • nettle_3.4rc2
  • nettle_3.4rc1
  • nettle_3.3_release_20161001
  • nettle_3.2_release_20160128
  • nettle_3.1.1_release_20150424
  • nettle_3.1_release_20150407
  • nettle_3.1rc3
  • nettle_3.1rc2
  • nettle_3.1rc1
  • nettle_3.0_release_20140607
  • nettle_2.7.1_release_20130528
  • nettle_2.7_release_20130424
  • nettle_2.6_release_20130116
  • nettle_2.5_release_20120707
  • converted-master-branch-to-git
  • nettle_2.4_release_20110903
  • nettle_2.3_release_20110902
41 results

nettle-benchmark.c

Blame
  • Forked from Nettle / nettle
    Source project has a limited visibility.
    Stack.pmod 882 B
    #define error(X) throw( ({ (X), backtrace()[0..sizeof(backtrace())-2] }) )
    
    class stack {
      int ptr;
      mixed *arr=allocate(32);
    
      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");
      }
    
      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()
      {
        arr=allocate(32);
        ptr=0;
      }
    };