File tree Expand file tree Collapse file tree 1 file changed +4
-0
lines changed
Expand file tree Collapse file tree 1 file changed +4
-0
lines changed Original file line number Diff line number Diff line change @@ -585,6 +585,7 @@ Evaluate;
585585
586586Print;
587587.end
588+ # pend_if wordsize == 2
588589assert result(" PI0" ) =~ expr(" 1.0e+00*a*b" )
589590assert result(" PI1" ) =~ expr(" 3.14159265358979323846e+00" )
590591assert result(" PI2" ) =~ expr(" 9.42477796076937971538e+00" )
@@ -609,6 +610,7 @@ Evaluate pi_;
609610
610611Print;
611612.end
613+ # pend_if wordsize == 2
612614assert result(" PI" ) =~ expr(" 3.141592653589793238462643383279502884198e+00" )
613615assert result(" EE" ) =~ expr(" 1.0e+00*ee_" )
614616assert result(" EM" ) =~ expr(" 1.0e+00*em_" )
@@ -626,6 +628,7 @@ Evaluate ee_;
626628
627629Print;
628630.end
631+ # pend_if wordsize == 2
629632assert result(" PI" ) =~ expr(" 1.0e+00*pi_" )
630633assert result(" EE" ) =~ expr(" 2.718281828459045235360287471352662497757247093699959574967e+00" )
631634assert result(" EM" ) =~ expr(" 1.0e+00*em_" )
@@ -643,6 +646,7 @@ Evaluate em_;
643646
644647Print;
645648.end
649+ # pend_if wordsize == 2
646650assert result(" PI" ) =~ expr(" 1.0e+00*pi_" )
647651assert result(" EE" ) =~ expr(" 1.0e+00*ee_" )
648652assert result(" EM" ) =~ expr(" 5.7721566490153286060651209008240243104215933593992359880577e-01" )
You can’t perform that action at this time.
0 commit comments