--- /dev/null
+/*
+ * Copyright (c) 2017 Lev Walkin <vlm@lionet.info>.
+ * All rights reserved.
+ * Redistribution and modifications are permitted subject to BSD license.
+ */
+#include <asn_internal.h>
+#include <REAL.h>
+
+asn_enc_rval_t
+REAL_encode_jer(const asn_TYPE_descriptor_t *td, const void *sptr, int ilevel,
+ enum jer_encoder_flags_e flags, asn_app_consume_bytes_f *cb,
+ void *app_key) {
+ const REAL_t *st = (const REAL_t *)sptr;
+ asn_enc_rval_t er = {0,0,0};
+ double d;
+
+ (void)ilevel;
+
+ if(!st || !st->buf || asn_REAL2double(st, &d))
+ ASN__ENCODE_FAILED;
+
+ er.encoded = REAL__dump(d, flags, cb, app_key);
+ if(er.encoded < 0) ASN__ENCODE_FAILED;
+
+ ASN__ENCODED_OK(er);
+}