diff options
| author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-07-16 15:37:14 +0000 |
|---|---|---|
| committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-07-16 15:37:14 +0000 |
| commit | 8180be8f53a02dc6db22867b55754676b3525381 (patch) | |
| tree | 6bcc19a12889e13fdcdd11c27858a0fd2d5fdd64 /lib/sbin/create_fortran_stuff.pl | |
| parent | 9a1dad4851f603b038b893559fe7ec6f58a912d1 (diff) | |
Added CST_error
git-svn-id: http://svn.cactuscode.org/flesh/trunk@718 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/create_fortran_stuff.pl')
| -rw-r--r-- | lib/sbin/create_fortran_stuff.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/sbin/create_fortran_stuff.pl b/lib/sbin/create_fortran_stuff.pl index e88dd1f7..9677e3aa 100644 --- a/lib/sbin/create_fortran_stuff.pl +++ b/lib/sbin/create_fortran_stuff.pl @@ -198,7 +198,8 @@ sub get_fortran_type_string } else { - die("Unknown parameter type '$type'"); + $message = "Unknown parameter type '$type'"; + &CST_error(0,$message,__LINE__,__FILE__); } return $type_string; |