-
-Add_Int_Timeval
-static struct timeval Add_Int_Timeval(int inc, struct timeval t){
- struct timeval r;
- r.tv_usec = t.tv_usec + (inc % 1000);
- r.tv_sec = t.tv_sec + inc / 1000;
- if(r.tv_usec > 999){
- r.tv_usec -= 1000;
- r.tv_sec++;
- }
- return(r);
-}
-
-Add_Timeval_Int
-static struct timeval Add_Timeval_Int(struct timeval t, int inc){
- struct timeval r;
- r.tv_usec = t.tv_usec + (inc % 1000);
- r.tv_sec = t.tv_sec + inc / 1000;
- if(r.tv_usec > 999){
- r.tv_usec -= 1000;
- r.tv_sec++;
- }
- return(r);
-}
-
-Subtract_Timeval_Int
-static struct timeval Subtract_Timeval_Int(struct timeval t, int inc){
- struct timeval r;
- r.tv_usec = t.tv_usec - (inc % 1000);
- r.tv_sec = t.tv_sec - inc / 1000;
- if(r.tv_usec < 0){
- r.tv_usec += 1000;
- r.tv_sec--;
- }
- return(r);
-}
-
-Divide_Timeval_Int
-static struct timeval Divide_Timeval_Int(struct timeval t, int d){
- struct timeval r;
- r.tv_sec = t.tv_sec / d;
- r.tv_usec = (t.tv_usec + 1000*( t.tv_sec % d )) / d;
- return(r);
-}
-
-
-Subtract_Timeval_Timeval
-static int Subtract_Timeval_Timeval(struct timeval t1, struct timeval t2){
- return(1000*(t1.tv_sec - t2.tv_sec) + (t1.tv_usec - t2.tv_usec) );
-}
-
-Compare_Timeval
-static int Compare_Timeval(struct timeval t1, struct timeval t2){
- return( t1.tv_sec != t2.tv_sec ? t1.tv_sec - t2.tv_sec : t1.tv_usec - t2.tv_usec );
-}
-
-Timeval_Constructor
-static struct timeval Timeval_Constructor(int s, int m){
- struct timeval r;
- r.tv_sec = s;
- r.tv_usec = m;
- return(r);
-}
-
-String_Constructor
-static struct gs_string String_Constructor(char *l){
- struct gs_string s;
- s.data = l;
- s.owner = NULL;
- s.length = 0;
- while(l[s.length] != '\0') s.length++;
- return(s);
-}
-
-Compare_String
-
-str_assign_with_copy
-
-str_assign_with_copy_in_tuple
-
-str_replace
-
-str_length
-
-str_destroy
+\r
+Add_Int_Timeval\r
+static struct timeval Add_Int_Timeval(int inc, struct timeval t){\r
+ struct timeval r;\r
+ r.tv_usec = t.tv_usec + (inc % 1000);\r
+ r.tv_sec = t.tv_sec + inc / 1000;\r
+ if(r.tv_usec > 999){\r
+ r.tv_usec -= 1000;\r
+ r.tv_sec++;\r
+ }\r
+ return(r);\r
+} \r
+\r
+Add_Timeval_Int\r
+static struct timeval Add_Timeval_Int(struct timeval t, int inc){\r
+ struct timeval r;\r
+ r.tv_usec = t.tv_usec + (inc % 1000);\r
+ r.tv_sec = t.tv_sec + inc / 1000;\r
+ if(r.tv_usec > 999){\r
+ r.tv_usec -= 1000;\r
+ r.tv_sec++;\r
+ }\r
+ return(r);\r
+}\r
+\r
+Subtract_Timeval_Int\r
+static struct timeval Subtract_Timeval_Int(struct timeval t, int inc){\r
+ struct timeval r;\r
+ r.tv_usec = t.tv_usec - (inc % 1000);\r
+ r.tv_sec = t.tv_sec - inc / 1000;\r
+ if(r.tv_usec < 0){\r
+ r.tv_usec += 1000;\r
+ r.tv_sec--;\r
+ }\r
+ return(r);\r
+}\r
+\r
+Divide_Timeval_Int\r
+static struct timeval Divide_Timeval_Int(struct timeval t, int d){\r
+ struct timeval r;\r
+ r.tv_sec = t.tv_sec / d;\r
+ r.tv_usec = (t.tv_usec + 1000*( t.tv_sec % d )) / d;\r
+ return(r);\r
+} \r
+ \r
+\r
+Subtract_Timeval_Timeval\r
+static int Subtract_Timeval_Timeval(struct timeval t1, struct timeval t2){\r
+ return(1000*(t1.tv_sec - t2.tv_sec) + (t1.tv_usec - t2.tv_usec) );\r
+}\r
+\r
+Compare_Timeval\r
+static int Compare_Timeval(struct timeval t1, struct timeval t2){\r
+ return( t1.tv_sec != t2.tv_sec ? t1.tv_sec - t2.tv_sec : t1.tv_usec - t2.tv_usec );\r
+}\r
+\r
+Timeval_Constructor\r
+static struct timeval Timeval_Constructor(int s, int m){\r
+ struct timeval r;\r
+ r.tv_sec = s;\r
+ r.tv_usec = m;\r
+ return(r);\r
+}\r
+\r
+String_Constructor\r
+static struct gs_string String_Constructor(char *l){\r
+ struct gs_string s;\r
+ s.data = l;\r
+ s.owner = NULL;\r
+ s.length = 0;\r
+ while(l[s.length] != '\0') s.length++;\r
+ return(s);\r
+}\r
+\r
+Compare_String\r
+\r
+str_assign_with_copy\r
+\r
+str_assign_with_copy_in_tuple\r
+\r
+str_replace\r
+\r
+str_length\r
+\r
+str_destroy\r