There was an error while loading. Please reload this page.
1 parent a8644ca commit 26b010dCopy full SHA for 26b010d
src/stdlib_ansi_cursor.f90
@@ -71,7 +71,7 @@ pure function move_down(line) result(str)
71
if (line <= 0) then
72
str = ""
73
else
74
- str = esc//"["//to_string(line)//"A"
+ str = esc//"["//to_string(line)//"B"
75
end if
76
77
end function move_down
@@ -85,7 +85,7 @@ pure function move_right(line) result(str)
85
86
87
88
+ str = esc//"["//to_string(line)//"C"
89
90
91
end function move_right
@@ -99,7 +99,7 @@ pure function move_left(line) result(str)
99
100
101
102
+ str = esc//"["//to_string(line)//"D"
103
104
105
end function move_left
0 commit comments