mingw/share/doc/gettext/examples/hello-librep/hello.jl.in

   1 #| Example for use of GNU gettext.
   2    This file is in the public domain.
   3
   4    Source code of the librep program.
   5 |#
   6
   7 (require 'rep.i18n.gettext)
   8
   9 (textdomain "hello-librep")
  10 (bindtextdomain "hello-librep" "@localedir@")
  11
  12 (write standard-output (_ "Hello, world!"))
  13 (write standard-output "\n")
  14 (format standard-output (_ "This program is running as process number %d.")
  15                         (process-id))
  16 (write standard-output "\n")