roc-lang/roc
1
1
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2024-09-11 10:55:31 +03:00
Code Issues Packages Projects Releases Wiki Activity

Remove initial :help from web REPL history + fix edge cases

Browse Source
This commit is contained in:
Brian Carroll 2023-09-10 11:26:29 +01:00
parent a99f9fee14
commit 034482101f
No known key found for this signature in database
GPG Key ID: 5C7B2EC4101703C0
1 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
www/public/repl/repl.js
View File

@ -48,9 +48,13 @@ roc_repl_wasm.default("/repl/roc_repl_wasm_bg.wasm").then((instance) => {
"Type some Roc code and press Enter. (Use Shift-Enter or Ctrl-Enter for multi-line input)";
repl.compiler = instance;
// Show the help text by providing fake input, and then removing it!
// Show the help text by providing fake input
repl.inputQueue.push(":help");
processInputQueue();
// Remove the fake input
repl.inputHistory.shift();
repl.inputHistoryIndex = 0;
document.querySelector(".input").remove();
});
@ -80,6 +84,9 @@ function onInputKeyup(event) {
switch (keyCode) {
case UP:
if (repl.inputHistory.length === 0) {
return;
}
if (repl.inputHistoryIndex == repl.inputHistory.length - 1) {
repl.inputStash = el.value;
}
@ -91,6 +98,9 @@ function onInputKeyup(event) {
break;
case DOWN:
if (repl.inputHistory.length === 0) {
return;
}
if (repl.inputHistoryIndex === repl.inputHistory.length - 1) {
setInput(repl.inputStash);
} else {