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