Mercurial > projects > ldc
diff test/intrinsics.d @ 1:c53b6e3fe49a trunk
[svn r5] Initial commit. Most things are very rough.
author | lindquist |
---|---|
date | Sat, 01 Sep 2007 21:43:27 +0200 |
parents | |
children | 44a95ac7368a |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/intrinsics.d Sat Sep 01 21:43:27 2007 +0200 @@ -0,0 +1,30 @@ +import llvm.intrinsic; + +extern(C) int scanf(char*,...); + +void main() +{ + { + float f; + printf("Enter float: "); + scanf("%f", &f); + float sf = llvm_sqrt(f); + printf("sqrt(%f) = %f\n", f, sf); + } + + { + double d; + printf("Enter double: "); + scanf("%lf", &d); + double sd = llvm_sqrt(d); + printf("sqrt(%lf) = %lf\n", d, sd); + } + + { + real d; + printf("Enter real: "); + scanf("%lf", &d); + real sd = llvm_sqrt(d); + printf("sqrt(%lf) = %lf\n", d, sd); + } +}