diff --git a/pkg/utilities/nttools/gtedit/t_gtedit.x b/pkg/utilities/nttools/gtedit/t_gtedit.x
index dc1b105d8..b77e1ade2 100644
--- a/pkg/utilities/nttools/gtedit/t_gtedit.x
+++ b/pkg/utilities/nttools/gtedit/t_gtedit.x
@@ -27,7 +27,6 @@ bool	inplace
 pointer	x, y, null, size, sp, tp, deleted, tpr
 pointer	errmsg, bad_column
 int	npix
-int	window			# note:  this is apparently not used
 int	phu_copied		# set by tbfpri and ignored
 int	tgrjmp[LEN_JUMPBUF], epa, old_onint, status
 bool	do_delete, do_quit
@@ -36,7 +35,6 @@ bool	clgetb()
 int	fstati(), scan(), strncmp(), tbpsta()
 pointer	tbtopn()
 extern	tgr_onint2()
-data	window /0/
 common	/tgrcom/ tgrjmp
 
 begin
diff --git a/pkg/utilities/nttools/keyselect/expr.x b/pkg/utilities/nttools/keyselect/expr.x
index fa7e5d312..ab2741812 100644
--- a/pkg/utilities/nttools/keyselect/expr.x
+++ b/pkg/utilities/nttools/keyselect/expr.x
@@ -17,7 +17,7 @@ include	"keyselect.com"
 pointer	op, sp, errmsg
 
 string	badtype  "Expression is not of boolean type"
-string	badname  "Warning: header keyword %s not found in %s\n"
+#string	badname  "Warning: header keyword %s not found in %s\n"
 
 int	errget()
 pointer	evexpr(), locpr()
diff --git a/pkg/utilities/nttools/stxtools/sp_util/spmapt.x b/pkg/utilities/nttools/stxtools/sp_util/spmapt.x
index cef87fed7..1b64be41a 100644
--- a/pkg/utilities/nttools/stxtools/sp_util/spmapt.x
+++ b/pkg/utilities/nttools/stxtools/sp_util/spmapt.x
@@ -24,8 +24,7 @@ bool    perim                   # I:  draw perimeter
 
 real  xcen, ycen, x, y
 real  aspect_ratio
-real  x1, x2, y1, y2, ext, xdis, ydis
-data    ext /0.0625/
+real  x1, x2, y1, y2, xdis, ydis
 real  ggetr()
 
 begin
@@ -36,7 +35,6 @@ begin
         } else {
             x1 = EDGE1;  x2 = EDGE2
             y1 = EDGE3;  y2 = EDGE4
-            
         }
         
         # If any values were specified, then replace them here.
diff --git a/pkg/utilities/nttools/tcopy/tcopy.x b/pkg/utilities/nttools/tcopy/tcopy.x
index 20713f26e..03131fbe4 100644
--- a/pkg/utilities/nttools/tcopy/tcopy.x
+++ b/pkg/utilities/nttools/tcopy/tcopy.x
@@ -45,8 +45,6 @@ int	root_len		# number of char in input directory name
 int	numout			# number of names in output list
 bool	fitsout			# is the output just one FITS file?
 
-char	src[SZ_FNAME], extn[SZ_FNAME]
-
 int	nargs			# number of command-line arguments
 bool	in_redir, out_redir	# is input or output redirected?
 
@@ -211,14 +209,13 @@ bool	verbose		# i: print informational message
 #--
 bool	done
 int	phu_copied	# set by tbfpri and ignored
-pointer	sp, oldname, newname, tp
+pointer	sp, oldname, newname
 
 bool	use_fcopy	# true if we should copy the file with fcopy
 
-pointer	tbtopn()
-bool	streq(), is_wholetab()
-int	tbtacc(), exists, tbttyp()	# exists is ignored
-errchk	tbfpri, tbtcpy, tbtopn
+bool	streq()
+int	tbtacc()
+errchk	tbfpri, tbtcpy
 
 begin
 	call smark (sp)
diff --git a/pkg/utilities/nttools/tedit/screen.x b/pkg/utilities/nttools/tedit/screen.x
index 5fa3e8921..84dd1ac2a 100644
--- a/pkg/utilities/nttools/tedit/screen.x
+++ b/pkg/utilities/nttools/tedit/screen.x
@@ -268,7 +268,7 @@ int	win, row, col, ch
 pointer	sp, field, tab, data
 
 string	notable  "No table associated with this screen"
-string	badtype  "Illegal data type for this field"
+#string	badtype  "Illegal data type for this field"
 string	notadded "Cannot add row to read only table"
 
 bool	check_field()
diff --git a/pkg/utilities/nttools/tedit/table.x b/pkg/utilities/nttools/tedit/table.x
index 9312a3407..61ceff053 100644
--- a/pkg/utilities/nttools/tedit/table.x
+++ b/pkg/utilities/nttools/tedit/table.x
@@ -112,7 +112,7 @@ int	dirty, numcol, numrow, numptr, iptr
 int	height, width, maxcol, clen
 pointer	sp, tabname, filename, ext, cname, tptr, tab
 
-string	notable  "Table does not exist" 
+#string	notable  "Table does not exist" 
 string	nowrite  "No write access to table" 
 string	nocols   "Column names not found in table"
 string	emptytab "Table is empty" 
diff --git a/pkg/utilities/nttools/texpand/parser.x b/pkg/utilities/nttools/texpand/parser.x
index 2dcba75e0..68d769219 100644
--- a/pkg/utilities/nttools/texpand/parser.x
+++ b/pkg/utilities/nttools/texpand/parser.x
@@ -41,7 +41,7 @@ int	opstack[MAXSTACK]
 pointer	sp, rb, work, value, valstack, nxtval, colname, colval
 pointer	idstack[MAXSTACK]
 
-string	find_error  "Column name or type mismatch"
+#string	find_error  "Column name or type mismatch"
 string	stack_error "Stack overflow"
 string	oper_error  "Operator expected"
 string	ident_error "Identifier expected"
diff --git a/pkg/utilities/nttools/tjoin/tjoin.x b/pkg/utilities/nttools/tjoin/tjoin.x
index 399637218..44ec61433 100644
--- a/pkg/utilities/nttools/tjoin/tjoin.x
+++ b/pkg/utilities/nttools/tjoin/tjoin.x
@@ -30,7 +30,7 @@ string  extraopt  "|neither|first|both|"
 string	badextra  "Illegal value for extrarows"
 string	badjnum   "Number of join columns do not match"
 string	badtolnum "Number of tolereances and join columns do not match"
-string	badcolnam "Column name not found in table (%s)"
+#string	badcolnam "Column name not found in table (%s)"
 
 bool	clgetb()
 int	strdic()