#pragma strict_types

Rev: lib/modules/Mapping.pmod:1.2
Rev: lib/modules/Multiset.pmod:1.2
Rev: lib/modules/Pike.pmod:1.8
Rev: lib/modules/Program.pmod:1.5
Rev: lib/modules/System.pmod:1.8
Rev: lib/modules/__builtin.pmod:1.4
Rev: lib/modules/__builtin_dirnode.pmod:1.2

lib/modules/Mapping.pmod

 #pike __REAL_VERSION__
+#pragma strict_types
 
 constant delete=m_delete;
 constant Iterator = __builtin.mapping_iterator;

lib/modules/Multiset.pmod

 #pike __REAL_VERSION__
+#pragma strict_types
 
 //constant delete=m_delete;
 constant Iterator = __builtin.multiset_iterator;

lib/modules/Pike.pmod

 #pike __REAL_VERSION__
+#pragma strict_types
 
 // Pike core things that don't belong anywhere else.
 //
-// $Id: Pike.pmod,v 1.7 2003/01/13 17:19:31 mast Exp $
+// $Id: Pike.pmod,v 1.8 2003/04/27 02:20:40 nilsson Exp $
 
 constant WEAK_INDICES = __builtin.PIKE_WEAK_INDICES;
 constant WEAK_VALUES = __builtin.PIKE_WEAK_VALUES;

lib/modules/Program.pmod

 #pike __REAL_VERSION__
+#pragma strict_types
 
 constant inherit_list = __builtin.inherit_list;
 constant inherits = __builtin.program_inherits;

lib/modules/System.pmod

 #pike __REAL_VERSION__
+#pragma strict_types
 
-// $Id: System.pmod,v 1.7 2002/11/26 14:51:09 grubba Exp $
-// this module is to allow the system module to be called system.
+// $Id: System.pmod,v 1.8 2003/04/27 02:22:26 nilsson Exp $
+// This module is to allow the _system module to be called System.
 
 inherit _system;
 

lib/modules/__builtin.pmod

 #pike __REAL_VERSION__
+#pragma strict_types
 
 inherit _static_modules.Builtin;

lib/modules/__builtin_dirnode.pmod

 #pike __REAL_VERSION__
+#pragma strict_types
 
-mapping cache=([]);
+mapping(string:mixed) cache=([]);
 
 mixed `[](string s)
 {
   if(!zero_type(cache[s])) return cache[s];
   mixed tmp=_static_modules[s];
-  if(programp(tmp)) tmp=tmp();
+  if(programp(tmp)) tmp=([program]tmp)();
   return cache[s]=tmp;
 }