← Back to branch summary

~ubuntu-branches/ubuntu/trusty/erlang/trusty

« back to all changes in this revision

Viewing changes to lib/erl_interface/src/misc/putget.h

  • Committer: Bazaar Package Importer
  • Author(s): Clint Byrum
  • Date: 2011-05-05 15:48:43 UTC
  • mfrom: (3.5.13 sid)
  • Revision ID: james.westby@ubuntu.com-20110505154843-0om6ekzg6m7ugj27
Tags: 1:14.b.2-dfsg-3ubuntu1
* Merge from debian unstable.  Remaining changes:
  - Drop libwxgtk2.8-dev build dependency. Wx isn't in main, and not
    supposed to.
  - Drop erlang-wx binary.
  - Drop erlang-wx dependency from -megaco, -common-test, and -reltool, they
    do not really need wx. Also drop it from -debugger; the GUI needs wx,
    but it apparently has CLI bits as well, and is also needed by -megaco,
    so let's keep the package for now.
  - debian/patches/series: Do what I meant, and enable build-options.patch
    instead.
* Additional changes:
  - Drop erlang-wx from -et
* Dropped Changes:
  - patches/pcre-crash.patch: CVE-2008-2371: outer level option with
    alternatives caused crash. (Applied Upstream)
  - fix for ssl certificate verification in newSSL: 
    ssl_cacertfile_fix.patch (Applied Upstream)
  - debian/patches/series: Enable native.patch again, to get stripped beam
    files and reduce the package size again. (build-options is what
    actually accomplished this)
  - Remove build-options.patch on advice from upstream and because it caused
    odd build failures.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/erl_interface/src/misc/putget.h
1
1
/*
2
2
 * %CopyrightBegin%
3
 
 * 
4
 
 * Copyright Ericsson AB 1998-2009. All Rights Reserved.
5
 
 * 
 
3
 *
 
4
 * Copyright Ericsson AB 1998-2010. All Rights Reserved.
 
5
 *
6
6
 * The contents of this file are subject to the Erlang Public License,
7
7
 * Version 1.1, (the "License"); you may not use this file except in
8
8
 * compliance with the License. You should have received a copy of the
9
9
 * Erlang Public License along with this software. If not, it can be
10
10
 * retrieved online at http://www.erlang.org/.
11
 
 * 
 
11
 *
12
12
 * Software distributed under the License is distributed on an "AS IS"
13
13
 * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
14
14
 * the License for the specific language governing rights and limitations
15
15
 * under the License.
16
 
 * 
 
16
 *
17
17
 * %CopyrightEnd%
18
18
 *
19
19
 
54
54
  (s) += 4; \
55
55
} while (0)
56
56
 
 
57
#define put64be(s,n) do {  \
 
58
  (s)[0] = ((n) >>  56) & 0xff; \
 
59
  (s)[1] = ((n) >>  48) & 0xff; \
 
60
  (s)[2] = ((n) >>  40) & 0xff; \
 
61
  (s)[3] = ((n) >>  32) & 0xff; \
 
62
  (s)[4] = ((n) >>  24) & 0xff; \
 
63
  (s)[5] = ((n) >>  16) & 0xff; \
 
64
  (s)[6] = ((n) >>  8)  & 0xff; \
 
65
  (s)[7] = (n) & 0xff; \
 
66
  (s) += 8; \
 
67
} while (0)
 
68
 
57
69
#define get8(s) \
58
70
     ((s) += 1, \
59
71
      ((unsigned char *)(s))[-1] & 0xff)
82
94
       (((unsigned char *)(s))[-2] << 8) | \
83
95
       ((unsigned char *)(s))[-1]))
84
96
     
 
97
#define get64be(s) \
 
98
     ((s) += 8, \
 
99
      (((EI_ULONGLONG)((unsigned char *)(s))[-8] << 56) | \
 
100
       ((EI_ULONGLONG)((unsigned char *)(s))[-7] << 48) | \
 
101
       ((EI_ULONGLONG)((unsigned char *)(s))[-6] << 40) | \
 
102
       ((EI_ULONGLONG)((unsigned char *)(s))[-5] << 32) | \
 
103
       ((EI_ULONGLONG)((unsigned char *)(s))[-4] << 24) | \
 
104
       ((EI_ULONGLONG)((unsigned char *)(s))[-3] << 16) | \
 
105
       ((EI_ULONGLONG)((unsigned char *)(s))[-2] << 8)  | \
 
106
        (EI_ULONGLONG)((unsigned char *)(s))[-1]))
 
107
 
 
108
typedef union float_ext {
 
109
    double d;
 
110
    EI_ULONGLONG val;
 
111
} FloatExt;
 
112
 
85
113
#endif /* _PUTGET_H */