• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
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")
17