fork download
  1. puts [expr {-2**2}]
  2. puts [expr {-(2)**2}]
  3. set a 2
  4. puts [expr {-$a**2}]
Success #stdin #stdout 0s 15776KB
stdin
Standard input is empty
stdout
4
4
4