Т>char*f="char*f=%c%s%c;main(){printf(f,34,f,34,10);}%c";
Т>main(){printf(f,34,f,34,10);}
Т>

 def l = '\\';
 def q = '\"';
 def b = '\$';
 def n = '\n';

 def introspect(s)
 {
  System.Console.WriteLine($" def l = '$l$l';$n def q = '$l$q';$n def b = '$l$b';$n def n = '$(l)n';$n$n def introspect(s)$n {$n  System.Console.WriteLine($b$q$s$q);$n }$n$n introspect($q$s$q);");
 }

 introspect(" def l = '$l$l';$n def q = '$l$q';$n def b = '$l$b';$n def n = '$(l)n';$n$n def introspect(s)$n {$n  System.Console.WriteLine($b$q$s$q);$n }$n$n introspect($q$s$q);");