#----------------------------------------------------------------------------
            ;;
        glnxa64)
#----------------------------------------------------------------------------
            RPATH="-Wl,-rpath-link,$TMW_ROOT/bin/$Arch"
            # StorageVersion: 1.0
            # CkeyName: GNU C
            # CkeyManufacturer: GNU
            # CkeyLanguage: C
            # CkeyVersion:
            CC='gcc-4.3'
            CFLAGS='-ansi -D_GNU_SOURCE'
            CFLAGS="$CFLAGS  -fexceptions"
            CFLAGS="$CFLAGS -fPIC -fno-omit-frame-pointer -pthread"
            CLIBS="$RPATH $MLIBS -lm"
            COPTIMFLAGS='-O -DNDEBUG'
            CDEBUGFLAGS='-g'
            CLIBS="$CLIBS -lstdc++"
#
            # C++keyName: GNU C++
            # C++keyManufacturer: GNU
            # C++keyLanguage: C++
            # C++keyVersion: 
            CXX='g++-4.3'
            CXXFLAGS='-ansi -D_GNU_SOURCE'
            CXXFLAGS="$CXXFLAGS -fPIC -fno-omit-frame-pointer -pthread"
            CXXLIBS="$RPATH $MLIBS -lm"
            CXXOPTIMFLAGS='-O -DNDEBUG'
            CXXDEBUGFLAGS='-g'
#
            # FortrankeyName: gfortran
            # FortrankeyManufacturer: GNU
            # FortrankeyLanguage: Fortran
            # FortrankeyVersion: 
#
            FC='gfortran-4.3'
            FFLAGS='-fexceptions -fbackslash'
            FFLAGS="$FFLAGS -fPIC -fno-omit-frame-pointer"
            FLIBS="$RPATH $MLIBS -lm"
            FOPTIMFLAGS='-O'
            FDEBUGFLAGS='-g'
#
            LD="$COMPILER"
            LDEXTENSION='.mexa64'
            LDFLAGS="-pthread -shared -Wl,--version-script,$TMW_ROOT/extern/lib/$Arch/$MAPFILE -Wl,--no-undefined"
            LDOPTIMFLAGS='-O'
            LDDEBUGFLAGS='-g'
#
            POSTLINK_CMDS=':'
#----------------------------------------------------------------------------

 1 #include <mex.h>
 2  
 3 double addtiontest(double x, double y);
 4 double doublesize(double a, double b);
 5  
 6 void mexFunction(int nlhs, mxArray *plhs[], int nrhs,const mxArray *prhs[])
 7 {
 8     double *a;
 9     double b, c;
10     
11     /******Output******/
12     plhs[0] = mxCreateDoubleMatrix(1, 1, mxREAL);
13     a = mxGetPr(plhs[0]);
14     
15     /******Input******/
16     b = *(mxGetPr(prhs[0]));
17     c = *(mxGetPr(prhs[1]));
18     *a = addtiontest(b, c);
19 }
20 
21 double addtiontest(double x, double y)
22 {
23     double z;
24     z = doublesize(x,y);
25     return z;
26 }

 1 #include <stdio.h>
 2 #include <string.h> /* For strcmp() */
 3 #include <stdlib.h> /* For EXIT_FAILURE, EXIT_SUCCESS */
 4 #include <mex.h>
 5 #include "mat.h"
 6 
 7 double doublesize(double a, double b)
 8 {
 9     MATFile *pmat;    
10     const char *file = "mattest.mat";    
11     
12     mxArray *mat_data;
13     mat_data = mxCreateDoubleMatrix(1,1,mxREAL); 
14     memcpy((void *)(mxGetPr(mat_data)), (void *) &a, sizeof(&a));
15     printf("\n%f\n",*mxGetPr(mat_data));
16         
17     int status, num; 
18     pmat = matOpen(file, "w4");    
19     for(num=1; num<4; num++) {
20         char pnum[]  = {(char)(num+48), '\0'};
21         char pLD[13] = "LocalDouble";
22         status = matPutVariable(pmat, strcat(pLD,pnum), mat_data);
23     }
24       if (matClose(pmat) != 0) {
25         printf("Error closing file %s\n",file);
26         return(EXIT_FAILURE);
27       }
28     
29     mxDestroyArray(mat_data);
30     
31     double c;
32     c = 2*(a+b)+100;
33     return c;
34 
35 }