在这种情况下,我试图破译我的第一个大型程序,即LISP解释器.我对理解别人的代码的世界完全陌生,而且它似乎远比编码自己复杂得多.
我几乎无法生成当前难度的最小版本,因为我目前的难度在于最小化现有代码以便更好地掌握它,并且我在每次修改时都会遇到错误.
解释器使用Current_Input和Current_Output全局变量来抽象读取和写入文件和小部件.我只是想让它写入stdout.
相关的路线是:
Current_Output = alloc_objet(sizeof(Widget *)); objet_type(Current_Output) = OWIDGET; Owidget(Current_Output) = Wtext;
分配一个对象(超级类型),告诉它真正的类型是"WIDGET",并为其分配Widget Wtext.
OFILE类型已经存在,并且有一个类似于Owidget宏的宏Ofile,这里有两个:
#define Owidget(objet) (* ((output_widget) objet + JMP)) #define Ofile(objet) ((FILE *) objet + JMP)
我想更换三条相关的线路:
Current_Output = alloc_objet(sizeof(FILE *)); objet_type(Current_Output) = OFILE; Ofile(Current_Output) = stdout;
这会产生以下错误:
error: lvalue required as left operand of assignment Ofile(Current_Output) = stdout;
这一行:
printf("%d", Ofile(Current_Output));
产生此警告:
warning: format ‘%d’ expects argument of type ‘int’, but argument 2 has type ‘FILE* {aka _IO_FILE*}’ [-Wformat=]
让我相信我在烦扰线的左侧有一个文件*,我想要分配标准输出,另一个文件*.
这有什么不对?谢谢!