diff options
| author | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
|---|---|---|
| committer | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
| commit | 40e5a5811c6ffce9b0974e93cdd927cbcf60c157 (patch) | |
| tree | 4464880c571602d54f6ae114729bf62a89518057 /vendor/x11iraf/obm/ObmW/cvtLong.c | |
| download | iraf-osx-40e5a5811c6ffce9b0974e93cdd927cbcf60c157.tar.gz | |
Repatch (from linux) of OSX IRAF
Diffstat (limited to 'vendor/x11iraf/obm/ObmW/cvtLong.c')
| -rw-r--r-- | vendor/x11iraf/obm/ObmW/cvtLong.c | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/vendor/x11iraf/obm/ObmW/cvtLong.c b/vendor/x11iraf/obm/ObmW/cvtLong.c new file mode 100644 index 00000000..710b22af --- /dev/null +++ b/vendor/x11iraf/obm/ObmW/cvtLong.c @@ -0,0 +1,34 @@ +/* + A converter from string to long is defined in the Xmu library, but + the opposite direction is not. Here it is. + + Bert Bos <bert@let.rug.nl> + 13 Aug 1993 +*/ + +#include <X11/IntrinsicP.h> +#include <X11/StringDefs.h> +#include "Converters.h" +#include "done.h" + + +Boolean XfwfCvtLongToString(display, args, num_args, from, to, converter_data) + Display *display; + XrmValuePtr args; + Cardinal *num_args; + XrmValuePtr from; + XrmValuePtr to; + XtPointer *converter_data; +{ + char s[30]; + + if (*num_args != 0) + XtAppErrorMsg(XtDisplayToApplicationContext(display), + "cvtLongToString", "wrongParameters", + "XtToolkitError", + "long to String conversion needs no arguments", + (String*) NULL, (Cardinal*) NULL); + sprintf(s, "%ld", *((long*) from->addr)); + done(String, s); +} + |