mirror of
https://github.com/Stichting-MINIX-Research-Foundation/netbsd.git
synced 2025-09-11 16:15:07 -04:00
18 lines
489 B
Julia
18 lines
489 B
Julia
#| Example for use of GNU gettext.
|
|
Copyright (C) 2003 Free Software Foundation, Inc.
|
|
This file is in the public domain.
|
|
|
|
Source code of the librep program.
|
|
|#
|
|
|
|
(require 'rep.i18n.gettext)
|
|
|
|
(textdomain "hello-librep")
|
|
(bindtextdomain "hello-librep" "@localedir@")
|
|
|
|
(write standard-output (_ "Hello, world!"))
|
|
(write standard-output "\n")
|
|
(format standard-output (_ "This program is running as process number %d.")
|
|
(process-id))
|
|
(write standard-output "\n")
|