--- gforth/envos.fs.in	2007/12/31 18:40:24	1.5
+++ gforth/envos.fs.in	2008/07/15 09:30:12	1.6
@@ -29,3 +29,7 @@ set-current
 : libtool-command ( -- c-addr u ) \ gforth
 \G name of the GNU libtool command
     s" @GNU_LIBTOOL@" ;
+
+: libtool-cc ( -- c-addr u ) \ gforth
+\G invocation string of the C compiler used for libtool
+    s" @CC@" ;