[comp.mail.mh] zero/nonzero in mh6.7

denny@tss.com (Denny Page) (11/01/90)

Is there a problem with the zero/nonzero functions in 6.7?

The following input (in replcomps):

Test: %(void(num 0)) zero(%(putnum)) returns %<(zero)true%|false%>\n\
Test: %(void(num 1)) zero(%(putnum)) returns %<(zero)true%|false%>\n\
Test: %(void(num 0)) nonzero(%(putnum)) returns %<(nonzero)true%|false%>\n\
Test: %(void(num 1)) nonzero(%(putnum)) returns %<(nonzero)true%|false%>\n\
Test: zero(0) returns %<(zero (num 0))true%|false%>\n\
Test: zero(1) returns %<(zero (num 1))true%|false%>\n\
Test: nonzero(0) returns %<(nonzero (num 0))true%|false%>\n\
Test: nonzero(1) returns %<(nonzero (num 1))true%|false%>\n\


produces this output:

Test:  zero(0) returns false
Test:  zero(1) returns false
Test:  nonzero(0) returns true
Test:  nonzero(1) returns true
Test: zero(0) returns false
Test: zero(1) returns false
Test: nonzero(0) returns true
Test: nonzero(1) returns true


Am I misunderstanding zero/nonzero or is it broken?