#include "tweak.h"
gehe zum Quellcode dieser Datei
Funktionen | |
| private inherit | HOME ("parser") |
| static varargs mixed | lisp (string input, int interactive, int in) |
| static void | create () |
| static void | init (int arg) |
| static void create | ( | ) | [static] |
| private inherit HOME | ( | "parser" | ) |
| static varargs mixed lisp | ( | string | input, | |
| int | interactive, | |||
| int | in | |||
| ) | [static] |
Definiert in Zeile 13 der Datei lisp.c.
Benutzt add_input(), clear_input(), error(), initialize(), input_to(), msg() und parse().
Wird benutzt von cmdline(), create() und load().
00014 { 00015 string msg, error; 00016 add_input(input); // put lines on stack 00017 switch(parse(&msg, interactive)) 00018 { 00019 case 0: return msg; // ok 00020 case -1: clear_input(); return 0; // empty list 00021 case -2: initialize(); // exec error 00022 clear_input(); 00023 return (in ? (printf(msg), 0): (interactive ? msg : -1)); 00024 case -3: if(interactive) // missing ) 00025 { 00026 printf("%s? ", msg); 00027 input_to("lisp", 0, 1, 1); 00028 return -1; 00029 } 00030 else return (in ? (printf(msg), 0): (interactive ? msg : -1)); 00031 default: if(!msg) msg ="*Unknown error occured\n"; // unknown error 00032 clear_input(); 00033 return (in ? (printf(msg), 0): 00034 (interactive ? msg : -1)); 00035 } 00036 return 0; 00037 }


1.6.3