Don't print newlines on (prn) or last expr in file
This commit is contained in:
parent
058bd302df
commit
78f5b98f9f
|
@ -90,6 +90,7 @@ struct Other {
|
|||
char* stringObj(char *dest, const Object *obj);
|
||||
void printList(const Object *list);
|
||||
void printObj(const Object *obj);
|
||||
void _printObj(const Object *obj, int newline);
|
||||
void debugObj(const Object *obj);
|
||||
void printErr(const Object *obj);
|
||||
|
||||
|
|
|
@ -396,8 +396,7 @@ Object print(Object p, Object ignore, struct Environment *env)
|
|||
{
|
||||
p = cloneObject(p);
|
||||
p = eval(&p, env);
|
||||
printObj(&p);
|
||||
printf("\n");
|
||||
_printObj(&p, 0);
|
||||
return p;
|
||||
}
|
||||
|
||||
|
@ -624,7 +623,8 @@ int readFile(const char *filename, struct Environment *env) {
|
|||
}
|
||||
|
||||
r = parseEval(page, env);
|
||||
printAndClean(&r);
|
||||
cleanObject(&r);
|
||||
printf("\n");
|
||||
|
||||
fclose(input);
|
||||
return 0;
|
||||
|
|
Loading…
Reference in New Issue