diff options
author | Nikita Domnitskii <nikita@domnitskii.me> | 2024-03-14 17:11:23 +0600 |
---|---|---|
committer | Rob Browning <rlb@defaultvalue.org> | 2024-04-05 17:51:33 -0500 |
commit | 025bb024ae4b586dc721e3d2e3471fbea5f8cc81 (patch) | |
tree | 4acd957417524b723790734a021e72d69317d78c | |
parent | 48548df91e9eb5d4a46391da0ad0a8cdd3387857 (diff) | |
download | guile-025bb024ae4b586dc721e3d2e3471fbea5f8cc81.tar.gz |
eval-string: set port column to column, not line
* module/ice-9/eval-string.scm: set column to column, not line.
-rw-r--r-- | module/ice-9/eval-string.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/eval-string.scm b/module/ice-9/eval-string.scm index ea0f17777..9cac03632 100644 --- a/module/ice-9/eval-string.scm +++ b/module/ice-9/eval-string.scm @@ -81,7 +81,7 @@ (if line (set-port-line! port line)) (if column - (set-port-column! port line)) + (set-port-column! port column)) (if (or compile? (not (language-evaluator lang))) ((load-thunk-from-memory |