partial whitespace cleanup

This commit is contained in:
Philip C Monk 2015-06-12 13:56:30 -04:00
parent c0baedb438
commit e3537b3412
2 changed files with 63 additions and 65 deletions

View File

@ -1468,7 +1468,6 @@
?: (nan b n) [~ n]
?: (nan b m) [~ m]
~
++ pro |= [b=@u p=@u n=[s=? e=@s a=@u]]
^- [s=? e=@s a=@u]
=+ maxexp=`@s`(^mul 2 +(b))
@ -1478,7 +1477,6 @@
?: &(=(1 (mod e.n 2)) (^gte e.n minexp))
(szer:vl:fl b p s.n) :: flush denorms
n
++ err |= [b=@u p=@u n=[s=? e=@s a=@u]]
^- (unit tape)
?: (snan b n) [~ "snan"]