diff options
Diffstat (limited to 'pkg/tbtables/fitsio/ftcmsg.f')
| -rw-r--r-- | pkg/tbtables/fitsio/ftcmsg.f | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/pkg/tbtables/fitsio/ftcmsg.f b/pkg/tbtables/fitsio/ftcmsg.f new file mode 100644 index 00000000..daae979a --- /dev/null +++ b/pkg/tbtables/fitsio/ftcmsg.f @@ -0,0 +1,6 @@ +C------------------------------------------------------------------------------ + subroutine ftcmsg + +C clear the error message stack + call ftxmsg(0,'dummy') + end |