Miroirs/waforth
1
0
Fork 0
mirror of https://github.com/remko/waforth synced 2024-12-26 09:59:09 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

standalone: Implement KEY

Browse source
This commit is contained in:
Remko Tronçon 2022-05-26 14:06:15 +02:00
parent 7a1e7de085
commit e8202a153d
1 changed files with 11 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/standalone/main.c
View file

@ -1,4 +1,5 @@
#include <stdio.h>
#include <termios.h>
#include "waforth_core.h"
#include "wasm.h"
@ -58,7 +59,16 @@ wasm_trap_t *read_cb(const wasm_val_vec_t *args, wasm_val_vec_t *results) {
}
wasm_trap_t *key_cb(const wasm_val_vec_t *args, wasm_val_vec_t *results) {
// TODO
struct termios old, current;
tcgetattr(0, &old);
current = old;
current.c_lflag &= ~ICANON;
current.c_lflag &= ~ECHO;
tcsetattr(0, TCSANOW, &current);
char ch = getchar();
tcsetattr(0, TCSANOW, &old);
results->data[0].kind = WASM_I32;
results->data[0].of.i32 = ch;
return NULL;
}