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