kuroko-lang/kuroko
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Cleanup input()

Browse Source
This commit is contained in:
K. Lange 2022-08-10 20:38:14 +09:00
parent 7bd6cdfa66
commit de7e32b9e8
1 changed files with 8 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
src/kuroko.c
View File

@ -118,33 +118,18 @@ _exit:
* a trailing linefeed.
*/
KRK_Function(input) {
FUNCTION_TAKES_AT_MOST(1);
char * prompt = "";
int promptLength = 0;
char * syntaxHighlighter = NULL;
int promptwidth = 0;
char * syntax = NULL;
if (argc) {
CHECK_ARG(0,str,KrkString*,_prompt);
prompt = _prompt->chars;
promptLength = _prompt->codesLength;
if (!krk_parseArgs("|siz", (const char*[]){"prompt","promptwidth","syntax"},
&prompt, &promptwidth, &syntax)) return NONE_VAL();
if (promptwidth == 0 && *prompt) {
promptwidth = strlen(prompt);
}
if (hasKw) {
KrkValue promptwidth;
if (krk_tableGet(AS_DICT(argv[argc]), OBJECT_VAL(S("promptwidth")), &promptwidth)) {
if (!IS_INTEGER(promptwidth)) return TYPE_ERROR(int,promptwidth);
promptLength = AS_INTEGER(promptwidth);
}
KrkValue syntax;
if (krk_tableGet(AS_DICT(argv[argc]), OBJECT_VAL(S("syntax")), &syntax)) {
if (!IS_STRING(syntax)) return TYPE_ERROR(str,syntax);
syntaxHighlighter = AS_CSTRING(syntax);
}
}
return readLine(prompt, promptLength, syntaxHighlighter);
return readLine(prompt, promptwidth, syntax);
}
#ifndef NO_RLINE