1
  
2
  
3
  
4
  
5
  
6
  
7
  
8
  
9
  
10
  
11
  
12
  
13
  
14
  
15
  
16
  
17
  
18
  
19
  
20
  
21
  
22
  
23
  
24
  
25
  
26
  
27
  
28
  
/* Crypto.pmod 
 * 
 */ 
 
#pike __REAL_VERSION__ 
 
static private mixed crypto_module; 
 
mixed `[](string name) 
{ 
//  return (::`[](name) || ((program) ("Crypto/" + name))); 
    catch { 
      return (crypto_module[name] 
              || ((program) ("Crypto/" + name)) 
              || ((object) ("Crypto/" + name + ".pmod"))); 
    }; 
    return ([])[0]; // UNDEFINED 
} 
 
void create() 
{ 
  catch { crypto_module=master()->resolv("_Crypto"); }; 
  if(!crypto_module) 
    crypto_module=master()->resolv("_Lobotomized_Crypto"); 
}