1 files changed, 0 insertions, 100 deletions
diff --git a/tksao/util/util.C b/tksao/util/util.C
index b549d5a..94d3c8c 100644
--- a/tksao/util/util.C
+++ b/tksao/util/util.C
@@ -14,112 +14,12 @@ Tcl_Interp *global_interp;
 
 int sexSign;     // used by parser and lex to indicate sign of dms or hms
 
-void swap2(char* src, char* dest) {
-  *(dest  ) = *(src+1);
-  *(dest+1) = *(src  );
-}
-
-void swap4(char* src, char* dest) {
-  *(dest  ) = *(src+3);
-  *(dest+1) = *(src+2);
-  *(dest+2) = *(src+1);
-  *(dest+3) = *(src  );
-}
-
-void swap8(char* src, char* dest) {
-  *(dest  ) = *(src+7);
-  *(dest+1) = *(src+6);
-  *(dest+2) = *(src+5);
-  *(dest+3) = *(src+4);
-  *(dest+4) = *(src+3);
-  *(dest+5) = *(src+2);
-  *(dest+6) = *(src+1);
-  *(dest+7) = *(src  );
-}
-
-int lsb()
-{
-  return (*(short *)"\001\000" & 0x0001);
-}
-
 void internalError(const char* msg)
 {
   Tcl_SetVar2(global_interp, "ds9", "msg", msg, TCL_GLOBAL_ONLY);
   Tcl_SetVar2(global_interp, "ds9", "msg,level", "error", TCL_GLOBAL_ONLY);
 }
 
-char* dupstr(const char* str)
-{
-  char* copy;
-  if (str) {
-    copy=new char[strlen(str)+1];
-    strcpy(copy,str);
-  }
-  else
-    copy=NULL;
-
-  return copy;
-}
-
-char* trim(const char* str)
-{
-  char* rr = dupstr(str);
-  char* ptr = rr;
-  while (ptr && *ptr)
-    ptr++;
-  ptr--;
-  while (ptr && (*ptr == ' '))
-    ptr--;
-  ptr++;
-  *ptr = '\0';
-
-  return rr;
-}
-
-char* toLower(const char* str)
-{
-  char* rr = dupstr(str);
-  char* ptr = rr;
-  while (*ptr) {
-    *ptr = (char)(tolower(((int)(*ptr))));
-    ptr++;
-  }
-  return rr;
-}
-
-char* toUpper(const char* str)
-{
-  char* rr = dupstr(str);
-  char* ptr = rr;
-  while (*ptr) {
-    *ptr = (char)(toupper(((int)(*ptr))));
-    ptr++;
-  }
-  return rr;
-}
-
-char* toConstLower(const char* str)
-{
-  strncpy(tobuf,str,1024);
-  char* ptr = tobuf;
-  while (*ptr) {
-    *ptr = (char)(tolower(((int)(*ptr))));
-    ptr++;
-  }
-  return tobuf;
-}
-
-char* toConstUpper(const char* str)
-{
-  strncpy(tobuf,str,1024);
-  char* ptr = tobuf;
-  while (*ptr) {
-    *ptr = (char)(toupper(((int)(*ptr))));
-    ptr++;
-  }
-  return tobuf;
-}
-
 double zeroTWOPI(double aa)
 {
   if (isnan(aa) || isinf(aa) || (aa == -DBL_MAX) || (aa == DBL_MAX))