module names capitalized

Rev: lib/include/array.h:1.3
Rev: lib/include/fifo.h:1.3
Rev: lib/include/getopt.h:1.3
Rev: lib/include/process.h:1.3
Rev: lib/include/simulate.h:1.3
Rev: lib/include/stack.h:1.3
Rev: lib/include/stdio.h:1.3
Rev: lib/include/string.h:1.3
Rev: lib/modules/Array.pmod:1.1
Rev: lib/modules/Fifo.pmod:1.1
Rev: lib/modules/Getopt.pmod:1.1
Rev: lib/modules/Process.pmod:1.1
Rev: lib/modules/Simulate.pmod:1.1
Rev: lib/modules/Stack.pmod:1.1
Rev: lib/modules/Stdio.pmod:1.1
Rev: lib/modules/String.pmod:1.1
Rev: lib/modules/array_functions.pmod:1.2(DEAD)
Rev: lib/modules/fifo.pmod:1.2(DEAD)
Rev: lib/modules/getopt.pmod:1.2(DEAD)
Rev: lib/modules/process.pmod:1.2(DEAD)
Rev: lib/modules/simulate.pmod:1.2(DEAD)
Rev: lib/modules/stack.pmod:1.2(DEAD)
Rev: lib/modules/stdio.pmod:1.2(DEAD)
Rev: lib/modules/string_functions.pmod:1.2(DEAD)

lib/include/array.h

-import array_functions;
+import Array;

lib/include/fifo.h

-import fifo;
+import Fifo;

lib/include/getopt.h

-import getopt;
+import Getopt;

lib/include/process.h

-import process;
+import Process;

lib/include/simulate.h

 #define list multiset
 #define perror(X) werror(X)
 #define efun predef
-import simulate;
-import stdio;
-import array_functions;
-import process;
+#define regexp(X,Y) filter((X),regexp(Y)->match)
+import Simulate;

lib/include/stack.h

-import fifo;
+import Fifo;

lib/include/stdio.h

-import stdio;
+import Stdio;

lib/include/string.h

-import string_functions;
+import String;

lib/modules/process.pmod → lib/modules/Process.pmod

 #define error(X) throw( ({ (X), backtrace()[0..sizeof(backtrace())-2] }) )
 
-import stdio;
+import Stdio;
 
 static private inherit File : file;
 

lib/modules/simulate.pmod → lib/modules/Simulate.pmod

-import array_functions;
-import stdio;
-import string_functions;
+inherit Array;
+inherit Stdio;
+inherit String;
+inherit Process;
 
 #define error(X) throw( ({ (X), backtrace()[0..sizeof(backtrace())-2] }) )
 
@@ -32,10 +33,6 @@ function this_function()
   return backtrace()[-2][2];
 }
 
-string capitalize(string s)
-{
-  return upper_case(s[0..0])+s[1..sizeof(s)];
-}
 
 function get_function(object o, string a)
 {

lib/modules/string_functions.pmod → lib/modules/String.pmod

@@ -15,6 +15,11 @@ string implode_nicely(string *foo, string|void and)
   }
 }
 
+string capitalize(string s)
+{
+  return upper_case(s[0..0])+s[1..sizeof(s)];
+}
+
 string strmult(string str, int num)
 {
 #if 1