spell defined "defined" instead of "procedure"

From-SVN: r52868

diff --git a/gcc/fixinc/check.tpl b/gcc/fixinc/check.tpl
index 9566363018b82058c21352b46f4665a86808e7d2..a241d18d0e891b70cd1c1d1d715fd8b61b863fd1 100644 (file)
--- a/gcc/fixinc/check.tpl
+++ b/gcc/fixinc/check.tpl
@@ -171,6 +171,6 @@ else
 fi
 $exitok[=
 
-(if (procedure? 'set-writable) (set-writable))
+(if (defined? 'set-writable) (set-writable))
 
 =]