needs tests/harness comp/sig
testbegin

\test annotate
annotate ( uint uint -- uint ) max
"max" findannotated #true
' .type capture "( uint uint -- uint )" #[]s=

testend