Smart pascal source code
var thisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongName
: String = 'Tokenizer stress.';
WriteLn(thisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongNamethisIsAVeryLongName);
{<<< RESULT - CONSOLE LOG >>>
-----------------------------
Tokenizer stress.
-----------------------------
{<<<<<<<<< THE END >>>>>>>>>}