Mercurial > projects > dstress
diff run/mini/intrinsics.d @ 1628:c6ef09dfba4d
add mini test set from ldc project
author | Moritz Warning <moritzwarning@web.de> |
---|---|
date | Mon, 10 Jan 2011 19:47:18 +0100 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/run/mini/intrinsics.d Mon Jan 10 19:47:18 2011 +0100 @@ -0,0 +1,28 @@ +import ldc.intrinsics; + +extern(C) int printf(char*,...); +extern(C) int scanf(char*,...); + +void main() +{ + float f; + printf("Enter float: "); + //scanf("%f", &f); + f = 1.22345; + float sf = llvm_sqrt(f); + printf("sqrt(%f) = %f\n", f, sf); + + double d; + printf("Enter double: "); + //scanf("%lf", &d); + d = 2.2311167895435245; + double sd = llvm_sqrt(d); + printf("sqrt(%lf) = %lf\n", d, sd); + + real r; + printf("Enter real: "); + //scanf("%llf", &r); + r = 3.2311167891231231234754764576; + real sr = llvm_sqrt(r); + printf("sqrt(%Lf) = %Lf\n", r, sr); +}