Make 1985/sicherman more like original wrt CPP
Although the no longer valid code is commented out the macros and the extra function (subr()) now exist to make it look more like it used to before the fix. I have another version to make it even more like the original but a question that has to be answered is which should be the sicherman.c. This can be decided at another time but I see it both ways: the way it is now provides more educational value but it seems less 'authentic' too. But on the other hand having it closer to the original with commented out code could also be an issue - maybe. Even so the working version might have some code that can be replaced with the macros to make it more like before (this has yet to be determined).
This commit is contained in:
1 parent
5296d0e065
commit
9b0153d4cf
1 file changed
+14
-1
@@ -1,3 +1,9 @@
|
||||
#define C_C_(_)~' '&_
|
||||
#define _C_C(_)('\b'b'\b'>=C_C>'\t'b'\n')
|
||||
#define C_C _|_
|
||||
#define b *
|
||||
#define C /b/
|
||||
#define V _C_C(
|
||||
main(/*/,('\b'*'\b'>=_|_>'\t'*'\n')
|
||||
char **('\b'*'\b'>=_|_>'\t'*'\n')
|
||||
* C program. (If you don't
|
||||
@@ -11,4 +17,11 @@ char **('\b'*'\b'>=_|_>'\t'*'\n')
|
||||
|
||||
'\b'*'\b'|((_-52)%('\b'*'\b'+~' '&'\t'*'\n')+1),1),&_,1));
|
||||
}
|
||||
|
||||
/*
|
||||
subr(C)
|
||||
char *C;
|
||||
{
|
||||
C="Lint says "argument Manual isn't used." What's that
|
||||
mean?"; while (write((read(C_C('"'-'*"'/*"/))?__:__-_+
|
||||
'\b'b'\b'|((_-52)%('\b'b'\b'+C_C_('\t'b'\n'))+1),1),&_,1));
|
||||
}*/
|
||||
Reference in new issue
Block a user