diff options
author | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-12-29 13:04:40 -0500 |
---|---|---|
committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-12-29 13:04:40 -0500 |
commit | f3ebef8119973bcb906f2a597e041ef7d5afab0c (patch) | |
tree | 20b3d40564bcbb594b4a8a56d74113c302388d89 /filo.f90 | |
parent | 6921c5c7332dc2c2ddf1dd2415901d138ec48600 (diff) | |
download | filo-f3ebef8119973bcb906f2a597e041ef7d5afab0c.tar.gz filo-f3ebef8119973bcb906f2a597e041ef7d5afab0c.zip |
Additional changes to debug 1-indexing. Cursor now appears on correct line. Strange behavior at line end insert.
Diffstat (limited to 'filo.f90')
-rw-r--r-- | filo.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -250,8 +250,7 @@ contains character, dimension(:), intent(in)::arr character, dimension(:), allocatable::ctmp - integer::i - + allocate(ctmp(er%size()+size(arr))) ctmp(1:er%size()) = er%chars ctmp(er%size()+1:er%size()+size(arr)) = arr @@ -415,6 +414,7 @@ contains deltax = E%screencols - E%cx + 1 E%cx = E%cx - deltax E%coloff = E%coloff + deltax + Print *, "new offset: ", E%coloff, "->", E%screencols, E%cx end if else call editorRowDelChar(E%row(filerow), filecol - 1) |