[daip] 31DEC99, TVDEVS.SH

[Vincent McIntyre]

Hi
I suppose you know all about this by now but I think I found a bug in the
TVDEVS startup script for 31DEC99. It compares $TVN (which can be a
hexadecimal number) with -eq, and gets 0 for when TVN is 0A, 0B etc.

I'm not sure if
            while [ $i -lt 36 ] ; do
              ei=`EHEX $i`
		....
              if [ "$OTH" = "" ] ; then
                TVN=$ei
or
            if [ $TVN -eq 0 ] ; then
is the bug.

I presume this has been fixed, but in any case my patch is included below.

Vincent McIntyre                                        vmcintyr at atnf.csiro.au
Australia Telescope National Facility, CSIRO             voice:+61-2-9372-4643
PO Box 76, Epping, NSW 1710, AUSTRALIA                     fax:+61-2-9372-4442


--- /AIPS/31DEC99/SYSTEM/UNIX/TVDEVS.SH Wed Sep 22 06:52:58 1999
+++ /AIPS/TVDEVS.SH     Tue Jul  3 16:23:15 2001
@@ -356,7 +356,9 @@
               fi
               i=`expr $i + 1`
             done
-            if [ $TVN -eq 0 ] ; then
+           #2001-07-03 VJM this is a bug for > 9 tvs; compares HEX to DEC
+            #if [ $TVN -eq 0 ] ; then
+            if [ `REHEX $TVN` -eq 0 ] ; then
               ei1 "No free socket slots left!"
               exit 1
             fi