]> git.ipfire.org Git - thirdparty/gettext.git/commitdiff
examples: hello-clisp: Fix runtime error with clisp versions >= 2.34.
authorBruno Haible <bruno@clisp.org>
Thu, 18 Oct 2018 01:02:49 +0000 (03:02 +0200)
committerBruno Haible <bruno@clisp.org>
Thu, 18 Oct 2018 19:16:58 +0000 (21:16 +0200)
* gettext-tools/examples/hello-clisp/hello.lisp.in: Use the function
PROCESS-ID, not PROGRAM-ID.

gettext-tools/examples/hello-clisp/hello.lisp.in

index ce278a6fa32c194e17c0e4a913e606bd7f9d3489..bbcc8ce7d3eb0c4eef5a5cc47190adc7e2b240a6 100644 (file)
@@ -11,5 +11,5 @@
 (write-line (_ "Hello, world!"))
 
 (format t (_ "This program is running as process number ~D.")
-          (system::program-id))
+          (ext:process-id))
 (terpri)