--- a/stage4/stage4.cc	Tue Aug 28 08:42:54 2007 +0200
+++ b/stage4/stage4.cc	Wed Aug 29 11:06:13 2007 +0200
@@ -123,6 +123,20 @@
   return NULL;
 }
 
+void *stage4out_c::printlocation_comasep(const char *str) {
+  *out << (unsigned char)toupper(str[0]);
+  *out << ',';
+  *out << (unsigned char)toupper(str[1]);
+  *out << ',';
+  for (int i = 2; str[i] != '\0'; i++)
+    if(str[i] == '.')
+      *out << ',';
+    else
+      *out << (unsigned char)toupper(str[i]);
+  return NULL;
+}
+
+
 void *stage4out_c::print(std::string str) {
   *out << str;
   return NULL;