/[escript]/trunk/dudley/src/Dudley.c
ViewVC logotype

Annotation of /trunk/dudley/src/Dudley.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3892 - (hide annotations)
Tue Apr 10 08:57:23 2012 UTC (7 years ago) by jfenwick
File MIME type: text/plain
File size: 1760 byte(s)
Merged changes across from the attempt2 branch.
This version builds and passes python2 tests.
It also passes most python3 tests.



1 jgs 82
2 ksteube 1312 /*******************************************************
3 ksteube 1811 *
4 jfenwick 2881 * Copyright (c) 2003-2010 by University of Queensland
5 ksteube 1811 * Earth Systems Science Computational Center (ESSCC)
6     * http://www.uq.edu.au/esscc
7     *
8     * Primary Business: Queensland, Australia
9     * Licensed under the Open Software License version 3.0
10     * http://www.opensource.org/licenses/osl-3.0.php
11     *
12     *******************************************************/
13 jgs 82
14     /**************************************************************/
15    
16 jfenwick 3086 /* Dudley finite element solver */
17 jgs 82
18     /**************************************************************/
19    
20 jfenwick 3082 #include "Dudley.h"
21 jgs 82
22 jgs 150 /* This function returns a time mark */
23 jfenwick 3224 double Dudley_timer(void)
24     {
25 jfenwick 3227 return Esys_timer();
26 jgs 150 }
27 jgs 82
28     /* This function checks if the pointer ptr has a target. If not an
29     error is raised and TRUE is returned. */
30 jfenwick 3224 bool_t Dudley_checkPtr(void *arg)
31     {
32 jfenwick 3227 return Esys_checkPtr(arg);
33 jgs 150 }
34 jgs 82
35 jgs 150 /* reset the error to NO_ERROR */
36 jfenwick 3224 void Dudley_resetError(void)
37     {
38 jfenwick 3227 Esys_resetError();
39 jgs 150 }
40 jgs 82
41 jgs 150 /* sets an error */
42 jfenwick 3224 void Dudley_setError(Dudley_ErrorCodeType err, __const char *msg)
43     {
44 jfenwick 3227 Esys_setError(err, msg);
45 jgs 82 }
46    
47 jgs 150 /* checks if there is no error */
48 jfenwick 3224 bool_t Dudley_noError(void)
49     {
50 jfenwick 3227 return Esys_noError();
51 jgs 150 }
52    
53     /* return the error code */
54 jfenwick 3224 Dudley_ErrorCodeType Dudley_getErrorType(void)
55     {
56 jfenwick 3227 return Esys_getErrorType();
57 jgs 150 }
58    
59     /* return the error message */
60 jfenwick 3224 char *Dudley_getErrorMessage(void)
61     {
62 jfenwick 3227 return Esys_getErrorMessage();
63 jgs 150 }
64 jfenwick 3224
65 jgs 150 /* return the error message */
66 jfenwick 3224 void Dudley_convertPasoError(void)
67     {
68     /* nothing has to be done here */
69 jgs 150 }
70    
71 bcumming 730 /* checks that there is no error accross all processes in a communicator */
72     /* NOTE : does not make guarentee consistency of error string on each process */
73 jfenwick 3227 bool_t Dudley_MPI_noError(Esys_MPIInfo * mpi_info)
74 bcumming 730 {
75 jfenwick 3227 return Esys_MPIInfo_noError(mpi_info);
76 bcumming 730 }

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision
svn:mergeinfo /branches/lapack2681/finley/src/Finley.c:2682-2741 /branches/pasowrap/dudley/src/Dudley.c:3661-3674 /branches/py3_attempt2/dudley/src/Dudley.c:3871-3891 /branches/restext/finley/src/Finley.c:2610-2624 /branches/ripleygmg_from_3668/dudley/src/Dudley.c:3669-3791 /branches/stage3.0/finley/src/Finley.c:2569-2590 /release/3.0/finley/src/Finley.c:2591-2601

  ViewVC Help
Powered by ViewVC 1.1.26