diff --git a/src/ngspice_backannotate.tcl b/src/ngspice_backannotate.tcl
index e8211518..e11fcf94 100644
--- a/src/ngspice_backannotate.tcl
+++ b/src/ngspice_backannotate.tcl
@@ -121,6 +121,7 @@ proc ngspice::get_current {n} {
     set n @$n
   }
   set n i($n)
+  puts "ngspice::get_current --> $n"
   set err [catch {set ::ngspice::ngspice_data($n)} res]
   if { $err } {
     set res {?}
diff --git a/xschem_library/examples/poweramp.sch b/xschem_library/examples/poweramp.sch
index 2b6bcfe8..bb70b1e9 100644
--- a/xschem_library/examples/poweramp.sch
+++ b/xschem_library/examples/poweramp.sch
@@ -269,3 +269,7 @@ tclcommand="ngspice::annotate"}
 C {launcher.sym} 1000 -320 0 0 {name=h4
 descr="View raw file"
 tclcommand="textwindow $netlist_dir/poweramp.raw"}
+C {ngspice_get_expr.sym} 220 -1040 0 0 {name=r19 
+node="[ngspice::get_current \{r9[i]\}]"
+descr = current
+}