wrapping add: the byte sum, carry discarded (two's complement wraps mod 256)
319def stdI8AddWrapping =
320 (lambda unrestricted a : (family StdI8) .
321 (lambda unrestricted b : (family StdI8) .
322 (eliminate
323 ByteAddResult
324 (lambda unrestricted current : (family ByteAddResult) . (family StdI8))
325 (byteAddWithCarry (stdI8ToByte a) (stdI8ToByte b) zero)
326 (branch ByteAddResultValue sum carry . (constructor StdI8 StdI8Of sum)))))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.