Artifact 92204860972f807c62e508f4c776cd8fb1887bfd34332de0b87b2e46b61e5ed2:

• Executable file build/test/test.tcl — part of check-in [8e2b1497b3] at 2018-06-30 13:13:28 on branch trunk — More work on an internal signing function (user: rkeene, size: 386) [annotate] [blame] [check-ins using]

#! /usr/bin/env tclsh

lappend auto_path [file join [file dirname [info script]] .. ..]

package require nano

set key [binary decode hex 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000]
puts "Key Length: [string length $key]"
set signed [binary encode hex [::nano::internal::sign "" $key]]

puts $signed