home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / gettext-0.10.24-src.tgz / tar.out / fsf / gettext / misc / README-Tcl < prev    next >
Text File  |  1996-09-28  |  2KB  |  53 lines
  1.                Gettext support for Tcl
  2.                =======================
  3.  
  4. The file `tcl_gettext.c' contains the first attempt to provide an
  5. interface for Tcl.  I know that TclX already supports `catgets', but
  6. because GNU uses `gettext' and because I think `gettext' is the better
  7. concept I wrote this file.
  8.  
  9.  
  10. Unlike many other interpreter extension I haven't provided a
  11. `tclAppInit.c' file.  I have three reason: it's easy to write (see
  12. Ousterhout's book), It will probably combined with other extensions
  13. and so would be more or less useless.  But the most important reason
  14. is that I don't find Tcl useful without the dynamic loading introduced
  15. in version 7.5.
  16.  
  17. The way I think you should use this module is to build a dynamic
  18. object and load it at runtime with the command `load'.  The following
  19. transcript shows the way I work on my Linux/ELF box.  Consult other
  20. Tcl modules or a local wizard to see how it works for your system.
  21.  
  22.  
  23. 1. Compile the file to position independent object code:
  24.  
  25.    gcc -fPIC -O3 -c tcl_gettext.c
  26.  
  27.    (The file `tcl.h' from tcl7.5 or up and `libintl.h' as installed
  28.     from GNU gettext must be found in the path.)
  29.  
  30. 2. Link the file to a shared object:
  31.  
  32.    gcc -shared -o gettext.so tcl_gettext.o -lintl
  33.  
  34.    (The system's or GNU gettext libintl.a must be found in the path
  35.     of the linker.)
  36.  
  37. 3. Now we are ready to run:
  38.  
  39. bash> tclsh7.5
  40. % load ./gettext.so Gettext
  41. % textdomain "xxx"
  42. % gettext "some string"
  43. The translated form
  44. % exit
  45. bash>
  46.  
  47.  
  48. If you have some ideas how to improve this or you found a bug, please
  49. let me know.
  50.  
  51. Ulrich Drepper <drepper@gnu.ai.mit.edu>, 18. December 1995.
  52.  
  53.