root/lang/ruby/ActionScriptPreprocessor/trunk/sha1.ash @ 3849

#define shaSuccess      0
#define shaNull         1
#define shaInputTooLong 2
#define shaStateError   3

#define SHA1HashSize 20
#define WORD32_MASK 0xffffffff
#define WORD32(x) ((x)>=0?(x):(x+4294967296))

#define new_SHA1Context \
{ \
        Intermediate_Hash:      new Array(SHA1HashSize/4), \
                                                                                                           \
        Length_Low:             0,                         \
        Length_High:            0,                         \
                                                                                                           \
        Message_Block_Index:    0,                         \
        Message_Block:          new Array(64),             \
                                                                                                           \
        Computed: 0,                                       \
        Corrupted:0                                        \
}