Artifact 4b60b1e6f45bd956bc5fc16de0b05a4c223fe87a:
- File
src/win32/dde.d
-
2015-05-05 06:49:05
- part of checkin
[9b639cf2d6]
on branch trunk
- Working version for update to 2.067.
The problem was __gshared. Replacing it with TLS fixed the issue. Remaining problem is that "hack.d"'s CloseHandle hack is not working anymore.
(user: kinaba) [annotate]
-
2015-05-05 06:49:05
- part of checkin
[9b639cf2d6]
on branch trunk
- Working version for update to 2.067.
0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0040: 2a 2a 2a 2a 2a 2a 2a 2a 5c 0d 0a 2a 20 20 20 20 ********\..*
0050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0060: 20 20 20 20 20 20 20 20 20 20 20 20 20 64 64 65 dde
0070: 2e 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .d
0080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0090: 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 20 20 *..*
00a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d *.
00e0: 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .*
00f0: 20 20 20 20 20 20 20 20 20 57 69 6e 64 6f 77 73 Windows
0100: 20 41 50 49 20 68 65 61 64 65 72 20 6d 6f 64 75 API header modu
0110: 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 le
0120: 20 20 20 20 20 20 20 20 20 2a 0d 0a 2a 20 20 20 *..*
0130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0170: 20 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 20 *..*
0180: 20 20 20 20 20 20 20 20 20 54 72 61 6e 73 6c 61 Transla
0190: 74 65 64 20 66 72 6f 6d 20 4d 69 6e 47 57 20 57 ted from MinGW W
01a0: 69 6e 64 6f 77 73 20 68 65 61 64 65 72 73 20 20 indows headers
01b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a *
01c0: 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 ..*
01d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 79 by
01e0: 20 53 74 65 77 61 72 74 20 47 6f 72 64 6f 6e 20 Stewart Gordon
01f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0200: 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 2a 20 20 *..*
0210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0250: 20 20 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 *..*
0260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0270: 50 6c 61 63 65 64 20 69 6e 74 6f 20 70 75 62 6c Placed into publ
0280: 69 63 20 64 6f 6d 61 69 6e 20 20 20 20 20 20 20 ic domain
0290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
02a0: 2a 0d 0a 5c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a *..\************
02b0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
02c0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
02d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
02e0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2f 0d 0a 6d 6f ***********/..mo
02f0: 64 75 6c 65 20 77 69 6e 33 32 2e 64 64 65 3b 0d dule win32.dde;.
0300: 0a 70 72 61 67 6d 61 28 6c 69 62 2c 20 22 75 73 .pragma(lib, "us
0310: 65 72 33 32 22 29 3b 0d 0a 0d 0a 70 72 69 76 61 er32");....priva
0320: 74 65 20 69 6d 70 6f 72 74 20 77 69 6e 33 32 2e te import win32.
0330: 77 69 6e 64 65 66 3b 0d 0a 0d 0a 65 6e 75 6d 20 windef;....enum
0340: 3a 20 75 69 6e 74 20 7b 0d 0a 09 57 4d 5f 44 44 : uint {...WM_DD
0350: 45 5f 46 49 52 53 54 20 20 20 20 20 3d 20 30 78 E_FIRST = 0x
0360: 30 33 45 30 2c 0d 0a 09 57 4d 5f 44 44 45 5f 49 03E0,...WM_DDE_I
0370: 4e 49 54 49 41 54 45 20 20 3d 20 57 4d 5f 44 44 NITIATE = WM_DD
0380: 45 5f 46 49 52 53 54 2c 0d 0a 09 57 4d 5f 44 44 E_FIRST,...WM_DD
0390: 45 5f 54 45 52 4d 49 4e 41 54 45 2c 0d 0a 09 57 E_TERMINATE,...W
03a0: 4d 5f 44 44 45 5f 41 44 56 49 53 45 2c 0d 0a 09 M_DDE_ADVISE,...
03b0: 57 4d 5f 44 44 45 5f 55 4e 41 44 56 49 53 45 2c WM_DDE_UNADVISE,
03c0: 0d 0a 09 57 4d 5f 44 44 45 5f 41 43 4b 2c 0d 0a ...WM_DDE_ACK,..
03d0: 09 57 4d 5f 44 44 45 5f 44 41 54 41 2c 0d 0a 09 .WM_DDE_DATA,...
03e0: 57 4d 5f 44 44 45 5f 52 45 51 55 45 53 54 2c 0d WM_DDE_REQUEST,.
03f0: 0a 09 57 4d 5f 44 44 45 5f 50 4f 4b 45 2c 0d 0a ..WM_DDE_POKE,..
0400: 09 57 4d 5f 44 44 45 5f 45 58 45 43 55 54 45 2c .WM_DDE_EXECUTE,
0410: 0d 0a 09 57 4d 5f 44 44 45 5f 4c 41 53 54 20 20 ...WM_DDE_LAST
0420: 20 20 20 20 3d 20 57 4d 5f 44 44 45 5f 45 58 45 = WM_DDE_EXE
0430: 43 55 54 45 0d 0a 7d 0d 0a 0d 0a 73 74 72 75 63 CUTE..}....struc
0440: 74 20 44 44 45 41 43 4b 20 7b 0d 0a 09 75 62 79 t DDEACK {...uby
0450: 74 65 20 62 41 70 70 52 65 74 75 72 6e 43 6f 64 te bAppReturnCod
0460: 65 3b 0d 0a 09 75 62 79 74 65 20 5f 62 66 3b 0d e;...ubyte _bf;.
0470: 0a 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 75 62 ....@property ub
0480: 79 74 65 20 72 65 73 65 72 76 65 64 28 29 20 7b yte reserved() {
0490: 20 72 65 74 75 72 6e 20 63 61 73 74 28 75 62 79 return cast(uby
04a0: 74 65 29 20 28 5f 62 66 20 26 20 30 78 33 46 29 te) (_bf & 0x3F)
04b0: 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 ; }...@property
04c0: 62 6f 6f 6c 20 20 66 42 75 73 79 28 29 20 20 20 bool fBusy()
04d0: 20 7b 20 72 65 74 75 72 6e 20 63 61 73 74 28 62 { return cast(b
04e0: 6f 6f 6c 29 20 20 28 5f 62 66 20 26 20 30 78 34 ool) (_bf & 0x4
04f0: 30 29 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 0); }...@propert
0500: 79 20 62 6f 6f 6c 20 20 66 41 63 6b 28 29 20 20 y bool fAck()
0510: 20 20 20 7b 20 72 65 74 75 72 6e 20 63 61 73 74 { return cast
0520: 28 62 6f 6f 6c 29 20 20 28 5f 62 66 20 26 20 30 (bool) (_bf & 0
0530: 78 38 30 29 3b 20 7d 0d 0a 0d 0a 09 40 70 72 6f x80); }.....@pro
0540: 70 65 72 74 79 20 75 62 79 74 65 20 72 65 73 65 perty ubyte rese
0550: 72 76 65 64 28 75 62 79 74 65 20 72 29 20 7b 0d rved(ubyte r) {.
0560: 0a 09 09 5f 62 66 20 3d 20 63 61 73 74 28 75 62 ..._bf = cast(ub
0570: 79 74 65 29 20 28 28 5f 62 66 20 26 20 7e 30 78 yte) ((_bf & ~0x
0580: 33 46 29 20 7c 20 28 72 20 26 20 30 78 33 46 29 3F) | (r & 0x3F)
0590: 29 3b 0d 0a 09 09 72 65 74 75 72 6e 20 63 61 73 );....return cas
05a0: 74 28 75 62 79 74 65 29 28 72 20 26 20 30 78 33 t(ubyte)(r & 0x3
05b0: 46 29 3b 0d 0a 09 7d 0d 0a 0d 0a 09 40 70 72 6f F);...}.....@pro
05c0: 70 65 72 74 79 20 62 6f 6f 6c 20 66 42 75 73 79 perty bool fBusy
05d0: 28 62 6f 6f 6c 20 66 29 20 7b 20 5f 62 66 20 3d (bool f) { _bf =
05e0: 20 63 61 73 74 28 75 62 79 74 65 29 20 28 28 5f cast(ubyte) ((_
05f0: 62 66 20 26 20 7e 30 78 34 30 29 20 7c 20 28 66 bf & ~0x40) | (f
0600: 20 3c 3c 20 36 29 29 3b 20 72 65 74 75 72 6e 20 << 6)); return
0610: 66 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 f; }...@property
0620: 20 62 6f 6f 6c 20 66 41 63 6b 28 62 6f 6f 6c 20 bool fAck(bool
0630: 66 29 20 20 7b 20 5f 62 66 20 3d 20 63 61 73 74 f) { _bf = cast
0640: 28 75 62 79 74 65 29 20 28 28 5f 62 66 20 26 20 (ubyte) ((_bf &
0650: 7e 30 78 38 30 29 20 7c 20 28 66 20 3c 3c 20 37 ~0x80) | (f << 7
0660: 29 29 3b 20 72 65 74 75 72 6e 20 66 3b 20 7d 0d )); return f; }.
0670: 0a 7d 0d 0a 0d 0a 73 74 72 75 63 74 20 44 44 45 .}....struct DDE
0680: 41 44 56 49 53 45 20 7b 0d 0a 09 75 73 68 6f 72 ADVISE {...ushor
0690: 74 20 5f 62 66 3b 0d 0a 09 73 68 6f 72 74 20 20 t _bf;...short
06a0: 63 66 46 6f 72 6d 61 74 3b 0d 0a 0d 0a 09 40 70 cfFormat;.....@p
06b0: 72 6f 70 65 72 74 79 20 75 73 68 6f 72 74 20 72 roperty ushort r
06c0: 65 73 65 72 76 65 64 28 29 20 20 7b 20 72 65 74 eserved() { ret
06d0: 75 72 6e 20 63 61 73 74 28 75 73 68 6f 72 74 29 urn cast(ushort)
06e0: 20 28 5f 62 66 20 26 20 30 78 33 46 46 46 29 3b (_bf & 0x3FFF);
06f0: 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 62 }...@property b
0700: 6f 6f 6c 20 20 20 66 44 65 66 65 72 55 70 64 28 ool fDeferUpd(
0710: 29 20 7b 20 72 65 74 75 72 6e 20 63 61 73 74 28 ) { return cast(
0720: 62 6f 6f 6c 29 20 20 20 28 5f 62 66 20 26 20 30 bool) (_bf & 0
0730: 78 34 30 30 30 29 3b 20 7d 0d 0a 09 40 70 72 6f x4000); }...@pro
0740: 70 65 72 74 79 20 62 6f 6f 6c 20 20 20 66 41 63 perty bool fAc
0750: 6b 52 65 71 28 29 20 20 20 7b 20 72 65 74 75 72 kReq() { retur
0760: 6e 20 63 61 73 74 28 62 6f 6f 6c 29 20 20 20 28 n cast(bool) (
0770: 5f 62 66 20 26 20 30 78 38 30 30 30 29 3b 20 7d _bf & 0x8000); }
0780: 0d 0a 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 75 .....@property u
0790: 73 68 6f 72 74 20 72 65 73 65 72 76 65 64 28 75 short reserved(u
07a0: 73 68 6f 72 74 20 72 29 20 7b 0d 0a 09 09 5f 62 short r) {...._b
07b0: 66 20 3d 20 63 61 73 74 28 75 73 68 6f 72 74 29 f = cast(ushort)
07c0: 20 28 28 5f 62 66 20 26 20 7e 30 78 33 46 46 46 ((_bf & ~0x3FFF
07d0: 29 20 7c 20 28 72 20 26 20 30 78 33 46 46 46 29 ) | (r & 0x3FFF)
07e0: 29 3b 0d 0a 09 09 72 65 74 75 72 6e 20 63 61 73 );....return cas
07f0: 74 28 75 73 68 6f 72 74 29 28 72 20 26 20 30 78 t(ushort)(r & 0x
0800: 33 46 46 46 29 3b 0d 0a 09 7d 0d 0a 0d 0a 09 40 3FFF);...}.....@
0810: 70 72 6f 70 65 72 74 79 20 62 6f 6f 6c 20 20 20 property bool
0820: 66 44 65 66 65 72 55 70 64 28 62 6f 6f 6c 20 66 fDeferUpd(bool f
0830: 29 20 7b 20 5f 62 66 20 3d 20 63 61 73 74 28 75 ) { _bf = cast(u
0840: 73 68 6f 72 74 29 20 28 28 5f 62 66 20 26 20 7e short) ((_bf & ~
0850: 30 78 34 30 30 30 29 20 7c 20 28 66 20 3c 3c 20 0x4000) | (f <<
0860: 31 34 29 29 3b 20 72 65 74 75 72 6e 20 66 3b 20 14)); return f;
0870: 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 62 6f }...@property bo
0880: 6f 6c 20 20 20 66 41 63 6b 52 65 71 28 62 6f 6f ol fAckReq(boo
0890: 6c 20 66 29 20 20 20 7b 20 5f 62 66 20 3d 20 63 l f) { _bf = c
08a0: 61 73 74 28 75 73 68 6f 72 74 29 20 28 28 5f 62 ast(ushort) ((_b
08b0: 66 20 26 20 7e 30 78 38 30 30 30 29 20 7c 20 28 f & ~0x8000) | (
08c0: 66 20 3c 3c 20 31 35 29 29 3b 20 72 65 74 75 72 f << 15)); retur
08d0: 6e 20 66 3b 20 7d 0d 0a 7d 0d 0a 0d 0a 73 74 72 n f; }..}....str
08e0: 75 63 74 20 44 44 45 44 41 54 41 20 7b 0d 0a 09 uct DDEDATA {...
08f0: 75 73 68 6f 72 74 20 5f 62 66 3b 0d 0a 09 73 68 ushort _bf;...sh
0900: 6f 72 74 20 20 63 66 46 6f 72 6d 61 74 3b 0d 0a ort cfFormat;..
0910: 09 62 79 74 65 20 20 20 5f 56 61 6c 75 65 3b 0d .byte _Value;.
0920: 0a 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 75 73 ....@property us
0930: 68 6f 72 74 20 75 6e 75 73 65 64 28 29 20 20 20 hort unused()
0940: 20 7b 20 72 65 74 75 72 6e 20 63 61 73 74 28 75 { return cast(u
0950: 73 68 6f 72 74 29 20 28 5f 62 66 20 26 20 30 78 short) (_bf & 0x
0960: 30 46 46 46 29 3b 20 7d 0d 0a 09 40 70 72 6f 70 0FFF); }...@prop
0970: 65 72 74 79 20 62 6f 6f 6c 20 20 20 66 52 65 73 erty bool fRes
0980: 70 6f 6e 73 65 28 29 20 7b 20 72 65 74 75 72 6e ponse() { return
0990: 20 63 61 73 74 28 62 6f 6f 6c 29 20 20 20 28 5f cast(bool) (_
09a0: 62 66 20 26 20 30 78 31 30 30 30 29 3b 20 7d 0d bf & 0x1000); }.
09b0: 0a 09 40 70 72 6f 70 65 72 74 79 20 62 6f 6f 6c ..@property bool
09c0: 20 20 20 66 52 65 6c 65 61 73 65 28 29 20 20 7b fRelease() {
09d0: 20 72 65 74 75 72 6e 20 63 61 73 74 28 62 6f 6f return cast(boo
09e0: 6c 29 20 20 20 28 5f 62 66 20 26 20 30 78 32 30 l) (_bf & 0x20
09f0: 30 30 29 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 00); }...@proper
0a00: 74 79 20 62 6f 6f 6c 20 20 20 72 65 73 65 72 76 ty bool reserv
0a10: 65 64 28 29 20 20 7b 20 72 65 74 75 72 6e 20 63 ed() { return c
0a20: 61 73 74 28 62 6f 6f 6c 29 20 20 20 28 5f 62 66 ast(bool) (_bf
0a30: 20 26 20 30 78 34 30 30 30 29 3b 20 7d 0d 0a 09 & 0x4000); }...
0a40: 40 70 72 6f 70 65 72 74 79 20 62 6f 6f 6c 20 20 @property bool
0a50: 20 66 41 63 6b 52 65 71 28 29 20 20 20 7b 20 72 fAckReq() { r
0a60: 65 74 75 72 6e 20 63 61 73 74 28 62 6f 6f 6c 29 eturn cast(bool)
0a70: 20 20 20 28 5f 62 66 20 26 20 30 78 38 30 30 30 (_bf & 0x8000
0a80: 29 3b 20 7d 0d 0a 0d 0a 09 40 70 72 6f 70 65 72 ); }.....@proper
0a90: 74 79 20 62 79 74 65 2a 20 20 56 61 6c 75 65 28 ty byte* Value(
0aa0: 29 20 7b 20 72 65 74 75 72 6e 20 26 5f 56 61 6c ) { return &_Val
0ab0: 75 65 3b 20 7d 0d 0a 0d 0a 09 40 70 72 6f 70 65 ue; }.....@prope
0ac0: 72 74 79 20 75 73 68 6f 72 74 20 75 6e 75 73 65 rty ushort unuse
0ad0: 64 28 75 73 68 6f 72 74 20 72 29 20 7b 0d 0a 09 d(ushort r) {...
0ae0: 09 5f 62 66 20 3d 20 63 61 73 74 28 75 73 68 6f ._bf = cast(usho
0af0: 72 74 29 20 28 28 5f 62 66 20 26 20 7e 30 78 30 rt) ((_bf & ~0x0
0b00: 46 46 46 29 20 7c 20 28 72 20 26 20 30 78 30 46 FFF) | (r & 0x0F
0b10: 46 46 29 29 3b 0d 0a 09 09 72 65 74 75 72 6e 20 FF));....return
0b20: 63 61 73 74 28 75 73 68 6f 72 74 29 28 72 20 26 cast(ushort)(r &
0b30: 20 30 78 30 46 46 46 29 3b 0d 0a 09 7d 0d 0a 0d 0x0FFF);...}...
0b40: 0a 09 40 70 72 6f 70 65 72 74 79 20 62 6f 6f 6c ..@property bool
0b50: 20 20 20 66 52 65 73 70 6f 6e 73 65 28 62 6f 6f fResponse(boo
0b60: 6c 20 66 29 20 7b 20 5f 62 66 20 3d 20 63 61 73 l f) { _bf = cas
0b70: 74 28 75 73 68 6f 72 74 29 20 28 28 5f 62 66 20 t(ushort) ((_bf
0b80: 26 20 7e 30 78 31 30 30 30 29 20 7c 20 28 66 20 & ~0x1000) | (f
0b90: 3c 3c 20 31 32 29 29 3b 20 72 65 74 75 72 6e 20 << 12)); return
0ba0: 66 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 f; }...@property
0bb0: 20 62 6f 6f 6c 20 20 20 66 52 65 6c 65 61 73 65 bool fRelease
0bc0: 28 62 6f 6f 6c 20 66 29 20 20 7b 20 5f 62 66 20 (bool f) { _bf
0bd0: 3d 20 63 61 73 74 28 75 73 68 6f 72 74 29 20 28 = cast(ushort) (
0be0: 28 5f 62 66 20 26 20 7e 30 78 32 30 30 30 29 20 (_bf & ~0x2000)
0bf0: 7c 20 28 66 20 3c 3c 20 31 33 29 29 3b 20 72 65 | (f << 13)); re
0c00: 74 75 72 6e 20 66 3b 20 7d 0d 0a 09 40 70 72 6f turn f; }...@pro
0c10: 70 65 72 74 79 20 62 6f 6f 6c 20 20 20 72 65 73 perty bool res
0c20: 65 72 76 65 64 28 62 6f 6f 6c 20 66 29 20 20 7b erved(bool f) {
0c30: 20 5f 62 66 20 3d 20 63 61 73 74 28 75 73 68 6f _bf = cast(usho
0c40: 72 74 29 20 28 28 5f 62 66 20 26 20 7e 30 78 34 rt) ((_bf & ~0x4
0c50: 30 30 30 29 20 7c 20 28 66 20 3c 3c 20 31 34 29 000) | (f << 14)
0c60: 29 3b 20 72 65 74 75 72 6e 20 66 3b 20 7d 0d 0a ); return f; }..
0c70: 09 40 70 72 6f 70 65 72 74 79 20 62 6f 6f 6c 20 .@property bool
0c80: 20 20 66 41 63 6b 52 65 71 28 62 6f 6f 6c 20 66 fAckReq(bool f
0c90: 29 20 20 20 7b 20 5f 62 66 20 3d 20 63 61 73 74 ) { _bf = cast
0ca0: 28 75 73 68 6f 72 74 29 20 28 28 5f 62 66 20 26 (ushort) ((_bf &
0cb0: 20 7e 30 78 38 30 30 30 29 20 7c 20 28 66 20 3c ~0x8000) | (f <
0cc0: 3c 20 31 35 29 29 3b 20 72 65 74 75 72 6e 20 66 < 15)); return f
0cd0: 3b 20 7d 0d 0a 7d 0d 0a 0d 0a 73 74 72 75 63 74 ; }..}....struct
0ce0: 20 44 44 45 50 4f 4b 45 20 7b 0d 0a 09 75 73 68 DDEPOKE {...ush
0cf0: 6f 72 74 20 5f 62 66 3b 0d 0a 09 73 68 6f 72 74 ort _bf;...short
0d00: 20 20 63 66 46 6f 72 6d 61 74 3b 0d 0a 09 62 79 cfFormat;...by
0d10: 74 65 20 20 20 5f 56 61 6c 75 65 3b 0d 0a 0d 0a te _Value;....
0d20: 09 40 70 72 6f 70 65 72 74 79 20 75 73 68 6f 72 .@property ushor
0d30: 74 20 75 6e 75 73 65 64 28 29 20 20 20 20 7b 20 t unused() {
0d40: 72 65 74 75 72 6e 20 63 61 73 74 28 75 73 68 6f return cast(usho
0d50: 72 74 29 20 28 5f 62 66 20 26 20 30 78 31 46 46 rt) (_bf & 0x1FF
0d60: 46 29 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 F); }...@propert
0d70: 79 20 62 6f 6f 6c 20 20 20 66 52 65 6c 65 61 73 y bool fReleas
0d80: 65 28 29 20 20 7b 20 72 65 74 75 72 6e 20 63 61 e() { return ca
0d90: 73 74 28 62 6f 6f 6c 29 20 20 20 28 5f 62 66 20 st(bool) (_bf
0da0: 26 20 30 78 32 30 30 30 29 3b 20 7d 0d 0a 09 40 & 0x2000); }...@
0db0: 70 72 6f 70 65 72 74 79 20 75 62 79 74 65 20 20 property ubyte
0dc0: 66 52 65 73 65 72 76 65 64 28 29 20 7b 20 72 65 fReserved() { re
0dd0: 74 75 72 6e 20 63 61 73 74 28 75 62 79 74 65 29 turn cast(ubyte)
0de0: 20 20 28 28 5f 62 66 20 26 20 30 78 43 30 30 30 ((_bf & 0xC000
0df0: 29 20 3e 3e 3e 20 31 34 29 3b 20 7d 0d 0a 0d 0a ) >>> 14); }....
0e00: 09 40 70 72 6f 70 65 72 74 79 20 62 79 74 65 2a .@property byte*
0e10: 20 20 56 61 6c 75 65 28 29 20 7b 20 72 65 74 75 Value() { retu
0e20: 72 6e 20 26 5f 56 61 6c 75 65 3b 20 7d 0d 0a 0d rn &_Value; }...
0e30: 0a 09 40 70 72 6f 70 65 72 74 79 20 75 73 68 6f ..@property usho
0e40: 72 74 20 75 6e 75 73 65 64 28 75 73 68 6f 72 74 rt unused(ushort
0e50: 20 75 29 20 7b 0d 0a 09 09 5f 62 66 20 3d 20 63 u) {...._bf = c
0e60: 61 73 74 28 75 73 68 6f 72 74 29 20 28 28 5f 62 ast(ushort) ((_b
0e70: 66 20 26 20 7e 30 78 31 46 46 46 29 20 7c 20 28 f & ~0x1FFF) | (
0e80: 75 20 26 20 30 78 31 46 46 46 29 29 3b 0d 0a 09 u & 0x1FFF));...
0e90: 09 72 65 74 75 72 6e 20 63 61 73 74 28 75 73 68 .return cast(ush
0ea0: 6f 72 74 29 28 75 20 26 20 30 78 31 46 46 46 29 ort)(u & 0x1FFF)
0eb0: 3b 0d 0a 09 7d 0d 0a 0d 0a 09 40 70 72 6f 70 65 ;...}.....@prope
0ec0: 72 74 79 20 62 6f 6f 6c 20 20 20 66 52 65 6c 65 rty bool fRele
0ed0: 61 73 65 28 62 6f 6f 6c 20 66 29 20 20 20 7b 20 ase(bool f) {
0ee0: 5f 62 66 20 3d 20 63 61 73 74 28 75 73 68 6f 72 _bf = cast(ushor
0ef0: 74 29 20 28 28 5f 62 66 20 26 20 7e 30 78 32 30 t) ((_bf & ~0x20
0f00: 30 30 29 20 7c 20 28 66 20 3c 3c 20 31 33 29 29 00) | (f << 13))
0f10: 3b 20 72 65 74 75 72 6e 20 66 3b 20 7d 0d 0a 09 ; return f; }...
0f20: 40 70 72 6f 70 65 72 74 79 20 75 62 79 74 65 20 @property ubyte
0f30: 20 66 52 65 73 65 72 76 65 64 28 75 62 79 74 65 fReserved(ubyte
0f40: 20 72 29 20 7b 20 5f 62 66 20 3d 20 63 61 73 74 r) { _bf = cast
0f50: 28 75 73 68 6f 72 74 29 20 28 28 5f 62 66 20 26 (ushort) ((_bf &
0f60: 20 7e 30 78 43 30 30 30 29 20 7c 20 28 72 20 3c ~0xC000) | (r <
0f70: 3c 20 31 34 29 29 3b 20 72 65 74 75 72 6e 20 72 < 14)); return r
0f80: 3b 20 7d 0d 0a 7d 0d 0a 0d 0a 64 65 70 72 65 63 ; }..}....deprec
0f90: 61 74 65 64 20 73 74 72 75 63 74 20 44 44 45 4c ated struct DDEL
0fa0: 4e 20 7b 0d 0a 09 75 73 68 6f 72 74 20 5f 62 66 N {...ushort _bf
0fb0: 3b 0d 0a 09 73 68 6f 72 74 20 20 63 66 46 6f 72 ;...short cfFor
0fc0: 6d 61 74 3b 0d 0a 0d 0a 09 40 70 72 6f 70 65 72 mat;.....@proper
0fd0: 74 79 20 75 73 68 6f 72 74 20 75 6e 75 73 65 64 ty ushort unused
0fe0: 28 29 20 20 20 20 7b 20 72 65 74 75 72 6e 20 63 () { return c
0ff0: 61 73 74 28 75 73 68 6f 72 74 29 20 28 5f 62 66 ast(ushort) (_bf
1000: 20 26 20 30 78 31 46 46 46 29 3b 20 7d 0d 0a 09 & 0x1FFF); }...
1010: 40 70 72 6f 70 65 72 74 79 20 62 6f 6f 6c 20 20 @property bool
1020: 20 66 52 65 6c 65 61 73 65 28 29 20 20 7b 20 72 fRelease() { r
1030: 65 74 75 72 6e 20 63 61 73 74 28 62 6f 6f 6c 29 eturn cast(bool)
1040: 20 20 20 28 5f 62 66 20 26 20 30 78 32 30 30 30 (_bf & 0x2000
1050: 29 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 ); }...@property
1060: 20 62 6f 6f 6c 20 20 20 66 44 65 66 65 72 55 70 bool fDeferUp
1070: 64 28 29 20 7b 20 72 65 74 75 72 6e 20 63 61 73 d() { return cas
1080: 74 28 62 6f 6f 6c 29 20 20 20 28 5f 62 66 20 26 t(bool) (_bf &
1090: 20 30 78 34 30 30 30 29 3b 20 7d 0d 0a 09 40 70 0x4000); }...@p
10a0: 72 6f 70 65 72 74 79 20 62 6f 6f 6c 20 20 20 66 roperty bool f
10b0: 41 63 6b 52 65 71 28 29 20 20 20 7b 20 72 65 74 AckReq() { ret
10c0: 75 72 6e 20 63 61 73 74 28 62 6f 6f 6c 29 20 20 urn cast(bool)
10d0: 20 28 5f 62 66 20 26 20 30 78 38 30 30 30 29 3b (_bf & 0x8000);
10e0: 20 7d 0d 0a 0d 0a 09 40 70 72 6f 70 65 72 74 79 }.....@property
10f0: 20 75 73 68 6f 72 74 20 75 6e 75 73 65 64 28 75 ushort unused(u
1100: 73 68 6f 72 74 20 75 29 20 7b 0d 0a 09 09 5f 62 short u) {...._b
1110: 66 20 3d 20 63 61 73 74 28 75 73 68 6f 72 74 29 f = cast(ushort)
1120: 28 28 5f 62 66 20 26 20 7e 30 78 31 46 46 46 29 ((_bf & ~0x1FFF)
1130: 20 7c 20 28 75 20 26 20 30 78 31 46 46 46 29 29 | (u & 0x1FFF))
1140: 3b 0d 0a 09 09 72 65 74 75 72 6e 20 63 61 73 74 ;....return cast
1150: 28 75 73 68 6f 72 74 29 28 75 20 26 20 30 78 31 (ushort)(u & 0x1
1160: 46 46 46 29 3b 0d 0a 09 7d 0d 0a 0d 0a 09 40 70 FFF);...}.....@p
1170: 72 6f 70 65 72 74 79 20 62 6f 6f 6c 20 20 20 66 roperty bool f
1180: 52 65 6c 65 61 73 65 28 62 6f 6f 6c 20 66 29 20 Release(bool f)
1190: 20 7b 20 5f 62 66 20 3d 20 63 61 73 74 28 75 73 { _bf = cast(us
11a0: 68 6f 72 74 29 20 28 28 5f 62 66 20 26 20 7e 30 hort) ((_bf & ~0
11b0: 78 32 30 30 30 29 20 7c 20 28 66 20 3c 3c 20 31 x2000) | (f << 1
11c0: 33 29 29 3b 20 72 65 74 75 72 6e 20 66 3b 20 7d 3)); return f; }
11d0: 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 62 6f 6f ...@property boo
11e0: 6c 20 20 20 66 44 65 66 65 72 55 70 64 28 62 6f l fDeferUpd(bo
11f0: 6f 6c 20 66 29 20 7b 20 5f 62 66 20 3d 20 63 61 ol f) { _bf = ca
1200: 73 74 28 75 73 68 6f 72 74 29 20 28 28 5f 62 66 st(ushort) ((_bf
1210: 20 26 20 7e 30 78 34 30 30 30 29 20 7c 20 28 66 & ~0x4000) | (f
1220: 20 3c 3c 20 31 34 29 29 3b 20 72 65 74 75 72 6e << 14)); return
1230: 20 66 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 f; }...@propert
1240: 79 20 62 6f 6f 6c 20 20 20 66 41 63 6b 52 65 71 y bool fAckReq
1250: 28 62 6f 6f 6c 20 66 29 20 20 20 7b 20 5f 62 66 (bool f) { _bf
1260: 20 3d 20 63 61 73 74 28 75 73 68 6f 72 74 29 20 = cast(ushort)
1270: 28 28 5f 62 66 20 26 20 7e 30 78 38 30 30 30 29 ((_bf & ~0x8000)
1280: 20 7c 20 28 66 20 3c 3c 20 31 35 29 29 3b 20 72 | (f << 15)); r
1290: 65 74 75 72 6e 20 66 3b 20 7d 0d 0a 7d 0d 0a 0d eturn f; }..}...
12a0: 0a 64 65 70 72 65 63 61 74 65 64 20 73 74 72 75 .deprecated stru
12b0: 63 74 20 44 44 45 55 50 20 7b 0d 0a 09 75 73 68 ct DDEUP {...ush
12c0: 6f 72 74 20 5f 62 66 3b 0d 0a 09 73 68 6f 72 74 ort _bf;...short
12d0: 20 20 63 66 46 6f 72 6d 61 74 3b 0d 0a 09 62 79 cfFormat;...by
12e0: 74 65 20 20 20 5f 72 67 62 3b 0d 0a 0d 0a 09 40 te _rgb;.....@
12f0: 70 72 6f 70 65 72 74 79 20 75 73 68 6f 72 74 20 property ushort
1300: 75 6e 75 73 65 64 28 29 20 20 20 20 7b 20 72 65 unused() { re
1310: 74 75 72 6e 20 63 61 73 74 28 75 73 68 6f 72 74 turn cast(ushort
1320: 29 20 28 5f 62 66 20 26 20 30 78 30 46 46 46 29 ) (_bf & 0x0FFF)
1330: 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 ; }...@property
1340: 62 6f 6f 6c 20 20 20 66 41 63 6b 28 29 20 20 20 bool fAck()
1350: 20 20 20 7b 20 72 65 74 75 72 6e 20 63 61 73 74 { return cast
1360: 28 62 6f 6f 6c 29 20 20 20 28 5f 62 66 20 26 20 (bool) (_bf &
1370: 30 78 31 30 30 30 29 3b 20 7d 0d 0a 09 40 70 72 0x1000); }...@pr
1380: 6f 70 65 72 74 79 20 62 6f 6f 6c 20 20 20 66 52 operty bool fR
1390: 65 6c 65 61 73 65 28 29 20 20 7b 20 72 65 74 75 elease() { retu
13a0: 72 6e 20 63 61 73 74 28 62 6f 6f 6c 29 20 20 20 rn cast(bool)
13b0: 28 5f 62 66 20 26 20 30 78 32 30 30 30 29 3b 20 (_bf & 0x2000);
13c0: 7d 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 62 6f }...@property bo
13d0: 6f 6c 20 20 20 66 52 65 73 65 72 76 65 64 28 29 ol fReserved()
13e0: 20 7b 20 72 65 74 75 72 6e 20 63 61 73 74 28 62 { return cast(b
13f0: 6f 6f 6c 29 20 20 20 28 5f 62 66 20 26 20 30 78 ool) (_bf & 0x
1400: 34 30 30 30 29 3b 20 7d 0d 0a 09 40 70 72 6f 70 4000); }...@prop
1410: 65 72 74 79 20 62 6f 6f 6c 20 20 20 66 41 63 6b erty bool fAck
1420: 52 65 71 28 29 20 20 20 7b 20 72 65 74 75 72 6e Req() { return
1430: 20 63 61 73 74 28 62 6f 6f 6c 29 20 20 20 28 5f cast(bool) (_
1440: 62 66 20 26 20 30 78 38 30 30 30 29 3b 20 7d 0d bf & 0x8000); }.
1450: 0a 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 62 79 ....@property by
1460: 74 65 2a 20 20 72 67 62 28 29 20 7b 20 72 65 74 te* rgb() { ret
1470: 75 72 6e 20 26 5f 72 67 62 3b 20 7d 0d 0a 0d 0a urn &_rgb; }....
1480: 09 40 70 72 6f 70 65 72 74 79 20 75 73 68 6f 72 .@property ushor
1490: 74 20 75 6e 75 73 65 64 28 75 73 68 6f 72 74 20 t unused(ushort
14a0: 72 29 20 7b 0d 0a 09 09 5f 62 66 20 3d 20 63 61 r) {...._bf = ca
14b0: 73 74 28 75 73 68 6f 72 74 29 20 28 28 5f 62 66 st(ushort) ((_bf
14c0: 20 26 20 7e 30 78 30 46 46 46 29 20 7c 20 28 72 & ~0x0FFF) | (r
14d0: 20 26 20 30 78 30 46 46 46 29 29 3b 0d 0a 09 09 & 0x0FFF));....
14e0: 72 65 74 75 72 6e 20 63 61 73 74 28 75 73 68 6f return cast(usho
14f0: 72 74 29 28 72 20 26 20 30 78 30 46 46 46 29 3b rt)(r & 0x0FFF);
1500: 0d 0a 09 7d 0d 0a 0d 0a 09 40 70 72 6f 70 65 72 ...}.....@proper
1510: 74 79 20 62 6f 6f 6c 20 20 20 66 41 63 6b 28 62 ty bool fAck(b
1520: 6f 6f 6c 20 66 29 20 20 20 20 20 20 7b 20 5f 62 ool f) { _b
1530: 66 20 3d 20 63 61 73 74 28 75 73 68 6f 72 74 29 f = cast(ushort)
1540: 20 28 28 5f 62 66 20 26 20 7e 30 78 31 30 30 30 ((_bf & ~0x1000
1550: 29 20 7c 20 28 66 20 3c 3c 20 31 32 29 29 3b 20 ) | (f << 12));
1560: 72 65 74 75 72 6e 20 66 3b 20 7d 0d 0a 09 40 70 return f; }...@p
1570: 72 6f 70 65 72 74 79 20 62 6f 6f 6c 20 20 20 66 roperty bool f
1580: 52 65 6c 65 61 73 65 28 62 6f 6f 6c 20 66 29 20 Release(bool f)
1590: 20 7b 20 5f 62 66 20 3d 20 63 61 73 74 28 75 73 { _bf = cast(us
15a0: 68 6f 72 74 29 20 28 28 5f 62 66 20 26 20 7e 30 hort) ((_bf & ~0
15b0: 78 32 30 30 30 29 20 7c 20 28 66 20 3c 3c 20 31 x2000) | (f << 1
15c0: 33 29 29 3b 20 72 65 74 75 72 6e 20 66 3b 20 7d 3)); return f; }
15d0: 0d 0a 09 40 70 72 6f 70 65 72 74 79 20 62 6f 6f ...@property boo
15e0: 6c 20 20 20 66 52 65 73 65 72 76 65 64 28 62 6f l fReserved(bo
15f0: 6f 6c 20 66 29 20 7b 20 5f 62 66 20 3d 20 63 61 ol f) { _bf = ca
1600: 73 74 28 75 73 68 6f 72 74 29 20 28 28 5f 62 66 st(ushort) ((_bf
1610: 20 26 20 7e 30 78 34 30 30 30 29 20 7c 20 28 66 & ~0x4000) | (f
1620: 20 3c 3c 20 31 34 29 29 3b 20 72 65 74 75 72 6e << 14)); return
1630: 20 66 3b 20 7d 0d 0a 09 40 70 72 6f 70 65 72 74 f; }...@propert
1640: 79 20 62 6f 6f 6c 20 20 20 66 41 63 6b 52 65 71 y bool fAckReq
1650: 28 62 6f 6f 6c 20 66 29 20 20 20 7b 20 5f 62 66 (bool f) { _bf
1660: 20 3d 20 63 61 73 74 28 75 73 68 6f 72 74 29 20 = cast(ushort)
1670: 28 28 5f 62 66 20 26 20 7e 30 78 38 30 30 30 29 ((_bf & ~0x8000)
1680: 20 7c 20 28 66 20 3c 3c 20 31 35 29 29 3b 20 72 | (f << 15)); r
1690: 65 74 75 72 6e 20 66 3b 20 7d 0d 0a 7d 0d 0a 0d eturn f; }..}...
16a0: 0a 65 78 74 65 72 6e 20 28 57 69 6e 64 6f 77 73 .extern (Windows
16b0: 29 20 7b 0d 0a 09 42 4f 4f 4c 20 44 64 65 53 65 ) {...BOOL DdeSe
16c0: 74 51 75 61 6c 69 74 79 4f 66 53 65 72 76 69 63 tQualityOfServic
16d0: 65 28 48 57 4e 44 2c 20 63 6f 6e 73 74 28 53 45 e(HWND, const(SE
16e0: 43 55 52 49 54 59 5f 51 55 41 4c 49 54 59 5f 4f CURITY_QUALITY_O
16f0: 46 5f 53 45 52 56 49 43 45 29 2a 2c 0d 0a 09 20 F_SERVICE)*,...
1700: 20 50 53 45 43 55 52 49 54 59 5f 51 55 41 4c 49 PSECURITY_QUALI
1710: 54 59 5f 4f 46 5f 53 45 52 56 49 43 45 29 3b 0d TY_OF_SERVICE);.
1720: 0a 09 42 4f 4f 4c 20 49 6d 70 65 72 73 6f 6e 61 ..BOOL Impersona
1730: 74 65 44 64 65 43 6c 69 65 6e 74 57 69 6e 64 6f teDdeClientWindo
1740: 77 28 48 57 4e 44 2c 20 48 57 4e 44 29 3b 0d 0a w(HWND, HWND);..
1750: 09 4c 50 41 52 41 4d 20 50 61 63 6b 44 44 45 6c .LPARAM PackDDEl
1760: 50 61 72 61 6d 28 55 49 4e 54 2c 20 55 49 4e 54 Param(UINT, UINT
1770: 5f 50 54 52 2c 20 55 49 4e 54 5f 50 54 52 29 3b _PTR, UINT_PTR);
1780: 0d 0a 09 42 4f 4f 4c 20 55 6e 70 61 63 6b 44 44 ...BOOL UnpackDD
1790: 45 6c 50 61 72 61 6d 28 55 49 4e 54 2c 20 4c 50 ElParam(UINT, LP
17a0: 41 52 41 4d 2c 20 50 55 49 4e 54 5f 50 54 52 2c ARAM, PUINT_PTR,
17b0: 20 50 55 49 4e 54 5f 50 54 52 29 3b 0d 0a 09 42 PUINT_PTR);...B
17c0: 4f 4f 4c 20 46 72 65 65 44 44 45 6c 50 61 72 61 OOL FreeDDElPara
17d0: 6d 28 55 49 4e 54 2c 20 4c 50 41 52 41 4d 29 3b m(UINT, LPARAM);
17e0: 0d 0a 09 4c 50 41 52 41 4d 20 52 65 75 73 65 44 ...LPARAM ReuseD
17f0: 44 45 6c 50 61 72 61 6d 28 4c 50 41 52 41 4d 2c DElParam(LPARAM,
1800: 20 55 49 4e 54 2c 20 55 49 4e 54 2c 20 55 49 4e UINT, UINT, UIN
1810: 54 5f 50 54 52 2c 20 55 49 4e 54 5f 50 54 52 29 T_PTR, UINT_PTR)
1820: 3b 0d 0a 7d 0d 0a 0d 0a 64 65 62 75 67 20 28 57 ;..}....debug (W
1830: 69 6e 64 6f 77 73 55 6e 69 74 54 65 73 74 29 20 indowsUnitTest)
1840: 7b 0d 0a 09 75 6e 69 74 74 65 73 74 20 7b 0d 0a {...unittest {..
1850: 09 09 44 44 45 41 43 4b 20 64 64 65 61 63 6b 3b ..DDEACK ddeack;
1860: 0d 0a 0d 0a 09 09 77 69 74 68 20 28 64 64 65 61 ......with (ddea
1870: 63 6b 29 20 7b 0d 0a 09 09 09 72 65 73 65 72 76 ck) {.....reserv
1880: 65 64 20 3d 20 31 30 3b 0d 0a 09 09 09 61 73 73 ed = 10;.....ass
1890: 65 72 74 20 28 5f 62 66 20 3d 3d 20 30 78 30 41 ert (_bf == 0x0A
18a0: 29 3b 0d 0a 09 09 09 66 42 75 73 79 20 3d 20 74 );.....fBusy = t
18b0: 72 75 65 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 rue;.....assert
18c0: 28 5f 62 66 20 3d 3d 20 30 78 34 41 29 3b 0d 0a (_bf == 0x4A);..
18d0: 09 09 09 66 41 63 6b 20 3d 20 74 72 75 65 3b 0d ...fAck = true;.
18e0: 0a 09 09 09 61 73 73 65 72 74 20 28 5f 62 66 20 ....assert (_bf
18f0: 3d 3d 20 30 78 43 41 29 3b 0d 0a 0d 0a 09 09 09 == 0xCA);.......
1900: 61 73 73 65 72 74 20 28 72 65 73 65 72 76 65 64 assert (reserved
1910: 20 3d 3d 20 31 30 29 3b 0d 0a 09 09 09 61 73 73 == 10);.....ass
1920: 65 72 74 20 28 66 42 75 73 79 20 3d 3d 20 74 72 ert (fBusy == tr
1930: 75 65 29 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 ue);.....assert
1940: 28 66 41 63 6b 20 3d 3d 20 74 72 75 65 29 3b 0d (fAck == true);.
1950: 0a 0d 0a 09 09 09 72 65 73 65 72 76 65 64 20 3d ......reserved =
1960: 20 34 33 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 43;.....assert
1970: 28 5f 62 66 20 3d 3d 20 30 78 45 42 29 3b 0d 0a (_bf == 0xEB);..
1980: 09 09 09 66 42 75 73 79 20 3d 20 66 61 6c 73 65 ...fBusy = false
1990: 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 28 5f 62 ;.....assert (_b
19a0: 66 20 3d 3d 20 30 78 41 42 29 3b 0d 0a 09 09 09 f == 0xAB);.....
19b0: 66 41 63 6b 20 3d 20 66 61 6c 73 65 3b 0d 0a 09 fAck = false;...
19c0: 09 09 61 73 73 65 72 74 20 28 5f 62 66 20 3d 3d ..assert (_bf ==
19d0: 20 30 78 32 42 29 3b 0d 0a 0d 0a 09 09 09 61 73 0x2B);.......as
19e0: 73 65 72 74 20 28 72 65 73 65 72 76 65 64 20 3d sert (reserved =
19f0: 3d 20 34 33 29 3b 0d 0a 09 09 09 61 73 73 65 72 = 43);.....asser
1a00: 74 20 28 66 42 75 73 79 20 3d 3d 20 66 61 6c 73 t (fBusy == fals
1a10: 65 29 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 28 e);.....assert (
1a20: 66 41 63 6b 20 3d 3d 20 66 61 6c 73 65 29 3b 0d fAck == false);.
1a30: 0a 09 09 7d 0d 0a 0d 0a 09 09 44 44 45 50 4f 4b ...}......DDEPOK
1a40: 45 20 64 64 65 70 6f 6b 65 3b 0d 0a 0d 0a 09 09 E ddepoke;......
1a50: 77 69 74 68 20 28 64 64 65 70 6f 6b 65 29 20 7b with (ddepoke) {
1a60: 0d 0a 09 09 09 75 6e 75 73 65 64 20 3d 20 33 34 .....unused = 34
1a70: 35 36 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 28 56;.....assert (
1a80: 5f 62 66 20 3d 3d 20 30 78 30 44 38 30 29 3b 0d _bf == 0x0D80);.
1a90: 0a 09 09 09 66 52 65 6c 65 61 73 65 20 3d 20 74 ....fRelease = t
1aa0: 72 75 65 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 rue;.....assert
1ab0: 28 5f 62 66 20 3d 3d 20 30 78 32 44 38 30 29 3b (_bf == 0x2D80);
1ac0: 0d 0a 09 09 09 66 52 65 73 65 72 76 65 64 20 3d .....fReserved =
1ad0: 20 32 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 28 2;.....assert (
1ae0: 5f 62 66 20 3d 3d 20 30 78 41 44 38 30 29 3b 0d _bf == 0xAD80);.
1af0: 0a 0d 0a 09 09 09 61 73 73 65 72 74 20 28 75 6e ......assert (un
1b00: 75 73 65 64 20 3d 3d 20 33 34 35 36 29 3b 0d 0a used == 3456);..
1b10: 09 09 09 61 73 73 65 72 74 20 28 66 52 65 6c 65 ...assert (fRele
1b20: 61 73 65 20 3d 3d 20 74 72 75 65 29 3b 0d 0a 09 ase == true);...
1b30: 09 09 61 73 73 65 72 74 20 28 66 52 65 73 65 72 ..assert (fReser
1b40: 76 65 64 20 3d 3d 20 32 29 3b 0d 0a 0d 0a 09 09 ved == 2);......
1b50: 09 75 6e 75 73 65 64 20 3d 20 32 31 30 39 3b 0d .unused = 2109;.
1b60: 0a 09 09 09 61 73 73 65 72 74 20 28 5f 62 66 20 ....assert (_bf
1b70: 3d 3d 20 30 78 61 38 33 64 29 3b 0d 0a 09 09 09 == 0xa83d);.....
1b80: 66 52 65 6c 65 61 73 65 20 3d 20 66 61 6c 73 65 fRelease = false
1b90: 3b 0d 0a 09 09 09 61 73 73 65 72 74 20 28 5f 62 ;.....assert (_b
1ba0: 66 20 3d 3d 20 30 78 38 38 33 64 29 3b 0d 0a 09 f == 0x883d);...
1bb0: 09 09 66 52 65 73 65 72 76 65 64 20 3d 20 31 3b ..fReserved = 1;
1bc0: 0d 0a 09 09 09 61 73 73 65 72 74 20 28 5f 62 66 .....assert (_bf
1bd0: 20 3d 3d 20 30 78 34 38 33 64 29 3b 0d 0a 0d 0a == 0x483d);....
1be0: 09 09 09 61 73 73 65 72 74 20 28 75 6e 75 73 65 ...assert (unuse
1bf0: 64 20 3d 3d 20 32 31 30 39 29 3b 0d 0a 09 09 09 d == 2109);.....
1c00: 61 73 73 65 72 74 20 28 66 52 65 6c 65 61 73 65 assert (fRelease
1c10: 20 3d 3d 20 66 61 6c 73 65 29 3b 0d 0a 09 09 09 == false);.....
1c20: 61 73 73 65 72 74 20 28 66 52 65 73 65 72 76 65 assert (fReserve
1c30: 64 20 3d 3d 20 31 29 3b 0d 0a 09 09 7d 0d 0a 09 d == 1);....}...
1c40: 7d 0d 0a 7d 0d 0a }..}..