This is main.m in view mode; [Download] [Up]
#include "Tcl.h"
int main (int argc, char *argv[])
{
id tcl = [[Tcl alloc] initWithArgc:argc argv:argv];
[tcl promptAndEval];
exit(0);
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.