Edit D:\app\Administrator\product\11.2.0\dbhome_1\owb\lib\int\tcl\lang\GetsCmd.class
?? - ? tcl/lang/GetsCmd java/lang/Object tcl/lang/Command cmdProc )(Ltcl/lang/Interp;[Ltcl/lang/TclObject;)V Exceptions tcl/lang/TclException Code LineNumberTable LocalVariableTable tcl/lang/TclNumArgsException channelId ?varName? <init> <(Ltcl/lang/Interp;I[Ltcl/lang/TclObject;Ljava/lang/String;)V toString ()Ljava/lang/String; tcl/lang/TclObject ! getChannel 7(Ltcl/lang/Interp;Ljava/lang/String;)Ltcl/lang/Channel; # $ tcl/lang/TclIO & java/lang/StringBuffer ( ()V % ' + can not find channel named " - . append ,(Ljava/lang/String;)Ljava/lang/StringBuffer; % , 1 " % 4 &(Ltcl/lang/Interp;Ljava/lang/String;)V 3 7 (I)V % 6 : ; newInstance .(Ljava/lang/StringBuffer;)Ltcl/lang/TclObject; = 9 > tcl/lang/TclString @ A read *(Ltcl/lang/Interp;Ltcl/lang/TclObject;II)I C ? D tcl/lang/Channel F G eof ()Z C E J K isBlocked (Ltcl/lang/Interp;)Z C I N tcl/lang/TclPosixException P error reading " R ((Ltcl/lang/Interp;IZLjava/lang/String;)V M Q U V setVar =(Ljava/lang/String;Ltcl/lang/TclObject;I)Ltcl/lang/TclObject; X T Y tcl/lang/Interp [ 7 setResult X Z [ ^ (Ltcl/lang/TclObject;)V X ] line Ltcl/lang/TclObject; lineLen I e tcl/lang/TclRuntimeError g 2GetsCmd.cmdProc() Error: IOException when getting i getChanName C h l : n getMessage p m q java/lang/Throwable s (Ljava/lang/String;)V d r e Ljava/io/IOException; x java/io/IOException writeToVar Z varName Ljava/lang/String; chan Ltcl/lang/Channel; this Ltcl/lang/GetsCmd; interp Ltcl/lang/Interp; argv [Ltcl/lang/TclObject; ' SourceFile GetsCmd.java ? >:,?? ,?? ? Y+,? ?,?? >,2? :+,2? ? ":? )? Y+? %Y? )*? /,2? ? /0? /? 2? 5? %Y@? 8? <:+? B6? ?? H? 4+? L? +? MY+? %Y? )O? /,2? ? /0? /? 2? S?6? +? WW+? \? +? _? 1:? dY? %Y? )f? /? j? /k? /? o? /? 2? t? f ? ? w j # $ % &