TCL foreach command encryption issue?

I am tryping to encrypt my TCL project for OrCAD with  tclcompiler86.exe by following the method described in help documents.

I found it seems to have some bug in OrCAD TCL environment excuting the encrypted .tbc file with foreach command inside a proc.

Here is the simple example:

a.tcl:

 foreach i {a b c d e} {
 puts "puts eng $i"
 }

b.tcl:

proc abc {} { 
  foreach i {a b c d e} {
  puts "puts eng $i"
  }
}

I encrypted tcl files with the command:

tclcompiler86 .\a.tcl to get a.tbc

tclcompiler86 .\b.tcl to get b.tbc

Then source it in Orcad command window, a.tbc and b.tcl runs okay, but b.tbc failed.

the same b.tbc can runs okay in tclsh:

Both 17.4 and 24.1 version has same situation, does anyone know how to fix it? Or any other encryption method for TCL projects?