annotate run/e/extern_11_A.d @ 1553:46ba0b9746f3

dmd-1.019: extern(System)
author thomask
date Mon, 23 Jul 2007 18:44:32 +0000
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1553
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
1 // $HeadURL$
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
2 // $Date$
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
3 // $Author$
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
4
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
5 module dstress.run.e.extern_11_A;
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
6
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
7 version(Windows){
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
8 extern(Windows) int test(int a, int b){
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
9 return (a * 2) + b;
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
10 }
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
11 }else{
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
12 extern(C) int test(int a, int b){
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
13 return (a * 2) + b;
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
14 }
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
15 }
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
16
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
17 extern(System) int function(int, int) foo = &test;
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
18
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
19 int main(){
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
20 if(11 != foo(3, 5)){
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
21 assert(0);
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
22 }
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
23
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
24 return 0;
46ba0b9746f3 dmd-1.019: extern(System)
thomask
parents:
diff changeset
25 }