ports: Export 'current-load-port'.

This binding was forgotten when (ice-9 ports) was introduced in
44b3342c4d5ebd4bbf21c7c7608a5f1a53ba0eb4.  Thus it has always been
missing in Guile 2.2.

* module/ice-9/ports.scm: Export 'current-load-port'.

diff --git a/module/ice-9/ports.scm b/module/ice-9/ports.scm
index 8eee22988d7e92cf50f2012fe9ac5a8d2d1ea4a4..dbc7ef7a7990fc99cfffa8572152197324e5aece 100644 (file)
--- a/module/ice-9/ports.scm
+++ b/module/ice-9/ports.scm
@@ -1,5 +1,5 @@
 ;;; Ports
-;;; Copyright (C) 2016 Free Software Foundation, Inc.
+;;; Copyright (C) 2016, 2019 Free Software Foundation, Inc.
 ;;;
 ;;; This library is free software: you can redistribute it and/or modify
 ;;; it under the terms of the GNU Lesser General Public License as
@@ -31,6 +31,7 @@
             %set-port-property!
             current-input-port current-output-port
             current-error-port current-warning-port
+            current-load-port
             set-current-input-port set-current-output-port
             set-current-error-port
             port-mode