summaryrefslogtreecommitdiff
path: root/localrepo/async-1.9.8.tar
blob: c16e3eeedd3e1b3fc742513def86ab3fa1f1a158 (plain)
ofshex dumpascii
0000 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.8/....................
0020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0060 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
0080 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 31 33 30 35 00 20 35 00 00 00 0000000.00000000000.011305..5...
00a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0100 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0120 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0200 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 67 69 74 68 75 62 2f 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.8/.github/............
0220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0260 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
0280 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 36 34 35 00 20 35 00 00 00 0000000.00000000000.012645..5...
02a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0400 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 67 69 74 68 75 62 2f 77 6f 72 6b 66 6c 6f 77 73 2f 00 00 async-1.9.8/.github/workflows/..
0420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0460 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
0480 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 37 30 32 00 20 35 00 00 00 0000000.00000000000.014702..5...
04a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
04c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
04e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0500 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0520 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0600 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 67 69 74 68 75 62 2f 77 6f 72 6b 66 6c 6f 77 73 2f 74 65 async-1.9.8/.github/workflows/te
0620 73 74 2e 79 6d 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 st.yml..........................
0640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0680 30 30 30 32 35 37 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 34 31 36 00 20 30 00 00 00 0002576.00000000000.016416..0...
06a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0800 6e 61 6d 65 3a 20 43 49 0a 0a 6f 6e 3a 0a 20 20 70 75 73 68 3a 0a 20 20 20 20 62 72 61 6e 63 68 name:.CI..on:...push:.....branch
0820 65 73 3a 0a 20 20 20 20 20 20 2d 20 6d 61 73 74 65 72 0a 20 20 70 75 6c 6c 5f 72 65 71 75 65 73 es:.......-.master...pull_reques
0840 74 3a 0a 20 20 77 6f 72 6b 66 6c 6f 77 5f 64 69 73 70 61 74 63 68 3a 0a 0a 63 6f 6e 63 75 72 72 t:...workflow_dispatch:..concurr
0860 65 6e 63 79 3a 0a 20 20 67 72 6f 75 70 3a 20 24 7b 7b 20 67 69 74 68 75 62 2e 77 6f 72 6b 66 6c ency:...group:.${{.github.workfl
0880 6f 77 20 7d 7d 2d 24 7b 7b 20 67 69 74 68 75 62 2e 72 65 66 20 7d 7d 0a 20 20 63 61 6e 63 65 6c ow.}}-${{.github.ref.}}...cancel
08a0 2d 69 6e 2d 70 72 6f 67 72 65 73 73 3a 20 74 72 75 65 0a 0a 6a 6f 62 73 3a 0a 20 20 74 65 73 74 -in-progress:.true..jobs:...test
08c0 3a 0a 20 20 20 20 72 75 6e 73 2d 6f 6e 3a 20 24 7b 7b 20 6d 61 74 72 69 78 2e 6f 73 20 7d 7d 0a :.....runs-on:.${{.matrix.os.}}.
08e0 20 20 20 20 73 74 72 61 74 65 67 79 3a 0a 20 20 20 20 20 20 66 61 69 6c 2d 66 61 73 74 3a 20 66 ....strategy:.......fail-fast:.f
0900 61 6c 73 65 0a 20 20 20 20 20 20 6d 61 74 72 69 78 3a 0a 20 20 20 20 20 20 20 20 6f 73 3a 20 5b alse.......matrix:.........os:.[
0920 75 62 75 6e 74 75 2d 6c 61 74 65 73 74 2c 20 6d 61 63 6f 73 2d 6c 61 74 65 73 74 2c 20 77 69 6e ubuntu-latest,.macos-latest,.win
0940 64 6f 77 73 2d 6c 61 74 65 73 74 5d 0a 20 20 20 20 20 20 20 20 65 6d 61 63 73 2d 76 65 72 73 69 dows-latest].........emacs-versi
0960 6f 6e 3a 0a 20 20 20 20 20 20 20 20 20 20 2d 20 27 32 36 2e 31 27 0a 20 20 20 20 20 20 20 20 20 on:...........-.'26.1'..........
0980 20 2d 20 27 32 36 2e 32 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 27 32 36 2e 33 27 0a 20 20 20 .-.'26.2'...........-.'26.3'....
09a0 20 20 20 20 20 20 20 2d 20 27 32 37 2e 31 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 27 32 37 2e .......-.'27.1'...........-.'27.
09c0 32 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 27 32 38 2e 31 27 0a 20 20 20 20 20 20 20 20 20 20 2'...........-.'28.1'...........
09e0 2d 20 27 32 38 2e 32 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 73 6e 61 70 73 68 6f 74 0a 0a 20 -.'28.2'...........-.snapshot...
0a00 20 20 20 73 74 65 70 73 3a 0a 20 20 20 20 2d 20 75 73 65 73 3a 20 61 63 74 69 6f 6e 73 2f 63 68 ...steps:.....-.uses:.actions/ch
0a20 65 63 6b 6f 75 74 40 76 33 0a 0a 20 20 20 20 2d 20 75 73 65 73 3a 20 6a 63 73 30 39 30 32 31 38 eckout@v3......-.uses:.jcs090218
0a40 2f 73 65 74 75 70 2d 65 6d 61 63 73 40 6d 61 73 74 65 72 0a 20 20 20 20 20 20 77 69 74 68 3a 0a /setup-emacs@master.......with:.
0a60 20 20 20 20 20 20 20 20 76 65 72 73 69 6f 6e 3a 20 24 7b 7b 20 6d 61 74 72 69 78 2e 65 6d 61 63 ........version:.${{.matrix.emac
0a80 73 2d 76 65 72 73 69 6f 6e 20 7d 7d 0a 0a 20 20 20 20 2d 20 75 73 65 73 3a 20 65 6d 61 63 73 2d s-version.}}......-.uses:.emacs-
0aa0 65 61 73 6b 2f 73 65 74 75 70 2d 65 61 73 6b 40 6d 61 73 74 65 72 0a 20 20 20 20 20 20 77 69 74 eask/setup-eask@master.......wit
0ac0 68 3a 0a 20 20 20 20 20 20 20 20 76 65 72 73 69 6f 6e 3a 20 27 73 6e 61 70 73 68 6f 74 27 0a 0a h:.........version:.'snapshot'..
0ae0 20 20 20 20 2d 20 6e 61 6d 65 3a 20 57 6f 72 6b 61 72 6f 75 6e 64 20 66 6f 72 20 45 6d 61 63 73 ....-.name:.Workaround.for.Emacs
0b00 20 32 37 2e 32 27 73 20 57 69 6e 64 6f 77 73 20 62 75 69 6c 64 20 66 72 6f 6d 20 47 4e 55 20 46 .27.2's.Windows.build.from.GNU.F
0b20 54 50 0a 20 20 20 20 20 20 69 66 3a 20 24 7b 7b 20 72 75 6e 6e 65 72 2e 6f 73 20 3d 3d 20 27 57 TP.......if:.${{.runner.os.==.'W
0b40 69 6e 64 6f 77 73 27 20 26 26 20 63 6f 6e 74 61 69 6e 73 28 66 72 6f 6d 4a 73 6f 6e 28 27 5b 22 indows'.&&.contains(fromJson('["
0b60 32 36 2e 31 22 2c 20 22 32 36 2e 32 22 2c 20 22 32 36 2e 33 22 2c 20 22 32 37 2e 31 22 2c 20 22 26.1",."26.2",."26.3",."27.1",."
0b80 32 37 2e 32 22 5d 27 29 2c 20 6d 61 74 72 69 78 2e 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 29 20 27.2"]'),.matrix.emacs-version).
0ba0 7d 7d 0a 20 20 20 20 20 20 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 67 63 69 20 63 65 72 74 }}.......run:.|.........gci.cert
0bc0 3a 5c 4c 6f 63 61 6c 4d 61 63 68 69 6e 65 5c 52 6f 6f 74 5c 44 41 43 39 30 32 34 46 35 34 44 38 :\LocalMachine\Root\DAC9024F54D8
0be0 46 36 44 46 39 34 39 33 35 46 42 31 37 33 32 36 33 38 43 41 36 41 44 37 37 43 31 33 0a 20 20 20 F6DF94935FB1732638CA6AD77C13....
0c00 20 20 20 20 20 67 63 69 20 63 65 72 74 3a 5c 4c 6f 63 61 6c 4d 61 63 68 69 6e 65 5c 52 6f 6f 74 .....gci.cert:\LocalMachine\Root
0c20 5c 44 41 43 39 30 32 34 46 35 34 44 38 46 36 44 46 39 34 39 33 35 46 42 31 37 33 32 36 33 38 43 \DAC9024F54D8F6DF94935FB1732638C
0c40 41 36 41 44 37 37 43 31 33 20 7c 20 52 65 6d 6f 76 65 2d 49 74 65 6d 0a 0a 20 20 20 20 2d 20 6e A6AD77C13.|.Remove-Item......-.n
0c60 61 6d 65 3a 20 49 6e 73 74 61 6c 6c 20 64 65 70 65 6e 64 65 6e 63 69 65 73 0a 20 20 20 20 20 20 ame:.Install.dependencies.......
0c80 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 69 6e 73 74 61 6c 6c 2d 64 65 70 73 run:.|.........eask.install-deps
0ca0 20 2d 2d 64 65 76 0a 0a 20 20 20 20 2d 20 6e 61 6d 65 3a 20 52 75 6e 20 62 75 74 74 65 72 63 75 .--dev......-.name:.Run.buttercu
0cc0 70 0a 20 20 20 20 20 20 74 69 6d 65 6f 75 74 2d 6d 69 6e 75 74 65 73 3a 20 31 0a 20 20 20 20 20 p.......timeout-minutes:.1......
0ce0 20 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 74 65 73 74 20 62 75 74 74 65 72 .run:.|.........eask.test.butter
0d00 63 75 70 0a 0a 20 20 20 20 2d 20 6e 61 6d 65 3a 20 52 75 6e 20 74 65 73 74 73 0a 20 20 20 20 20 cup......-.name:.Run.tests......
0d20 20 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 63 6c 65 61 6e 20 61 6c 6c 0a 20 .run:.|.........eask.clean.all..
0d40 20 20 20 20 20 20 20 65 61 73 6b 20 70 61 63 6b 61 67 65 0a 20 20 20 20 20 20 20 20 65 61 73 6b .......eask.package.........eask
0d60 20 69 6e 73 74 61 6c 6c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 63 6f 6d 70 69 6c 65 0a 00 00 .install.........eask.compile...
0d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0e00 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 64 69 72 65 64 2d 61 73 79 6e 63 2e 65 6c 00 00 00 00 00 00 async-1.9.8/dired-async.el......
0e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0e60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0e80 30 30 35 31 30 32 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 30 33 30 00 20 30 00 00 00 0051021.00000000000.014030..0...
0ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0f00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0f20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1000 3b 3b 3b 20 64 69 72 65 64 2d 61 73 79 6e 63 2e 65 6c 20 2d 2d 2d 20 41 73 79 6e 63 68 72 6f 6e ;;;.dired-async.el.---.Asynchron
1020 6f 75 73 20 64 69 72 65 64 20 61 63 74 69 6f 6e 73 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 ous.dired.actions.-*-.lexical-bi
1040 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 nding:.t.-*-..;;.Copyright.(C).2
1060 30 31 32 2d 32 30 31 39 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 012-2019.Free.Software.Foundatio
1080 6e 2c 20 49 6e 63 2e 0a 0a 3b 3b 20 41 75 74 68 6f 72 73 3a 20 4a 6f 68 6e 20 57 69 65 67 6c 65 n,.Inc...;;.Authors:.John.Wiegle
10a0 79 20 3c 6a 77 69 65 67 6c 65 79 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 20 20 20 20 20 20 y.<jwiegley@gmail.com>.;;.......
10c0 20 20 20 54 68 69 65 72 72 79 20 56 6f 6c 70 69 61 74 74 6f 20 3c 74 68 69 65 76 6f 6c 40 70 6f ...Thierry.Volpiatto.<thievol@po
10e0 73 74 65 6f 2e 6e 65 74 3e 0a 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 64 69 72 65 64 20 61 73 steo.net>..;;.Keywords:.dired.as
1100 79 6e 63 20 6e 65 74 77 6f 72 6b 0a 3b 3b 20 58 2d 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 ync.network.;;.X-URL:.https://gi
1120 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 65 6d 61 63 73 2d 61 73 79 6e 63 0a 0a 3b thub.com/jwiegley/emacs-async..;
1140 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b ;.This.program.is.free.software;
1160 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 .you.can.redistribute.it.and/or.
1180 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 modify.;;.it.under.the.terms.of.
11a0 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 the.GNU.General.Public.License.a
11c0 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 s.published.by.;;.the.Free.Softw
11e0 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 are.Foundation,.either.version.3
1200 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 .of.the.License,.or.;;.(at.your.
1220 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 option).any.later.version...;;.T
1240 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 his.program.is.distributed.in.th
1260 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b e.hope.that.it.will.be.useful,.;
1280 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 ;.but.WITHOUT.ANY.WARRANTY;.with
12a0 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 out.even.the.implied.warranty.of
12c0 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 .;;.MERCHANTABILITY.or.FITNESS.F
12e0 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 OR.A.PARTICULAR.PURPOSE...See.th
1300 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 e.;;.GNU.General.Public.License.
1320 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 for.more.details...;;.You.should
1340 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 .have.received.a.copy.of.the.GNU
1360 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 .General.Public.License.;;.along
1380 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 .with.this.program...If.not,.see
13a0 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e .<https://www.gnu.org/licenses/>
13c0 2e 0a 0c 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c ....;;;.Commentary:..;;.This.fil
13e0 65 20 70 72 6f 76 69 64 65 20 61 20 72 65 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 60 64 69 72 e.provide.a.redefinition.of.`dir
1400 65 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 27 20 66 75 6e 63 74 69 6f 6e 2c 0a 3b 3b 20 70 65 72 ed-create-file'.function,.;;.per
1420 66 6f 72 6d 73 20 63 6f 70 69 65 73 2c 20 6d 6f 76 65 73 20 61 6e 64 20 61 6c 6c 20 77 68 61 74 forms.copies,.moves.and.all.what
1440 20 69 73 20 68 61 6e 64 6c 65 64 20 62 79 20 60 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 6c .is.handled.by.`dired-create-fil
1460 65 27 0a 3b 3b 20 69 6e 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 75 73 69 6e 67 20 61 20 e'.;;.in.the.background.using.a.
1480 73 6c 61 76 65 20 45 6d 61 63 73 20 70 72 6f 63 65 73 73 2c 0a 3b 3b 20 62 79 20 6d 65 61 6e 73 slave.Emacs.process,.;;.by.means
14a0 20 6f 66 20 74 68 65 20 61 73 79 6e 63 2e 65 6c 20 6d 6f 64 75 6c 65 2e 0a 3b 3b 20 54 6f 20 75 .of.the.async.el.module..;;.To.u
14c0 73 65 20 69 74 2c 20 70 75 74 20 74 68 69 73 20 69 6e 20 79 6f 75 72 20 2e 65 6d 61 63 73 3a 0a se.it,.put.this.in.your..emacs:.
14e0 0a 3b 3b 20 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 20 31 29 0a 0a 3b 3b .;;.....(dired-async-mode.1)..;;
1500 20 54 68 69 73 20 77 69 6c 6c 20 65 6e 61 62 6c 65 20 61 73 79 6e 63 20 63 6f 70 79 2f 72 65 6e .This.will.enable.async.copy/ren
1520 61 6d 65 20 65 74 63 2e 2e 2e 0a 3b 3b 20 69 6e 20 64 69 72 65 64 20 61 6e 64 20 68 65 6c 6d 2e ame.etc....;;.in.dired.and.helm.
1540 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0c 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a ..;;;.Code:...(require.'cl-lib).
1560 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d 61 75 78 29 0a 28 72 65 71 75 69 72 65 20 27 61 (require.'dired-aux).(require.'a
1580 73 79 6e 63 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 0a 20 20 28 64 65 66 sync)..(eval-when-compile...(def
15a0 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 29 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 var.async-callback))..(defgroup.
15c0 64 69 72 65 64 2d 61 73 79 6e 63 20 6e 69 6c 0a 20 20 22 43 6f 70 79 20 72 65 6e 61 6d 65 20 66 dired-async.nil..."Copy.rename.f
15e0 69 6c 65 73 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 66 72 6f 6d 20 64 69 72 65 64 2e 22 iles.asynchronously.from.dired."
1600 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 ...:group.'dired)..(defcustom.di
1620 72 65 64 2d 61 73 79 6e 63 2d 65 6e 76 2d 76 61 72 69 61 62 6c 65 73 2d 72 65 67 65 78 70 0a 20 red-async-env-variables-regexp..
1640 20 22 5c 5c 60 5c 5c 28 74 72 61 6d 70 2d 5c 5c 28 64 65 66 61 75 6c 74 5c 5c 7c 63 6f 6e 6e 65 ."\\`\\(tramp-\\(default\\|conne
1660 63 74 69 6f 6e 5c 5c 7c 72 65 6d 6f 74 65 5c 5c 29 5c 5c 7c 61 6e 67 65 2d 66 74 70 5c 5c 29 2d ction\\|remote\\)\\|ange-ftp\\)-
1680 2e 2a 22 0a 20 20 22 56 61 72 69 61 62 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 74 68 69 73 20 72 .*"..."Variables.matching.this.r
16a0 65 67 65 78 70 20 77 69 6c 6c 20 62 65 20 6c 6f 61 64 65 64 20 6f 6e 20 43 68 69 6c 64 20 45 6d egexp.will.be.loaded.on.Child.Em
16c0 61 63 73 2e 22 0a 20 20 3a 74 79 70 65 20 20 27 72 65 67 65 78 70 29 0a 0a 28 64 65 66 63 75 73 acs."...:type..'regexp)..(defcus
16e0 74 6f 6d 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 66 75 6e 63 74 69 6f 6e tom.dired-async-message-function
1700 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 6d 65 73 73 61 67 65 0a .'dired-async-mode-line-message.
1720 20 20 22 46 75 6e 63 74 69 6f 6e 20 74 6f 20 75 73 65 20 74 6f 20 6e 6f 74 69 66 79 20 72 65 73 .."Function.to.use.to.notify.res
1740 75 6c 74 20 77 68 65 6e 20 6f 70 65 72 61 74 69 6f 6e 20 66 69 6e 69 73 68 2e 0a 53 68 6f 75 6c ult.when.operation.finish..Shoul
1760 64 20 74 61 6b 65 20 73 61 6d 65 20 61 72 67 73 20 61 73 20 60 6d 65 73 73 61 67 65 27 2e 22 0a d.take.same.args.as.`message'.".
1780 20 20 3a 74 79 70 65 20 20 27 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 ..:type..'function)..(defcustom.
17a0 64 69 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 20 22 2f 74 6d 70 2f 64 69 72 65 64 dired-async-log-file."/tmp/dired
17c0 2d 61 73 79 6e 63 2e 6c 6f 67 22 0a 20 20 22 46 69 6c 65 20 75 73 65 20 74 6f 20 63 6f 6d 6d 75 -async.log"..."File.use.to.commu
17e0 6e 69 63 61 74 65 20 65 72 72 6f 72 73 20 66 72 6f 6d 20 43 68 69 6c 64 20 45 6d 61 63 73 20 74 nicate.errors.from.Child.Emacs.t
1800 6f 20 68 6f 73 74 20 45 6d 61 63 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a o.host.Emacs."...:type.'string).
1820 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 2d 6c 69 67 .(defcustom.dired-async-mode-lig
1840 68 74 65 72 20 27 28 3a 65 76 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 hter.'(:eval....................
1860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 6d 61 6a ...................(when.(eq.maj
1880 6f 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 or-mode.'dired-mode)............
18a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 41 .............................".A
18c0 73 79 6e 63 22 29 29 0a 20 20 22 4d 6f 64 65 20 6c 69 6e 65 20 6c 69 67 68 74 65 72 20 75 73 65 sync"))..."Mode.line.lighter.use
18e0 64 20 66 6f 72 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 27 2e 22 0a 20 20 3a 72 69 d.for.`dired-async-mode'."...:ri
1900 73 6b 79 20 74 0a 20 20 3a 74 79 70 65 20 27 73 65 78 70 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d sky.t...:type.'sexp)..(defcustom
1920 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6b 69 70 2d 66 61 73 74 20 6e 69 6c 0a 20 20 22 49 66 .dired-async-skip-fast.nil..."If
1940 20 6e 6f 6e 2d 6e 69 6c 2c 20 73 6b 69 70 20 61 73 79 6e 63 20 66 6f 72 20 66 61 73 74 20 6f 70 .non-nil,.skip.async.for.fast.op
1960 65 72 61 74 69 6f 6e 73 2e 0a 53 61 6d 65 20 64 65 76 69 63 65 20 72 65 6e 61 6d 65 73 20 61 6e erations..Same.device.renames.an
1980 64 20 63 6f 70 79 69 6e 67 20 61 6e 64 20 72 65 6e 61 6d 69 6e 67 20 66 69 6c 65 73 20 73 6d 61 d.copying.and.renaming.files.sma
19a0 6c 6c 65 72 20 74 68 61 6e 0a 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6d 61 6c 6c 2d 66 69 6c ller.than.`dired-async-small-fil
19c0 65 2d 6d 61 78 27 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 66 61 73 74 2e 22 0a 20 20 3a e-max'.are.considered.fast."...:
19e0 72 69 73 6b 79 20 74 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 risky.t...:type.'boolean)..(defc
1a00 75 73 74 6f 6d 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 6d 61 78 ustom.dired-async-small-file-max
1a20 20 35 30 30 30 30 30 30 0a 20 20 22 46 69 6c 65 73 20 73 6d 61 6c 6c 65 72 20 74 68 61 6e 20 74 .5000000..."Files.smaller.than.t
1a40 68 69 73 20 69 6e 20 62 79 74 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 66 61 73 74 his.in.bytes.are.considered.fast
1a60 20 74 6f 20 63 6f 70 79 0a 6f 72 20 72 65 6e 61 6d 65 20 66 6f 72 20 60 64 69 72 65 64 2d 61 73 .to.copy.or.rename.for.`dired-as
1a80 79 6e 63 2d 73 6b 69 70 2d 66 61 73 74 27 2e 22 0a 20 20 3a 72 69 73 6b 79 20 74 0a 20 20 3a 74 ync-skip-fast'."...:risky.t...:t
1aa0 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 65 64 2d 61 73 ype.'integer)..(defface.dired-as
1ac0 79 6e 63 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 27 28 28 74 20 28 3a 66 6f 72 65 67 72 6f 75 6e ync-message.....'((t.(:foregroun
1ae0 64 20 22 79 65 6c 6c 6f 77 22 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 6d d."yellow")))..."Face.used.for.m
1b00 6f 64 65 2d 6c 69 6e 65 20 6d 65 73 73 61 67 65 2e 22 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 ode-line.message.")..(defface.di
1b20 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c 75 72 65 73 0a 20 20 20 20 27 28 28 74 20 28 3a 66 6f red-async-failures.....'((t.(:fo
1b40 72 65 67 72 6f 75 6e 64 20 22 72 65 64 22 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 reground."red")))..."Face.used.f
1b60 6f 72 20 6d 6f 64 65 2d 6c 69 6e 65 20 6d 65 73 73 61 67 65 2e 22 29 0a 0a 28 64 65 66 66 61 63 or.mode-line.message.")..(deffac
1b80 65 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 27 e.dired-async-mode-message.....'
1ba0 28 28 74 20 28 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 47 6f 6c 64 22 29 29 29 0a 20 20 22 46 61 ((t.(:foreground."Gold")))..."Fa
1bc0 63 65 20 75 73 65 64 20 66 6f 72 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d 6f 64 65 6c 69 ce.used.for.`dired-async--modeli
1be0 6e 65 2d 6d 6f 64 65 27 20 6c 69 67 68 74 65 72 2e 22 29 0a 0a 28 64 65 66 69 6e 65 2d 6d 69 6e ne-mode'.lighter.")..(define-min
1c00 6f 72 2d 6d 6f 64 65 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f or-mode.dired-async--modeline-mo
1c20 64 65 0a 20 20 20 20 22 4e 6f 74 69 66 79 20 6d 6f 64 65 2d 6c 69 6e 65 20 74 68 61 74 20 61 6e de....."Notify.mode-line.that.an
1c40 20 61 73 79 6e 63 20 70 72 6f 63 65 73 73 20 72 75 6e 2e 22 0a 20 20 3a 67 6c 6f 62 61 6c 20 74 .async.process.run."...:global.t
1c60 0a 20 20 3a 6c 69 67 68 74 65 72 20 28 3a 65 76 61 6c 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 ...:lighter.(:eval.(propertize.(
1c80 66 6f 72 6d 61 74 20 22 20 5b 25 73 20 41 73 79 6e 63 20 6a 6f 62 28 73 29 20 72 75 6e 6e 69 6e format.".[%s.Async.job(s).runnin
1ca0 67 5d 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 g]".............................
1cc0 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 ..........(length.(dired-async-p
1ce0 72 6f 63 65 73 73 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rocesses))).....................
1d00 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 ..........'face.'dired-async-mod
1d20 65 2d 6d 65 73 73 61 67 65 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 64 69 72 65 64 2d 61 73 79 6e e-message))...(unless.dired-asyn
1d40 63 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f 64 65 0a 20 20 20 20 28 6c 65 74 20 28 28 76 69 73 69 c--modeline-mode.....(let.((visi
1d60 62 6c 65 2d 62 65 6c 6c 20 74 29 29 20 28 64 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 ble-bell.t)).(ding))))..(defun.d
1d80 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 6d 65 73 73 61 67 65 20 28 74 65 ired-async-mode-line-message.(te
1da0 78 74 20 66 61 63 65 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 4e 6f 74 69 66 79 20 65 6e xt.face.&rest.args)..."Notify.en
1dc0 64 20 6f 66 20 6f 70 65 72 61 74 69 6f 6e 20 69 6e 20 60 6d 6f 64 65 2d 6c 69 6e 65 27 2e 22 0a d.of.operation.in.`mode-line'.".
1de0 20 20 28 6d 65 73 73 61 67 65 20 6e 69 6c 29 0a 20 20 28 6c 65 74 20 28 28 6d 6f 64 65 2d 6c 69 ..(message.nil)...(let.((mode-li
1e00 6e 65 2d 66 6f 72 6d 61 74 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ne-format.(concat...............
1e20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 22 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 .............".".(propertize....
1e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 .............................(if
1e60 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .args...........................
1e80 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 66 6f 72 6d 61 74 20 74 65 78 74 20 61 ..........(apply.#'format.text.a
1ea0 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rgs)............................
1ec0 20 20 20 20 20 20 20 74 65 78 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......text)....................
1ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 66 61 63 65 29 29 29 29 0a 20 20 20 20 .............'face.face)))).....
1f00 28 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75 70 64 61 74 65 29 0a 20 20 20 20 28 73 69 (force-mode-line-update).....(si
1f20 74 2d 66 6f 72 20 33 29 0a 20 20 20 20 28 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75 70 t-for.3).....(force-mode-line-up
1f40 64 61 74 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f 63 date)))..(defun.dired-async-proc
1f60 65 73 73 65 73 20 28 29 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 70 20 69 6e 20 28 70 72 esses.()...(cl-loop.for.p.in.(pr
1f80 6f 63 65 73 73 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 70 72 6f ocess-list)............when.(pro
1fa0 63 65 73 73 2d 67 65 74 20 70 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f 63 65 73 73 29 cess-get.p.'dired-async-process)
1fc0 0a 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 70 29 29 0a 0a 28 64 65 66 75 6e 20 ............collect.p))..(defun.
1fe0 64 69 72 65 64 2d 61 73 79 6e 63 2d 6b 69 6c 6c 2d 70 72 6f 63 65 73 73 20 28 29 0a 20 20 28 69 dired-async-kill-process.()...(i
2000 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 70 72 6f 63 65 73 73 65 73 20 nteractive)...(let*.((processes.
2020 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f 63 65 73 73 65 73 29 29 0a 20 20 20 20 20 20 20 (dired-async-processes))........
2040 20 20 28 70 72 6f 63 20 28 63 61 72 20 28 6c 61 73 74 20 70 72 6f 63 65 73 73 65 73 29 29 29 29 ..(proc.(car.(last.processes))))
2060 0a 20 20 20 20 28 61 6e 64 20 70 72 6f 63 20 28 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 70 .....(and.proc.(delete-process.p
2080 72 6f 63 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 3e 20 28 6c 65 6e 67 74 68 20 70 72 6f roc)).....(unless.(>.(length.pro
20a0 63 65 73 73 65 73 29 20 31 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d cesses).1).......(dired-async--m
20c0 6f 64 65 6c 69 6e 65 2d 6d 6f 64 65 20 2d 31 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 odeline-mode.-1))))..(defun.dire
20e0 64 2d 61 73 79 6e 63 2d 61 66 74 65 72 2d 66 69 6c 65 2d 63 72 65 61 74 65 20 28 74 6f 74 61 6c d-async-after-file-create.(total
2100 20 6f 70 65 72 61 74 69 6f 6e 20 66 61 69 6c 75 72 65 73 20 73 6b 69 70 70 65 64 29 0a 20 20 22 .operation.failures.skipped)..."
2120 43 61 6c 6c 62 61 63 6b 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 66 6f 72 20 6f 70 65 72 61 Callback.function.used.for.opera
2140 74 69 6f 6e 20 68 61 6e 64 6c 65 64 20 62 79 20 60 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 tion.handled.by.`dired-create-fi
2160 6c 65 27 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f le'."...(unless.(dired-async-pro
2180 63 65 73 73 65 73 29 0a 20 20 20 20 3b 3b 20 54 75 72 6e 20 6f 66 66 20 6d 6f 64 65 2d 6c 69 6e cesses).....;;.Turn.off.mode-lin
21a0 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 0a 20 20 20 20 3b 3b 20 6f 6e 6c 79 20 77 68 65 6e 20 e.notification.....;;.only.when.
21c0 6c 61 73 74 20 70 72 6f 63 65 73 73 20 65 6e 64 2e 0a 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 last.process.end......(dired-asy
21e0 6e 63 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f 64 65 20 2d 31 29 29 0a 20 20 28 77 68 65 6e 20 6f nc--modeline-mode.-1))...(when.o
2200 70 65 72 61 74 69 6f 6e 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 peration.....(if.(file-exists-p.
2220 64 69 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 28 70 dired-async-log-file).........(p
2240 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 28 67 rogn...........(pop-to-buffer.(g
2260 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 64 69 72 65 64 2d 6c 6f 67 2d 62 75 66 66 65 et-buffer-create.dired-log-buffe
2280 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d r))...........(goto-char.(point-
22a0 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 6e 68 69 62 69 74 2d 72 65 max))...........(setq.inhibit-re
22c0 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 45 72 ad-only.t)...........(insert."Er
22e0 72 6f 72 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 ror:.")...........(insert-file-c
2300 6f 6e 74 65 6e 74 73 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 ontents.dired-async-log-file)...
2320 20 20 20 20 20 20 20 20 28 73 70 65 63 69 61 6c 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 ........(special-mode)..........
2340 20 28 73 68 72 69 6e 6b 2d 77 69 6e 64 6f 77 2d 69 66 2d 6c 61 72 67 65 72 2d 74 68 61 6e 2d 62 .(shrink-window-if-larger-than-b
2360 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 64 69 uffer)...........(delete-file.di
2380 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 29 0a 20 20 20 20 20 20 28 72 75 6e 2d red-async-log-file)).......(run-
23a0 77 69 74 68 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 30 2e 31 20 6e 69 6c 0a 20 20 20 20 20 20 with-timer........0.1.nil.......
23c0 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 46 69 72 73 74 20 73 65 .(lambda.()..........;;.First.se
23e0 6e 64 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 73 2e 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e nd.error.messages...........(con
2400 64 20 28 66 61 69 6c 75 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e d.(failures.................(fun
2420 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 66 75 6e 63 74 69 6f call.dired-async-message-functio
2440 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 73 20 66 n.........................."%s.f
2460 61 69 6c 65 64 20 66 6f 72 20 25 64 20 6f 66 20 25 64 20 66 69 6c 65 25 73 20 2d 2d 20 53 65 65 ailed.for.%d.of.%d.file%s.--.See
2480 20 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 .*Dired.log*.buffer"............
24a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c 75 ..............'dired-async-failu
24c0 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 res..........................(ca
24e0 72 20 6f 70 65 72 61 74 69 6f 6e 29 20 28 6c 65 6e 67 74 68 20 66 61 69 6c 75 72 65 73 29 0a 20 r.operation).(length.failures)..
2500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 74 61 6c 20 28 64 ........................total.(d
2520 69 72 65 64 2d 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 ired-plural-s.total)))..........
2540 20 20 20 20 20 20 28 73 6b 69 70 70 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ......(skipped.................(
2560 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 66 75 6e 63 funcall.dired-async-message-func
2580 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 tion.........................."%
25a0 73 3a 20 25 64 20 6f 66 20 25 64 20 66 69 6c 65 25 73 20 73 6b 69 70 70 65 64 20 2d 2d 20 53 65 s:.%d.of.%d.file%s.skipped.--.Se
25c0 65 20 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 e.*Dired.log*.buffer"...........
25e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c ...............'dired-async-fail
2600 75 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 ures..........................(c
2620 61 72 20 6f 70 65 72 61 74 69 6f 6e 29 20 28 6c 65 6e 67 74 68 20 73 6b 69 70 70 65 64 29 20 74 ar.operation).(length.skipped).t
2640 6f 74 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 otal..........................(d
2660 69 72 65 64 2d 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 ired-plural-s.total)))).........
2680 20 28 77 68 65 6e 20 64 69 72 65 64 2d 62 75 66 66 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 .(when.dired-buffers............
26a0 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 5f 66 20 2e 20 62 29 20 69 6e 20 64 69 72 65 64 2d 62 (cl-loop.for.(_f...b).in.dired-b
26c0 75 66 66 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 uffers.....................when.
26e0 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (buffer-live-p.b)...............
2700 20 20 20 20 20 20 64 6f 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 0a ......do.(with-current-buffer.b.
2720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 .........................(when.(
2740 61 6e 64 20 28 6e 6f 74 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 65 66 61 75 6c 74 2d and.(not.(file-remote-p.default-
2760 64 69 72 65 63 74 6f 72 79 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 directory.nil.t))...............
2780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 65 78 69 73 ......................(file-exis
27a0 74 73 2d 70 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 ts-p.default-directory))........
27c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 ....................(revert-buff
27e0 65 72 20 6e 69 6c 20 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 46 69 6e 61 6c 6c er.nil.t)))))..........;;.Finall
2800 79 20 73 65 6e 64 20 74 68 65 20 73 75 63 63 65 73 73 20 6d 65 73 73 61 67 65 2e 0a 20 20 20 20 y.send.the.success.message......
2820 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 .....(funcall.dired-async-messag
2840 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 41 73 e-function..................."As
2860 79 6e 63 68 72 6f 6e 6f 75 73 20 25 73 20 6f 66 20 25 73 20 6f 6e 20 25 73 20 66 69 6c 65 25 73 ynchronous.%s.of.%s.on.%s.file%s
2880 20 64 6f 6e 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d .done"...................'dired-
28a0 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 async-message...................
28c0 28 63 61 72 20 6f 70 65 72 61 74 69 6f 6e 29 20 28 63 61 64 72 20 6f 70 65 72 61 74 69 6f 6e 29 (car.operation).(cadr.operation)
28e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 74 61 6c 20 28 64 69 72 65 64 2d ...................total.(dired-
2900 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 plural-s.total)))))))..(defun.di
2920 72 65 64 2d 61 73 79 6e 63 2d 6d 61 79 62 65 2d 6b 69 6c 6c 2d 66 74 70 20 28 29 0a 20 20 22 52 red-async-maybe-kill-ftp.()..."R
2940 65 74 75 72 6e 20 61 20 66 6f 72 6d 20 74 6f 20 6b 69 6c 6c 20 66 74 70 20 70 72 6f 63 65 73 73 eturn.a.form.to.kill.ftp.process
2960 20 69 6e 20 63 68 69 6c 64 20 65 6d 61 63 73 2e 22 0a 20 20 28 71 75 6f 74 65 0a 20 20 20 28 70 .in.child.emacs."...(quote....(p
2980 72 6f 67 6e 0a 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 20 20 20 20 rogn......(require.'cl-lib).....
29a0 20 28 6c 65 74 20 28 28 62 75 66 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 62 20 69 6e 20 28 62 .(let.((buf.(cl-loop.for.b.in.(b
29c0 75 66 66 65 72 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 uffer-list).....................
29e0 20 20 20 20 20 74 68 65 72 65 69 73 20 28 61 6e 64 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 0a .....thereis.(and.(string-match.
2a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2a20 20 20 20 20 20 20 20 22 5c 5c 60 5c 5c 2a 66 74 70 2e 2a 22 0a 20 20 20 20 20 20 20 20 20 20 20 ......."\\`\\*ftp.*"............
2a40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 ............................(buf
2a60 66 65 72 2d 6e 61 6d 65 20 62 29 29 20 62 29 29 29 29 0a 20 20 20 20 20 20 20 28 77 68 65 6e 20 fer-name.b)).b))))........(when.
2a80 62 75 66 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 29 29 29 0a 0a 28 64 65 66 buf.(kill-buffer.buf))))))..(def
2aa0 73 75 62 73 74 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 28 subst.dired-async--directory-p.(
2ac0 61 74 74 72 69 62 75 74 65 73 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 attributes)..."Return.non-nil.if
2ae0 20 41 54 54 52 49 42 55 54 45 53 20 69 73 20 66 6f 72 20 61 20 64 69 72 65 63 74 6f 72 79 2e 0a .ATTRIBUTES.is.for.a.directory..
2b00 53 65 65 20 60 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 27 2e 22 0a 20 20 3b 3b 20 43 61 6e See.`file-attributes'."...;;.Can
2b20 20 61 6c 73 6f 20 62 65 20 61 20 73 74 72 69 6e 67 20 66 6f 72 20 73 79 6d 6c 69 6e 6b 73 2c 20 .also.be.a.string.for.symlinks,.
2b40 73 6f 20 63 68 65 63 6b 20 66 6f 72 20 74 20 65 78 70 6c 69 63 69 74 6c 79 2e 0a 20 20 28 65 71 so.check.for.t.explicitly....(eq
2b60 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 74 79 70 65 20 61 74 74 72 69 62 75 74 65 73 .(file-attribute-type.attributes
2b80 29 20 74 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 61 ).t))..(defsubst.dired-async--sa
2ba0 6d 65 2d 64 65 76 69 63 65 2d 70 20 28 66 31 20 66 32 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f me-device-p.(f1.f2)..."Return.no
2bc0 6e 2d 6e 69 6c 20 69 66 20 46 31 20 61 6e 64 20 46 32 20 68 61 76 65 20 74 68 65 20 73 61 6d 65 n-nil.if.F1.and.F2.have.the.same
2be0 20 64 65 76 69 63 65 20 6e 75 6d 62 65 72 2e 22 0a 20 20 3b 3b 20 66 69 6c 65 2d 61 74 74 72 69 .device.number."...;;.file-attri
2c00 62 75 74 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 65 72 20 6d 61 79 20 62 65 20 61 20 63 6f 6e 73 bute-device-number.may.be.a.cons
2c20 20 63 65 6c 6c 2c 20 73 6f 20 75 73 65 20 65 71 75 61 6c 20 66 6f 72 0a 20 20 3b 3b 20 74 65 73 .cell,.so.use.equal.for...;;.tes
2c40 74 69 6e 67 20 28 53 65 65 20 45 6d 61 63 73 20 62 75 67 2f 35 38 34 34 36 29 2e 0a 20 20 28 65 ting.(See.Emacs.bug/58446)....(e
2c60 71 75 61 6c 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 qual.(file-attribute-device-numb
2c80 65 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 31 29 29 0a 20 20 20 20 20 20 20 er.(file-attributes.f1))........
2ca0 20 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 65 72 20 ..(file-attribute-device-number.
2cc0 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 32 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 (file-attributes.f2))))..(defun.
2ce0 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 70 20 28 66 69 6c 65 29 dired-async--small-file-p.(file)
2d00 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 46 49 4c 45 20 69 73 20 63 6f ..."Return.non-nil.if.FILE.is.co
2d20 6e 73 69 64 65 72 65 64 20 73 6d 61 6c 6c 2e 0a 0a 46 69 6c 65 20 69 73 20 63 6f 6e 73 69 64 65 nsidered.small...File.is.conside
2d40 72 65 64 20 73 6d 61 6c 6c 20 69 66 20 69 74 20 73 69 7a 65 20 69 73 20 73 6d 61 6c 6c 65 72 20 red.small.if.it.size.is.smaller.
2d60 74 68 61 6e 0a 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 6d 61 78 than.`dired-async-small-file-max
2d80 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 61 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 '."...(let.((a.(file-attributes.
2da0 66 69 6c 65 29 29 29 0a 20 20 20 20 3b 3b 20 44 69 72 65 63 74 6f 72 69 65 73 20 61 72 65 20 61 file))).....;;.Directories.are.a
2dc0 6c 77 61 79 73 20 6c 61 72 67 65 20 73 69 6e 63 65 20 77 65 20 63 61 6e 27 74 20 65 61 73 69 6c lways.large.since.we.can't.easil
2de0 79 20 66 69 67 75 72 65 20 6f 75 74 0a 20 20 20 20 3b 3b 20 74 68 65 69 72 20 74 6f 74 61 6c 20 y.figure.out.....;;.their.total.
2e00 73 69 7a 65 2e 0a 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 64 69 72 65 64 2d 61 73 79 6e 63 size......(and.(not.(dired-async
2e20 2d 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 61 29 29 0a 20 20 20 20 20 20 20 20 20 28 3c 20 28 66 --directory-p.a))..........(<.(f
2e40 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 73 69 7a 65 20 61 29 20 64 69 72 65 64 2d 61 73 79 6e ile-attribute-size.a).dired-asyn
2e60 63 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 c-small-file-max))))..(defun.dir
2e80 65 64 2d 61 73 79 6e 63 2d 2d 73 6b 69 70 2d 61 73 79 6e 63 2d 70 20 28 66 69 6c 65 2d 63 72 65 ed-async--skip-async-p.(file-cre
2ea0 61 74 6f 72 20 66 69 6c 65 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 29 0a 20 20 22 52 ator.file.name-constructor)..."R
2ec0 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 77 65 20 73 68 6f 75 6c 64 20 73 6b 69 70 20 eturn.non-nil.if.we.should.skip.
2ee0 61 73 79 6e 63 20 66 6f 72 20 46 49 4c 45 2e 0a 53 65 65 20 60 64 69 72 65 64 2d 63 72 65 61 74 async.for.FILE..See.`dired-creat
2f00 65 2d 66 69 6c 65 73 27 20 66 6f 72 20 46 49 4c 45 2d 43 52 45 41 54 4f 52 20 61 6e 64 20 4e 41 e-files'.for.FILE-CREATOR.and.NA
2f20 4d 45 2d 43 4f 4e 53 54 52 55 43 54 4f 52 2e 22 0a 20 20 3b 3b 20 53 6b 69 70 20 61 73 79 6e 63 ME-CONSTRUCTOR."...;;.Skip.async
2f40 20 66 6f 72 20 73 6d 61 6c 6c 20 66 69 6c 65 73 2e 0a 20 20 28 6f 72 20 28 64 69 72 65 64 2d 61 .for.small.files....(or.(dired-a
2f60 73 79 6e 63 2d 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 70 20 66 69 6c 65 29 0a 20 20 20 20 20 20 3b sync--small-file-p.file).......;
2f80 3b 20 41 6c 73 6f 20 73 6b 69 70 20 61 73 79 6e 63 20 66 6f 72 20 73 61 6d 65 20 64 65 76 69 63 ;.Also.skip.async.for.same.devic
2fa0 65 20 72 65 6e 61 6d 65 73 2e 0a 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 66 69 6c 65 2d 63 e.renames........(and.(eq.file-c
2fc0 72 65 61 74 6f 72 20 27 64 69 72 65 64 2d 72 65 6e 61 6d 65 2d 66 69 6c 65 29 0a 20 20 20 20 20 reator.'dired-rename-file)......
2fe0 20 20 20 20 20 20 28 6c 65 74 20 28 28 6e 65 77 20 28 66 75 6e 63 61 6c 6c 20 6e 61 6d 65 2d 63 ......(let.((new.(funcall.name-c
3000 6f 6e 73 74 72 75 63 74 6f 72 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 onstructor.file)))..............
3020 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 61 6d 65 2d 64 65 76 69 63 65 2d 70 20 66 69 6c 65 (dired-async--same-device-p.file
3040 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 6e 65 77 29 29 29 29 29 29 0a .(file-name-directory.new)))))).
3060 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6d 61 72 74 2d 63 72 65 61 74 .(defun.dired-async--smart-creat
3080 65 2d 66 69 6c 65 73 20 28 6f 6c 64 2d 66 75 6e 63 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 0a 20 e-files.(old-func.file-creator..
30a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
30c0 20 20 20 20 20 20 20 6f 70 65 72 61 74 69 6f 6e 20 66 6e 2d 6c 69 73 74 20 6e 61 6d 65 2d 63 6f .......operation.fn-list.name-co
30e0 6e 73 74 72 75 63 74 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nstructor.......................
3100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 6d 61 72 6b ..................&optional.mark
3120 65 72 2d 63 68 61 72 29 0a 20 20 22 41 72 6f 75 6e 64 20 61 64 76 69 63 65 20 66 6f 72 20 60 64 er-char)..."Around.advice.for.`d
3140 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 27 2e 0a 55 73 65 73 20 61 73 79 6e 63 20 6c ired-create-files'..Uses.async.l
3160 69 6b 65 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 27 20 62 ike.`dired-async-create-files'.b
3180 75 74 20 73 6b 69 70 73 20 63 65 72 74 61 69 6e 20 66 61 73 74 0a 63 61 73 65 73 20 69 66 20 60 ut.skips.certain.fast.cases.if.`
31a0 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6b 69 70 2d 66 61 73 74 27 20 69 73 20 6e 6f 6e 2d 6e 69 dired-async-skip-fast'.is.non-ni
31c0 6c 2e 22 0a 20 20 28 6c 65 74 20 28 61 73 79 6e 63 2d 6c 69 73 74 20 71 75 69 63 6b 2d 6c 69 73 l."...(let.(async-list.quick-lis
31e0 74 29 0a 20 20 20 20 28 69 66 20 28 6f 72 20 28 65 71 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 t).....(if.(or.(eq.file-creator.
3200 27 62 61 63 6b 75 70 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 20 'backup-file).............(null.
3220 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6b 69 70 2d 66 61 73 74 29 29 0a 20 20 20 20 20 20 20 20 dired-async-skip-fast)).........
3240 28 73 65 74 71 20 61 73 79 6e 63 2d 6c 69 73 74 20 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 (setq.async-list.fn-list).......
3260 28 64 6f 6c 69 73 74 20 28 6f 6c 64 20 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 28 69 (dolist.(old.fn-list).........(i
3280 66 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6b 69 70 2d 61 73 79 6e 63 2d 70 20 66 69 6c f.(dired-async--skip-async-p.fil
32a0 65 2d 63 72 65 61 74 6f 72 20 6f 6c 64 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 29 0a e-creator.old.name-constructor).
32c0 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6f 6c 64 20 71 75 69 63 6b 2d 6c 69 73 74 ............(push.old.quick-list
32e0 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6f 6c 64 20 61 73 79 6e 63 2d 6c 69 73 74 )...........(push.old.async-list
3300 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 61 73 79 6e 63 2d 6c 69 73 74 0a 20 20 20 20 20 20 )))).....(when.async-list.......
3320 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 20 20 20 (dired-async-create-files.......
3340 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 6f 70 65 72 61 74 69 6f 6e 20 28 6e 72 65 76 65 72 73 .file-creator.operation.(nrevers
3360 65 20 61 73 79 6e 63 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 e.async-list)........name-constr
3380 75 63 74 6f 72 20 6d 61 72 6b 65 72 2d 63 68 61 72 29 29 0a 20 20 20 20 28 77 68 65 6e 20 71 75 uctor.marker-char)).....(when.qu
33a0 69 63 6b 2d 6c 69 73 74 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 6f 6c 64 2d 66 75 6e 63 ick-list.......(funcall.old-func
33c0 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 6f 70 65 72 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 .file-creator.operation.........
33e0 20 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 71 75 69 63 6b 2d 6c 69 73 74 29 20 6e 61 6d .......(nreverse.quick-list).nam
3400 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 20 6d 61 72 6b 65 72 2d 63 68 61 72 29 29 29 29 0a 0a 28 e-constructor.marker-char))))..(
3420 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 61 62 6f 72 74 2d 69 66 2d 66 69 6c 65 defun.dired-async--abort-if-file
3440 2d 74 6f 6f 2d 6c 61 72 67 65 20 28 73 69 7a 65 20 6f 70 2d 74 79 70 65 20 66 69 6c 65 6e 61 6d -too-large.(size.op-type.filenam
3460 65 29 0a 20 20 22 49 66 20 66 69 6c 65 20 53 49 5a 45 20 6c 61 72 67 65 72 20 74 68 61 6e 20 60 e)..."If.file.SIZE.larger.than.`
3480 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 68 72 65 73 68 6f 6c 64 27 2c 20 61 large-file-warning-threshold',.a
34a0 6c 6c 6f 77 20 75 73 65 72 20 74 6f 20 61 62 6f 72 74 2e 0a 53 61 6d 65 20 61 73 20 60 61 62 6f llow.user.to.abort..Same.as.`abo
34c0 72 74 2d 69 66 2d 66 69 6c 65 2d 74 6f 6f 2d 6c 61 72 67 65 27 20 62 75 74 20 77 69 74 68 6f 75 rt-if-file-too-large'.but.withou
34e0 74 20 75 73 65 72 2d 65 72 72 6f 72 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 6c 61 72 67 t.user-error."...(when.(and.larg
3500 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 68 72 65 73 68 6f 6c 64 20 73 69 7a 65 0a 09 20 e-file-warning-threshold.size...
3520 20 20 20 20 28 3e 20 73 69 7a 65 20 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 ....(>.size.large-file-warning-t
3540 68 72 65 73 68 6f 6c 64 29 29 0a 20 20 20 20 28 66 69 6c 65 73 2d 2d 61 73 6b 2d 75 73 65 72 2d hreshold)).....(files--ask-user-
3560 61 62 6f 75 74 2d 6c 61 72 67 65 2d 66 69 6c 65 0a 20 20 20 20 20 73 69 7a 65 20 6f 70 2d 74 79 about-large-file......size.op-ty
3580 70 65 20 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 76 61 72 20 6f 76 65 72 pe.filename.nil)))..(defvar.over
35a0 77 72 69 74 65 2d 71 75 65 72 79 29 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d write-query).(defun.dired-async-
35c0 63 72 65 61 74 65 2d 66 69 6c 65 73 20 28 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 6f 70 65 72 61 create-files.(file-creator.opera
35e0 74 69 6f 6e 20 66 6e 2d 6c 69 73 74 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 0a 20 20 tion.fn-list.name-constructor...
3600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
3620 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 6d 61 72 6b 65 72 2d 63 68 ............&optional._marker-ch
3640 61 72 29 0a 20 20 22 53 61 6d 65 20 61 73 20 60 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 6c ar)..."Same.as.`dired-create-fil
3660 65 73 27 20 62 75 74 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 2e 0a 0a 53 65 65 20 60 64 69 72 65 es'.but.asynchronous...See.`dire
3680 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 27 20 66 6f 72 20 74 68 65 20 62 65 68 61 76 69 6f 72 d-create-files'.for.the.behavior
36a0 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 2e 22 0a 20 20 28 73 65 74 71 20 6f 76 65 72 77 72 69 74 .of.arguments."...(setq.overwrit
36c0 65 2d 71 75 65 72 79 20 6e 69 6c 29 0a 20 20 28 6c 65 74 20 28 28 74 6f 74 61 6c 20 28 6c 65 6e e-query.nil)...(let.((total.(len
36e0 67 74 68 20 66 6e 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 66 61 69 6c 75 72 65 73 20 61 gth.fn-list)).........failures.a
3700 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 20 73 6b 69 70 70 65 64 20 63 61 6c 6c 62 61 63 6b 0a 20 20 sync-fn-list.skipped.callback...
3720 20 20 20 20 20 20 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 68 20 63 72 65 61 74 65 2d ......async-quiet-switch.create-
3740 64 69 72 29 0a 20 20 20 20 28 6c 65 74 20 28 74 6f 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 dir).....(let.(to).......(dolist
3760 20 28 66 72 6f 6d 20 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 6f .(from.fn-list).........(setq.to
3780 20 28 66 75 6e 63 61 6c 6c 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 20 66 72 6f 6d 29 .(funcall.name-constructor.from)
37a0 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 65 71 75 61 6c 20 74 6f 20 66 72 6f ).........(if.(and.(equal.to.fro
37c0 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 20 28 65 71 20 66 69 m)..................(null.(eq.fi
37e0 6c 65 2d 63 72 65 61 74 6f 72 20 27 62 61 63 6b 75 70 2d 66 69 6c 65 29 29 29 0a 20 20 20 20 20 le-creator.'backup-file)))......
3800 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 .......(progn...............(set
3820 71 20 74 6f 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6c q.to.nil)...............(dired-l
3840 6f 67 20 22 43 61 6e 6e 6f 74 20 25 73 20 74 6f 20 73 61 6d 65 20 66 69 6c 65 3a 20 25 73 5c 6e og."Cannot.%s.to.same.file:.%s\n
3860 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 77 6e "..........................(down
3880 63 61 73 65 20 6f 70 65 72 61 74 69 6f 6e 29 20 66 72 6f 6d 29 29 29 0a 20 20 20 20 20 20 20 20 case.operation).from))).........
38a0 28 69 66 20 28 6e 6f 74 20 74 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 (if.(not.to).............(setq.s
38c0 6b 69 70 70 65 64 20 28 63 6f 6e 73 20 28 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 76 kipped.(cons.(dired-make-relativ
38e0 65 20 66 72 6f 6d 29 20 73 6b 69 70 70 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 e.from).skipped))...........(let
3900 2a 20 28 28 6f 76 65 72 77 72 69 74 65 20 28 61 6e 64 20 28 6e 75 6c 6c 20 28 65 71 20 66 69 6c *.((overwrite.(and.(null.(eq.fil
3920 65 2d 63 72 65 61 74 6f 72 20 27 62 61 63 6b 75 70 2d 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 e-creator.'backup-file))........
3940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d ..........................(file-
3960 65 78 69 73 74 73 2d 70 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 exists-p.to)))..................
3980 28 64 69 72 65 64 2d 6f 76 65 72 77 72 69 74 65 2d 63 6f 6e 66 69 72 6d 65 64 20 3b 20 66 6f 72 (dired-overwrite-confirmed.;.for
39a0 20 64 69 72 65 64 2d 68 61 6e 64 6c 65 2d 6f 76 65 72 77 72 69 74 65 0a 20 20 20 20 20 20 20 20 .dired-handle-overwrite.........
39c0 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 6f 76 65 72 77 72 69 74 65 0a 20 20 20 20 20 20 20 ..........(and.overwrite........
39e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 68 65 6c 70 2d 66 6f 72 6d ................(let.((help-form
3a00 20 60 28 66 6f 72 6d 61 74 20 22 5c 0a 54 79 70 65 20 53 50 43 20 6f 72 20 60 79 27 20 74 6f 20 .`(format."\.Type.SPC.or.`y'.to.
3a20 6f 76 65 72 77 72 69 74 65 20 66 69 6c 65 20 60 25 73 27 2c 0a 44 45 4c 20 6f 72 20 60 6e 27 20 overwrite.file.`%s',.DEL.or.`n'.
3a40 74 6f 20 73 6b 69 70 20 74 6f 20 6e 65 78 74 2c 0a 45 53 43 20 6f 72 20 60 71 27 20 74 6f 20 6e to.skip.to.next,.ESC.or.`q'.to.n
3a60 6f 74 20 6f 76 65 72 77 72 69 74 65 20 61 6e 79 20 6f 66 20 74 68 65 20 72 65 6d 61 69 6e 69 6e ot.overwrite.any.of.the.remainin
3a80 67 20 66 69 6c 65 73 2c 0a 60 21 27 20 74 6f 20 6f 76 65 72 77 72 69 74 65 20 61 6c 6c 20 72 65 g.files,.`!'.to.overwrite.all.re
3aa0 6d 61 69 6e 69 6e 67 20 66 69 6c 65 73 20 77 69 74 68 20 6e 6f 20 6d 6f 72 65 20 71 75 65 73 74 maining.files.with.no.more.quest
3ac0 69 6f 6e 73 2e 22 20 2c 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ions.".,to)))...................
3ae0 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 71 75 65 72 79 20 27 6f 76 65 72 77 72 69 74 65 2d 71 .......(dired-query.'overwrite-q
3b00 75 65 72 79 20 22 4f 76 65 72 77 72 69 74 65 20 60 25 73 27 3f 22 20 74 6f 29 29 29 29 29 0a 20 uery."Overwrite.`%s'?".to)))))..
3b20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 48 61 6e 64 6c 65 20 74 68 65 20 60 64 69 72 65 64 2d ...........;;.Handle.the.`dired-
3b40 63 6f 70 79 2d 66 69 6c 65 27 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 73 70 65 63 69 61 6c 6c copy-file'.file-creator.speciall
3b60 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 65 6e 20 63 6f 70 79 69 6e 67 20 61 20 y.............;;.When.copying.a.
3b80 64 69 72 65 63 74 6f 72 79 20 74 6f 20 61 6e 6f 74 68 65 72 20 64 69 72 65 63 74 6f 72 79 20 6f directory.to.another.directory.o
3ba0 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 6f 73 73 69 62 6c 79 20 74 6f 20 69 74 73 r.............;;.possibly.to.its
3bc0 65 6c 66 20 6f 72 20 6f 6e 65 20 6f 66 20 69 74 73 20 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 elf.or.one.of.its.subdirectories
3be0 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 2e 67 20 22 7e 2f 66 6f 6f 2f 22 20 3d 3e ..............;;.e.g."~/foo/".=>
3c00 20 22 7e 2f 74 65 73 74 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 72 20 22 7e 2f ."~/test/".............;;.or."~/
3c20 66 6f 6f 2f 22 20 3d 3e 22 7e 2f 66 6f 6f 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 foo/".=>"~/foo/".............;;.
3c40 6f 72 20 22 7e 2f 66 6f 6f 2f 20 3d 3e 20 7e 2f 66 6f 6f 2f 62 61 72 2f 22 29 0a 20 20 20 20 20 or."~/foo/.=>.~/foo/bar/")......
3c60 20 20 20 20 20 20 20 3b 3b 20 49 6e 20 74 68 69 73 20 63 61 73 65 20 74 68 65 20 27 6e 61 6d 65 .......;;.In.this.case.the.'name
3c80 2d 63 6f 6e 73 74 72 75 63 74 6f 72 27 20 68 61 76 65 20 73 65 74 20 74 68 65 20 64 65 73 74 69 -constructor'.have.set.the.desti
3ca0 6e 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 4f 20 74 6f 20 22 7e 2f 74 nation.............;;.TO.to."~/t
3cc0 65 73 74 2f 66 6f 6f 22 20 62 65 63 61 75 73 65 20 74 68 65 20 6f 6c 64 20 65 6d 61 63 73 32 33 est/foo".because.the.old.emacs23
3ce0 20 62 65 68 61 76 69 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 66 20 60 63 6f 70 .behavior.............;;.of.`cop
3d00 79 2d 64 69 72 65 63 74 6f 72 79 27 20 77 61 73 20 74 6f 20 6e 6f 74 20 63 72 65 61 74 65 20 74 y-directory'.was.to.not.create.t
3d20 68 65 20 73 75 62 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 he.subdirectory.............;;.a
3d40 6e 64 20 69 6e 73 74 65 61 64 20 63 6f 70 79 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 2e 0a 20 20 nd.instead.copy.the.contents....
3d60 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 69 74 68 20 74 68 65 20 6e 65 77 20 62 65 68 61 76 69 ..........;;.With.the.new.behavi
3d80 6f 72 20 6f 66 20 60 63 6f 70 79 2d 64 69 72 65 63 74 6f 72 79 27 0a 20 20 20 20 20 20 20 20 20 or.of.`copy-directory'..........
3da0 20 20 20 3b 3b 20 28 73 69 6d 69 6c 61 72 20 74 6f 20 74 68 65 20 60 63 70 27 20 73 68 65 6c 6c ...;;.(similar.to.the.`cp'.shell
3dc0 20 63 6f 6d 6d 61 6e 64 29 20 77 65 20 64 6f 6e 27 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b .command).we.don't.............;
3de0 3b 20 6e 65 65 64 20 73 75 63 68 20 61 20 63 6f 6e 73 74 72 75 63 74 69 6f 6e 20 6f 66 20 74 68 ;.need.such.a.construction.of.th
3e00 65 20 74 61 72 67 65 74 20 64 69 72 65 63 74 6f 72 79 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 e.target.directory,.............
3e20 3b 3b 20 73 6f 20 6d 6f 64 69 66 79 20 74 68 65 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 54 4f 20 ;;.so.modify.the.destination.TO.
3e40 74 6f 20 22 7e 2f 74 65 73 74 2f 22 20 69 6e 73 74 65 61 64 20 6f 66 20 22 7e 2f 74 65 73 74 2f to."~/test/".instead.of."~/test/
3e60 66 6f 6f 2f 22 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 73 74 6e 61 foo/"..............(let.((destna
3e80 6d 65 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 74 6f 29 29 29 0a 20 20 me.(file-name-directory.to)))...
3ea0 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 66 69 6c 65 2d 64 69 72 ............(when.(and.(file-dir
3ec0 65 63 74 6f 72 79 2d 70 20 66 72 6f 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ectory-p.from)..................
3ee0 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 74 6f 29 0a 20 20 ........(file-directory-p.to)...
3f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 66 69 6c 65 2d .......................(eq.file-
3f20 63 72 65 61 74 6f 72 20 27 64 69 72 65 64 2d 63 6f 70 79 2d 66 69 6c 65 29 29 0a 20 20 20 20 20 creator.'dired-copy-file))......
3f40 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 6f 20 64 65 73 74 6e 61 6d 65 29 29 0a 20 ...........(setq.to.destname))..
3f60 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 44 45 53 54 4e 41 4d 45 20 69 73 20 61 .............;;.If.DESTNAME.is.a
3f80 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 6f 66 20 46 52 4f 4d 2c 20 6e 6f 74 20 61 20 73 79 6d .subdirectory.of.FROM,.not.a.sym
3fa0 6c 69 6e 6b 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 74 68 65 20 6d link,...............;;.and.the.m
3fc0 65 74 68 6f 64 20 69 6e 20 75 73 65 20 69 73 20 63 6f 70 79 69 6e 67 2c 20 73 69 67 6e 61 6c 20 ethod.in.use.is.copying,.signal.
3fe0 61 6e 20 65 72 72 6f 72 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 an.error................(and.(eq
4000 20 74 20 28 63 61 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 64 65 73 74 6e 61 6d .t.(car.(file-attributes.destnam
4020 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 66 69 6c 65 e)))....................(eq.file
4040 2d 63 72 65 61 74 6f 72 20 27 64 69 72 65 64 2d 63 6f 70 79 2d 66 69 6c 65 29 0a 20 20 20 20 20 -creator.'dired-copy-file)......
4060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 69 6e 2d 64 69 72 65 63 74 6f 72 79 ..............(file-in-directory
4080 2d 70 20 64 65 73 74 6e 61 6d 65 20 66 72 6f 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -p.destname.from)...............
40a0 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 63 6f 70 79 20 60 25 73 27 20 69 6e .....(error."Cannot.copy.`%s'.in
40c0 74 6f 20 69 74 73 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 60 25 73 27 22 0a 20 20 20 20 20 20 to.its.subdirectory.`%s'".......
40e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 72 6f 6d 20 74 6f 29 29 29 0a 20 ....................from.to)))..
4100 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 6b 69 70 20 66 69 6c 65 20 69 66 20 69 74 20 69 73 ...........;;.Skip.file.if.it.is
4120 20 74 6f 6f 20 6c 61 72 67 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 .too.large..............(if.(and
4140 20 28 6d 65 6d 62 65 72 20 6f 70 65 72 61 74 69 6f 6e 20 27 28 22 43 6f 70 79 22 20 22 52 65 6e .(member.operation.'("Copy"."Ren
4160 61 6d 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 ame"))......................(eq.
4180 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 61 62 6f 72 74 2d 69 66 2d 66 69 6c 65 2d 74 6f 6f 2d (dired-async--abort-if-file-too-
41a0 6c 61 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 large...........................
41c0 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 73 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 (file-attribute-size............
41e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 ................(file-attributes
4200 20 28 66 69 6c 65 2d 74 72 75 65 6e 61 6d 65 20 66 72 6f 6d 29 29 29 0a 20 20 20 20 20 20 20 20 .(file-truename.from))).........
4220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 77 6e 63 61 73 65 20 6f 70 65 72 ..................(downcase.oper
4240 61 74 69 6f 6e 29 20 66 72 6f 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ation).from)....................
4260 20 20 20 20 20 20 27 61 62 6f 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ......'abort)).................(
4280 70 75 73 68 20 66 72 6f 6d 20 73 6b 69 70 70 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 push.from.skipped)..............
42a0 20 28 69 66 20 6f 76 65 72 77 72 69 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(if.overwrite..................
42c0 20 28 6f 72 20 28 61 6e 64 20 64 69 72 65 64 2d 6f 76 65 72 77 72 69 74 65 2d 63 6f 6e 66 69 72 .(or.(and.dired-overwrite-confir
42e0 6d 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 med............................(
4300 70 75 73 68 20 28 63 6f 6e 73 20 66 72 6f 6d 20 74 6f 29 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 push.(cons.from.to).async-fn-lis
4320 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e t)).......................(progn
4340 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 .........................(push.(
4360 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 76 65 20 66 72 6f 6d 29 20 66 61 69 6c 75 72 dired-make-relative.from).failur
4380 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 es).........................(dir
43a0 65 64 2d 6c 6f 67 20 22 25 73 20 60 25 73 27 20 74 6f 20 60 25 73 27 20 66 61 69 6c 65 64 5c 6e ed-log."%s.`%s'.to.`%s'.failed\n
43c0 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "...............................
43e0 20 20 20 20 20 6f 70 65 72 61 74 69 6f 6e 20 66 72 6f 6d 20 74 6f 29 29 29 0a 20 20 20 20 20 20 .....operation.from.to))).......
4400 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 66 72 6f 6d 20 74 6f 29 20 61 ..........(push.(cons.from.to).a
4420 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 46 69 78 20 sync-fn-list)))))).......;;.Fix.
4440 74 72 61 6d 70 20 69 73 73 75 65 20 23 38 30 20 77 69 74 68 20 65 6d 61 63 73 2d 32 36 2c 20 75 tramp.issue.#80.with.emacs-26,.u
4460 73 65 20 22 2d 71 22 20 6f 6e 6c 79 20 77 68 65 6e 20 6e 65 65 64 65 64 2e 0a 20 20 20 20 20 20 se."-q".only.when.needed........
4480 28 73 65 74 71 20 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 68 0a 20 20 20 20 20 20 20 (setq.async-quiet-switch........
44a0 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 74 72 61 6d 70 2d 63 61 63 .....(if.(and.(boundp.'tramp-cac
44c0 68 65 2d 72 65 61 64 2d 70 65 72 73 69 73 74 65 6e 74 2d 64 61 74 61 29 0a 20 20 20 20 20 20 20 he-read-persistent-data)........
44e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 20 20 20 ..............async-fn-list.....
4500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 5f .................(cl-loop.for.(_
4520 66 72 6f 6d 20 2e 20 74 6f 29 20 69 6e 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 20 20 20 from...to).in.async-fn-list.....
4540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 72 65 69 ..........................therei
4560 73 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 s.(file-remote-p.to)))..........
4580 20 20 20 20 20 20 20 22 2d 71 22 20 22 2d 51 22 29 29 0a 20 20 20 20 20 20 3b 3b 20 57 68 65 6e ......."-q"."-Q")).......;;.When
45a0 20 66 61 69 6c 75 72 65 73 20 68 61 76 65 20 62 65 65 6e 20 70 72 69 6e 74 65 64 20 74 6f 20 64 .failures.have.been.printed.to.d
45c0 69 72 65 64 20 6c 6f 67 20 61 64 64 20 74 68 65 20 64 61 74 65 20 61 74 20 62 6f 62 2e 0a 20 20 ired.log.add.the.date.at.bob....
45e0 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 66 61 69 6c 75 72 65 73 20 73 6b 69 70 70 65 64 29 20 ....(when.(or.failures.skipped).
4600 28 64 69 72 65 64 2d 6c 6f 67 20 74 29 29 0a 20 20 20 20 20 20 3b 3b 20 57 68 65 6e 20 61 73 79 (dired-log.t)).......;;.When.asy
4620 6e 63 2d 66 6e 2d 6c 69 73 74 20 69 73 20 65 6d 70 74 79 20 74 68 61 74 27 73 20 6d 65 61 6e 20 nc-fn-list.is.empty.that's.mean.
4640 6f 6e 6c 79 20 6f 6e 65 20 66 69 6c 65 0a 20 20 20 20 20 20 3b 3b 20 68 61 64 20 74 6f 20 62 65 only.one.file.......;;.had.to.be
4660 20 63 6f 70 69 65 64 20 61 6e 64 20 75 73 65 72 20 66 69 6e 61 6c 6c 79 20 61 6e 73 77 65 72 20 .copied.and.user.finally.answer.
4680 4e 4f 2e 0a 20 20 20 20 20 20 3b 3b 20 49 6e 20 74 68 69 73 20 63 61 73 65 20 61 73 79 6e 63 20 NO........;;.In.this.case.async.
46a0 70 72 6f 63 65 73 73 20 77 69 6c 6c 20 6e 65 76 65 72 20 73 74 61 72 74 20 61 6e 64 20 63 61 6c process.will.never.start.and.cal
46c0 6c 62 61 63 6b 0a 20 20 20 20 20 20 3b 3b 20 77 69 6c 6c 20 68 61 76 65 20 6e 6f 20 63 68 61 6e lback.......;;.will.have.no.chan
46e0 63 65 20 74 6f 20 72 75 6e 2c 20 73 6f 20 6e 6f 74 69 66 79 20 66 61 69 6c 75 72 65 73 20 68 65 ce.to.run,.so.notify.failures.he
4700 72 65 2e 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a re........(unless.async-fn-list.
4720 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 66 61 69 6c 75 72 65 73 0a 20 20 20 20 20 20 20 20 ........(cond.(failures.........
4740 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 .......(funcall.dired-async-mess
4760 61 67 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 age-function....................
4780 20 20 20 20 20 22 25 73 20 66 61 69 6c 65 64 20 66 6f 72 20 25 64 20 6f 66 20 25 64 20 66 69 6c ....."%s.failed.for.%d.of.%d.fil
47a0 65 25 73 20 2d 2d 20 53 65 65 20 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 e%s.--.See.*Dired.log*.buffer"..
47c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 .......................'dired-as
47e0 79 6e 63 2d 66 61 69 6c 75 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ync-failures....................
4800 20 20 20 20 20 6f 70 65 72 61 74 69 6f 6e 20 28 6c 65 6e 67 74 68 20 66 61 69 6c 75 72 65 73 29 .....operation.(length.failures)
4820 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 74 61 6c 20 28 .........................total.(
4840 64 69 72 65 64 2d 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 dired-plural-s.total))).........
4860 20 20 20 20 20 20 28 73 6b 69 70 70 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 ......(skipped................(f
4880 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 66 75 6e 63 74 uncall.dired-async-message-funct
48a0 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 73 3a ion........................."%s:
48c0 20 25 64 20 6f 66 20 25 64 20 66 69 6c 65 25 73 20 73 6b 69 70 70 65 64 20 2d 2d 20 53 65 65 20 .%d.of.%d.file%s.skipped.--.See.
48e0 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 *Dired.log*.buffer".............
4900 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c 75 72 65 ............'dired-async-failure
4920 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 70 65 72 61 74 s.........................operat
4940 69 6f 6e 20 28 6c 65 6e 67 74 68 20 73 6b 69 70 70 65 64 29 20 74 6f 74 61 6c 0a 20 20 20 20 20 ion.(length.skipped).total......
4960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 70 6c 75 72 61 6c ...................(dired-plural
4980 2d 73 20 74 6f 74 61 6c 29 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 53 65 74 75 70 20 63 61 6c -s.total))))).......;;.Setup.cal
49a0 6c 62 61 63 6b 2e 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 lback........(setq.callback.....
49c0 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 67 6e 6f ........(lambda.(&optional._igno
49e0 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 61 re)...............(dired-async-a
4a00 66 74 65 72 2d 66 69 6c 65 2d 63 72 65 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fter-file-create................
4a20 74 6f 74 61 6c 20 28 6c 69 73 74 20 6f 70 65 72 61 74 69 6f 6e 20 28 6c 65 6e 67 74 68 20 61 73 total.(list.operation.(length.as
4a40 79 6e 63 2d 66 6e 2d 6c 69 73 74 29 29 20 66 61 69 6c 75 72 65 73 20 73 6b 69 70 70 65 64 29 0a ync-fn-list)).failures.skipped).
4a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d 20 28 64 6f ..............(when.(string=.(do
4a80 77 6e 63 61 73 65 20 6f 70 65 72 61 74 69 6f 6e 29 20 22 72 65 6e 61 6d 65 22 29 0a 20 20 20 20 wncase.operation)."rename").....
4aa0 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 66 69 6c 65 20 2e ............(cl-loop.for.(file..
4ac0 20 74 6f 29 20 69 6e 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 .to).in.async-fn-list...........
4ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 62 66 20 3d 20 28 67 65 74 2d 66 69 6c ...............for.bf.=.(get-fil
4b00 65 2d 62 75 66 66 65 72 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-buffer.file)..................
4b20 20 20 20 20 20 20 20 20 66 6f 72 20 64 65 73 74 70 20 3d 20 28 66 69 6c 65 2d 65 78 69 73 74 73 ........for.destp.=.(file-exists
4b40 2d 70 20 74 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -p.to)..........................
4b60 64 6f 20 28 61 6e 64 20 62 66 20 64 65 73 74 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 do.(and.bf.destp................
4b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d ..................(with-current-
4ba0 62 75 66 66 65 72 20 62 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 buffer.bf.......................
4bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6e .............(set-visited-file-n
4be0 61 6d 65 20 74 6f 20 74 20 74 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 ame.to.t.t))))))).......(let.((d
4c00 69 72 70 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 74 6f 29 29 0a 20 20 20 20 20 irp.(file-directory-p.to))......
4c20 20 20 20 20 20 20 20 28 64 65 73 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 .......(dest.(file-name-director
4c40 79 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 6f 75 6e 64 70 20 27 64 y.to))).........(when.(boundp.'d
4c60 69 72 65 64 2d 63 72 65 61 74 65 2d 64 65 73 74 69 6e 61 74 69 6f 6e 2d 64 69 72 73 29 0a 20 20 ired-create-destination-dirs)...
4c80 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 72 65 61 74 65 2d 64 69 72 0a 20 20 20 20 20 20 20 ........(setq.create-dir........
4ca0 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 73 65 20 64 69 72 65 64 2d 63 72 65 61 74 65 2d 64 .........(cl-case.dired-create-d
4cc0 65 73 74 69 6e 61 74 69 6f 6e 2d 64 69 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 estination-dirs.................
4ce0 20 20 28 61 6c 77 61 79 73 20 27 61 6c 77 61 79 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(always.'always)..............
4d00 20 20 20 20 20 28 61 73 6b 20 28 61 6e 64 20 28 6e 75 6c 6c 20 64 69 72 70 29 0a 20 20 20 20 20 .....(ask.(and.(null.dirp)......
4d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 20 28 66 69 .......................(null.(fi
4d40 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 64 65 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 le-directory-p.dest))...........
4d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 79 2d 6f 72 2d 6e 2d 70 20 28 66 6f 72 ..................(y-or-n-p.(for
4d80 6d 61 74 20 22 43 72 65 61 74 65 20 64 69 72 65 63 74 6f 72 79 20 60 25 73 27 3f 20 22 20 64 65 mat."Create.directory.`%s'?.".de
4da0 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 61 6c st)))........................'al
4dc0 77 61 79 73 29 29 29 29 29 29 0a 20 20 20 20 3b 3b 20 53 74 61 72 74 20 61 73 79 6e 63 20 70 72 ways)))))).....;;.Start.async.pr
4de0 6f 63 65 73 73 2e 0a 20 20 20 20 28 77 68 65 6e 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 ocess......(when.async-fn-list..
4e00 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 70 75 74 0a 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d .....(process-put........(async-
4e20 73 74 61 72 74 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 start.`(lambda.()...............
4e40 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 20 28 72 65 71 75 .........(require.'cl-lib).(requ
4e60 69 72 65 20 27 64 69 72 65 64 2d 61 75 78 29 20 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d ire.'dired-aux).(require.'dired-
4e80 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e x)........................,(asyn
4ea0 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 65 c-inject-variables.dired-async-e
4ec0 6e 76 2d 76 61 72 69 61 62 6c 65 73 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 nv-variables-regexp)............
4ee0 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 20 23 27 66 69 6c 65 73 2d ............(advice-add.#'files-
4f00 2d 61 73 6b 2d 75 73 65 72 2d 61 62 6f 75 74 2d 6c 61 72 67 65 2d 66 69 6c 65 0a 20 20 20 20 20 -ask-user-about-large-file......
4f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f ..............................:o
4f40 76 65 72 72 69 64 65 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 61 72 67 73 29 20 6e 69 6c verride.(lambda.(&rest.args).nil
4f60 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 ))........................(let.(
4f80 28 64 69 72 65 64 2d 72 65 63 75 72 73 69 76 65 2d 63 6f 70 69 65 73 20 28 71 75 6f 74 65 20 61 (dired-recursive-copies.(quote.a
4fa0 6c 77 61 79 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lways)).........................
4fc0 20 20 20 20 20 28 64 69 72 65 64 2d 63 6f 70 79 2d 70 72 65 73 65 72 76 65 2d 74 69 6d 65 0a 20 .....(dired-copy-preserve-time..
4fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 64 69 .............................,di
5000 72 65 64 2d 63 6f 70 79 2d 70 72 65 73 65 72 76 65 2d 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 red-copy-preserve-time).........
5020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 63 72 65 61 .....................(dired-crea
5040 74 65 2d 64 65 73 74 69 6e 61 74 69 6f 6e 2d 64 69 72 73 20 27 2c 63 72 65 61 74 65 2d 64 69 72 te-destination-dirs.',create-dir
5060 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 )..............................a
5080 75 74 68 2d 73 6f 75 72 63 65 2d 73 61 76 65 2d 62 65 68 61 76 69 6f 72 29 0a 20 20 20 20 20 20 uth-source-save-behavior).......
50a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6f 76 65 72 77 72 69 ...................(setq.overwri
50c0 74 65 2d 62 61 63 6b 75 70 2d 71 75 65 72 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 te-backup-query.nil)............
50e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 6e 6c 69 6e 65 20 60 62 61 63 6b 75 70 2d ..............;;.Inline.`backup-
5100 66 69 6c 65 27 20 61 73 20 6c 6f 6e 67 20 61 73 20 69 74 20 69 73 20 6e 6f 74 0a 20 20 20 20 20 file'.as.long.as.it.is.not......
5120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 76 61 69 6c 61 62 6c 65 ....................;;.available
5140 20 69 6e 20 65 6d 61 63 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .in.emacs.......................
5160 20 20 20 20 28 64 65 66 61 6c 69 61 73 20 27 62 61 63 6b 75 70 2d 66 69 6c 65 0a 20 20 20 20 20 ....(defalias.'backup-file......
5180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 61 6d 65 20 66 65 ......................;;.Same.fe
51a0 61 74 75 72 65 20 61 73 20 22 63 70 20 2d 66 20 2d 2d 62 61 63 6b 75 70 3d 6e 75 6d 62 65 72 65 ature.as."cp.-f.--backup=numbere
51c0 64 20 66 72 6f 6d 20 74 6f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d.from.to"......................
51e0 20 20 20 20 20 20 3b 3b 20 53 79 6d 6c 69 6e 6b 73 20 61 72 65 20 63 6f 70 69 65 64 20 61 73 20 ......;;.Symlinks.are.copied.as.
5200 66 69 6c 65 20 66 72 6f 6d 20 73 6f 75 72 63 65 20 75 6e 6c 69 6b 65 0a 20 20 20 20 20 20 20 20 file.from.source.unlike.........
5220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 64 69 72 65 64 2d 63 6f 70 ...................;;.`dired-cop
5240 79 2d 66 69 6c 65 27 20 77 68 69 63 68 20 69 73 20 73 61 6d 65 20 61 73 20 63 70 20 2d 64 2e 0a y-file'.which.is.same.as.cp.-d..
5260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 69 ...........................;;.Di
5280 72 65 63 74 6f 72 69 65 73 20 61 72 65 20 6f 6d 69 74 74 65 64 2e 0a 20 20 20 20 20 20 20 20 20 rectories.are.omitted...........
52a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 66 72 6f 6d 20 ..................(lambda.(from.
52c0 74 6f 20 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 to.ok)..........................
52e0 20 20 20 20 28 63 6f 6e 64 20 28 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 66 72 6f ....(cond.((file-directory-p.fro
5300 6d 29 20 28 69 67 6e 6f 72 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 m).(ignore))....................
5320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6c 65 74 20 28 28 63 6f 75 6e 74 20 ................(t.(let.((count.
5340 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0)).............................
5360 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6c 65 74 20 28 28 61 74 74 72 73 20 ............(while.(let.((attrs.
5380 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 (file-attributes.to)))..........
53a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
53c0 20 20 20 20 20 20 20 20 28 61 6e 64 20 61 74 74 72 73 20 28 6e 75 6c 6c 20 28 6e 74 68 20 30 20 ........(and.attrs.(null.(nth.0.
53e0 61 74 74 72 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 attrs)))).......................
5400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 63 6f 75 ....................(cl-incf.cou
5420 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nt).............................
5440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 6f 20 28 63 6f 6e 63 61 74 20 28 ..............(setq.to.(concat.(
5460 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 76 65 72 73 69 6f 6e 73 20 74 6f 29 0a 20 20 20 20 file-name-sans-versions.to).....
5480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
54a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 .......................(format."
54c0 2e 7e 25 73 7e 22 20 63 6f 75 6e 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .~%s~".count)))))...............
54e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 ........................(conditi
5500 6f 6e 2d 63 61 73 65 20 65 72 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 on-case.err.....................
5520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 70 79 2d 66 69 6c 65 ......................(copy-file
5540 20 66 72 6f 6d 20 74 6f 20 6f 6b 20 64 69 72 65 64 2d 63 6f 70 79 2d 70 72 65 73 65 72 76 65 2d .from.to.ok.dired-copy-preserve-
5560 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 time)...........................
5580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 64 61 74 65 2d 65 72 72 6f 72 0a 20 ..............(file-date-error..
55a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
55c0 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6c 6f 67 20 22 43 61 6e 27 74 20 73 65 74 20 64 61 ........(dired-log."Can't.set.da
55e0 74 65 20 6f 6e 20 25 73 3a 5c 6e 25 73 5c 6e 22 20 66 72 6f 6d 20 65 72 72 29 29 29 29 29 29 29 te.on.%s:\n%s\n".from.err)))))))
5600 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4e 6f 77 ..........................;;.Now
5620 20 72 75 6e 20 74 68 65 20 46 49 4c 45 2d 43 52 45 41 54 4f 52 20 66 75 6e 63 74 69 6f 6e 20 6f .run.the.FILE-CREATOR.function.o
5640 6e 20 66 69 6c 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n.files.........................
5660 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 66 6e 20 3d 20 28 71 75 6f 74 65 20 2c 66 69 6c ..(cl-loop.with.fn.=.(quote.,fil
5680 65 2d 63 72 65 61 74 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-creator)......................
56a0 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 66 72 6f 6d 20 2e 20 64 65 73 74 29 20 69 .............for.(from...dest).i
56c0 6e 20 28 71 75 6f 74 65 20 2c 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 n.(quote.,async-fn-list)........
56e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 63 ...........................do.(c
5700 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 65 72 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ondition-case.err...............
5720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 ...........................(func
5740 61 6c 6c 20 66 6e 20 66 72 6f 6d 20 64 65 73 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 all.fn.from.dest.t).............
5760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 ...........................(file
5780 2d 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -error..........................
57a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6c 6f 67 20 22 25 73 3a 20 25 ...............(dired-log."%s:.%
57c0 73 5c 6e 22 20 28 63 61 72 20 65 72 72 29 20 28 63 64 72 20 65 72 72 29 29 0a 20 20 20 20 20 20 s\n".(car.err).(cdr.err)).......
57e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5800 20 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..nil)))........................
5820 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 64 69 72 65 64 2d 6c 6f 67 2d 62 75 ..(when.(get-buffer.dired-log-bu
5840 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ffer)...........................
5860 20 28 64 69 72 65 64 2d 6c 6f 67 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(dired-log.t)..................
5880 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 64 ..........(with-current-buffer.d
58a0 69 72 65 64 2d 6c 6f 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ired-log-buffer.................
58c0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e .............(write-region.(poin
58e0 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 t-min).(point-max)..............
5900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 64 ..............................,d
5920 69 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 ired-async-log-file)))).........
5940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 61 79 ...............,(dired-async-may
5960 62 65 2d 6b 69 6c 6c 2d 66 74 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 be-kill-ftp))...................
5980 20 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d ..callback)........'dired-async-
59a0 70 72 6f 63 65 73 73 20 74 29 0a 20 20 20 20 20 20 3b 3b 20 52 75 6e 20 6d 6f 64 65 2d 6c 69 6e process.t).......;;.Run.mode-lin
59c0 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 77 68 69 6c 65 20 70 72 6f 63 65 73 73 20 72 75 e.notifications.while.process.ru
59e0 6e 6e 69 6e 67 2e 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d 6f 64 65 6c nning........(dired-async--model
5a00 69 6e 65 2d 6d 6f 64 65 20 31 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 70 ine-mode.1).......(message."%s.p
5a20 72 6f 63 65 65 64 69 6e 67 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 2e 2e 22 20 6f 70 65 roceeding.asynchronously...".ope
5a40 72 61 74 69 6f 6e 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 77 64 69 72 65 64 2d 75 73 65 2d 69 ration))))..(defvar.wdired-use-i
5a60 6e 74 65 72 61 63 74 69 76 65 2d 72 65 6e 61 6d 65 29 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d nteractive-rename).(defun.dired-
5a80 61 73 79 6e 63 2d 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 73 20 28 6f 6c 64 2d 66 6e 20 async-wdired-do-renames.(old-fn.
5aa0 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 3b 3b 20 50 65 72 68 61 70 73 20 61 20 62 65 74 74 65 &rest.args)...;;.Perhaps.a.bette
5ac0 72 20 66 69 78 20 77 6f 75 6c 64 20 62 65 20 74 6f 20 61 73 6b 20 66 6f 72 20 72 65 6e 61 6d 69 r.fix.would.be.to.ask.for.renami
5ae0 6e 67 20 42 45 46 4f 52 45 20 73 74 61 72 74 69 6e 67 0a 20 20 3b 3b 20 4f 4c 44 2d 46 4e 20 77 ng.BEFORE.starting...;;.OLD-FN.w
5b00 68 65 6e 20 60 77 64 69 72 65 64 2d 75 73 65 2d 69 6e 74 65 72 61 63 74 69 76 65 2d 72 65 6e 61 hen.`wdired-use-interactive-rena
5b20 6d 65 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 20 20 46 6f 72 20 6e 6f 77 0a 20 20 3b 3b 20 6a 75 me'.is.non-nil...For.now...;;.ju
5b40 73 74 20 62 69 6e 64 20 69 74 20 74 6f 20 6e 69 6c 20 74 6f 20 65 6e 73 75 72 65 20 6e 6f 20 71 st.bind.it.to.nil.to.ensure.no.q
5b60 75 65 73 74 69 6f 6e 73 20 77 69 6c 6c 20 62 65 20 61 73 6b 65 64 20 62 65 74 77 65 65 6e 0a 20 uestions.will.be.asked.between..
5b80 20 3b 3b 20 65 61 63 68 20 72 65 6e 61 6d 65 2e 0a 20 20 28 6c 65 74 20 28 77 64 69 72 65 64 2d .;;.each.rename....(let.(wdired-
5ba0 75 73 65 2d 69 6e 74 65 72 61 63 74 69 76 65 2d 72 65 6e 61 6d 65 29 0a 20 20 20 20 28 61 70 70 use-interactive-rename).....(app
5bc0 6c 79 20 6f 6c 64 2d 66 6e 20 61 72 67 73 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 ly.old-fn.args)))..;;;###autoloa
5be0 64 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 64 69 72 65 64 2d 61 73 79 6e 63 d.(define-minor-mode.dired-async
5c00 2d 6d 6f 64 65 0a 20 20 22 44 6f 20 64 69 72 65 64 20 61 63 74 69 6f 6e 73 20 61 73 79 6e 63 68 -mode..."Do.dired.actions.asynch
5c20 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 3a 6c 69 67 68 74 65 72 20 64 69 72 65 64 2d 61 73 79 6e ronously."...:lighter.dired-asyn
5c40 63 2d 6d 6f 64 65 2d 6c 69 67 68 74 65 72 0a 20 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 69 66 c-mode-lighter...:global.t...(if
5c60 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 .dired-async-mode.......(progn..
5c80 20 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 20 27 64 69 72 65 64 2d 63 72 65 61 74 65 .......(advice-add.'dired-create
5ca0 2d 66 69 6c 65 73 20 3a 61 72 6f 75 6e 64 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6d -files.:around.#'dired-async--sm
5cc0 61 72 74 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 28 61 64 76 69 63 art-create-files).........(advic
5ce0 65 2d 61 64 64 20 27 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 73 20 3a 61 72 6f 75 6e 64 e-add.'wdired-do-renames.:around
5d00 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 73 .#'dired-async-wdired-do-renames
5d20 29 29 0a 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 72 65 6d 6f )).....(progn.......(advice-remo
5d40 76 65 20 27 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 20 23 27 64 69 72 65 64 2d 61 ve.'dired-create-files.#'dired-a
5d60 73 79 6e 63 2d 2d 73 6d 61 72 74 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 sync--smart-create-files).......
5d80 28 61 64 76 69 63 65 2d 72 65 6d 6f 76 65 20 27 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 (advice-remove.'wdired-do-rename
5da0 73 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 s.#'dired-async-wdired-do-rename
5dc0 73 29 29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 77 69 s))))..(defmacro.dired-async--wi
5de0 74 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 20 28 26 72 65 73 74 20 62 6f 64 th-async-create-files.(&rest.bod
5e00 79 29 0a 20 20 22 45 76 61 6c 75 61 74 65 20 42 4f 44 59 20 77 69 74 68 20 e2 80 98 64 69 72 65 y)..."Evaluate.BODY.with....dire
5e20 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 e2 80 99 20 73 65 74 20 74 6f 20 e2 80 98 64 69 72 65 d-create-files....set.to....dire
5e40 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 e2 80 99 2e 22 0a 20 20 28 64 65 63 d-async-create-files...."...(dec
5e60 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 30 29 29 0a 20 20 60 28 63 6c 2d 6c 65 74 66 20 28 28 28 lare.(indent.0))...`(cl-letf.(((
5e80 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 symbol-function.'dired-create-fi
5ea0 6c 65 73 29 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 29 les).#'dired-async-create-files)
5ec0 29 0a 20 20 20 20 20 2c 40 62 6f 64 79 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a )......,@body))..;;;###autoload.
5ee0 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 63 6f 70 79 20 28 26 6f 70 74 (defun.dired-async-do-copy.(&opt
5f00 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 64 69 72 65 64 2d 64 6f 2d 63 6f ional.arg)..."Run....dired-do-co
5f20 70 79 e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 py....asynchronously."...(intera
5f40 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 77 69 74 68 2d ctive."P")...(dired-async--with-
5f60 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 28 64 69 72 65 64 2d 64 6f 2d async-create-files....(dired-do-
5f80 63 6f 70 79 20 61 72 67 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 copy.arg)))..;;;###autoload.(def
5fa0 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 73 79 6d 6c 69 6e 6b 20 28 26 6f 70 74 69 un.dired-async-do-symlink.(&opti
5fc0 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 64 69 72 65 64 2d 64 6f 2d 73 79 6d onal.arg)..."Run....dired-do-sym
5fe0 6c 69 6e 6b e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 28 69 6e 74 65 link....asynchronously."...(inte
6000 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 77 69 74 ractive."P")...(dired-async--wit
6020 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 28 64 69 72 65 64 2d 64 h-async-create-files....(dired-d
6040 6f 2d 73 79 6d 6c 69 6e 6b 20 61 72 67 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 o-symlink.arg)))..;;;###autoload
6060 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 68 61 72 64 6c 69 6e 6b 20 .(defun.dired-async-do-hardlink.
6080 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 64 69 72 65 64 2d (&optional.arg)..."Run....dired-
60a0 64 6f 2d 68 61 72 64 6c 69 6e 6b e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a do-hardlink....asynchronously.".
60c0 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 61 73 79 ..(interactive."P")...(dired-asy
60e0 6e 63 2d 2d 77 69 74 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 28 nc--with-async-create-files....(
6100 64 69 72 65 64 2d 64 6f 2d 68 61 72 64 6c 69 6e 6b 20 61 72 67 29 29 29 0a 0a 3b 3b 3b 23 23 23 dired-do-hardlink.arg)))..;;;###
6120 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 72 autoload.(defun.dired-async-do-r
6140 65 6e 61 6d 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 ename.(&optional.arg)..."Run....
6160 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c dired-do-rename....asynchronousl
6180 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 y."...(interactive."P")...(dired
61a0 2d 61 73 79 6e 63 2d 2d 77 69 74 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a -async--with-async-create-files.
61c0 20 20 20 28 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 20 61 72 67 29 29 29 0a 0a 28 70 72 6f ...(dired-do-rename.arg)))..(pro
61e0 76 69 64 65 20 27 64 69 72 65 64 2d 61 73 79 6e 63 29 0a 0a 3b 3b 3b 20 64 69 72 65 64 2d 61 73 vide.'dired-async)..;;;.dired-as
6200 79 6e 63 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ync.el.ends.here................
6220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6400 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 45 61 73 6b 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.8/Eask................
6420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6460 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
6480 30 30 30 30 36 32 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 31 31 33 00 20 30 00 00 00 0000622.00000000000.012113..0...
64a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6500 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
6520 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
6540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6600 28 70 61 63 6b 61 67 65 20 22 61 73 79 6e 63 22 0a 20 20 20 20 20 20 20 20 20 22 31 2e 39 2e 37 (package."async".........."1.9.7
6620 22 0a 20 20 20 20 20 20 20 20 20 22 41 73 79 6e 63 68 72 6f 6e 6f 75 73 20 70 72 6f 63 65 73 73 ".........."Asynchronous.process
6640 69 6e 67 20 69 6e 20 45 6d 61 63 73 22 29 0a 0a 28 77 65 62 73 69 74 65 2d 75 72 6c 20 22 68 74 ing.in.Emacs")..(website-url."ht
6660 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 65 6d 61 63 73 2d tps://github.com/jwiegley/emacs-
6680 61 73 79 6e 63 22 29 0a 28 6b 65 79 77 6f 72 64 73 20 22 61 73 79 6e 63 22 29 0a 0a 28 70 61 63 async").(keywords."async")..(pac
66a0 6b 61 67 65 2d 66 69 6c 65 20 22 61 73 79 6e 63 2e 65 6c 22 29 0a 0a 28 66 69 6c 65 73 20 22 61 kage-file."async.el")..(files."a
66c0 73 79 6e 63 2e 65 6c 22 20 22 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2e 65 6c 22 20 22 2a 2d sync.el"."async-bytecomp.el"."*-
66e0 61 73 79 6e 63 2e 65 6c 22 29 0a 0a 28 73 63 72 69 70 74 20 22 74 65 73 74 22 20 22 65 63 68 6f async.el")..(script."test"."echo
6700 20 5c 22 45 72 72 6f 72 3a 20 6e 6f 20 74 65 73 74 20 73 70 65 63 69 66 69 65 64 5c 22 20 26 26 .\"Error:.no.test.specified\".&&
6720 20 65 78 69 74 20 31 22 29 0a 0a 28 73 6f 75 72 63 65 20 22 67 6e 75 22 29 0a 28 73 6f 75 72 63 .exit.1")..(source."gnu").(sourc
6740 65 20 22 6e 6f 6e 67 6e 75 22 29 0a 0a 28 64 65 70 65 6e 64 73 2d 6f 6e 20 22 65 6d 61 63 73 22 e."nongnu")..(depends-on."emacs"
6760 20 22 32 34 2e 34 22 29 0a 0a 28 64 65 76 65 6c 6f 70 6d 65 6e 74 0a 20 28 64 65 70 65 6e 64 73 ."24.4")..(development..(depends
6780 2d 6f 6e 20 22 62 75 74 74 65 72 63 75 70 22 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 -on."buttercup"))...............
67a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6800 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2d 74 65 73 74 2e 65 6c 00 00 00 00 00 00 00 async-1.9.8/async-test.el.......
6820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6860 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
6880 30 30 30 37 36 32 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 37 33 30 00 20 30 00 00 00 0007622.00000000000.013730..0...
68a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6900 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
6920 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
6940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a00 3b 3b 3b 20 61 73 79 6e 63 2d 74 65 73 74 2e 65 6c 20 2d 2d 2d 20 61 73 79 6e 63 2e 65 6c 2d 72 ;;;.async-test.el.---.async.el-r
6a20 65 6c 61 74 65 64 20 74 65 73 74 73 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e elated.tests..-*-.lexical-bindin
6a40 67 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 32 2d 32 g:t.-*-..;;.Copyright.(C).2012-2
6a60 30 32 32 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 022.Free.Software.Foundation,.In
6a80 63 2e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 68 6e 20 57 69 65 67 6c 65 79 20 3c 6a 77 69 c...;;.Author:.John.Wiegley.<jwi
6aa0 65 67 6c 65 79 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 31 30 20 egley@gmail.com>.;;.Created:.10.
6ac0 4a 75 6c 20 32 30 31 32 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 61 73 79 6e 63 0a 3b 3b 20 58 Jul.2012.;;.Keywords:.async.;;.X
6ae0 2d 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 -URL:.https://github.com/jwiegle
6b00 79 2f 65 6d 61 63 73 2d 61 73 79 6e 63 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 y/emacs-async..;;.This.program.i
6b20 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 s.free.software;.you.can.redistr
6b40 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 ibute.it.and/or.modify.;;.it.und
6b60 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 er.the.terms.of.the.GNU.General.
6b80 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b Public.License.as.published.by.;
6ba0 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 ;.the.Free.Software.Foundation,.
6bc0 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c either.version.3.of.the.License,
6be0 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 .or.;;.(at.your.option).any.late
6c00 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 r.version...;;.This.program.is.d
6c20 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 istributed.in.the.hope.that.it.w
6c40 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e ill.be.useful,.;;.but.WITHOUT.AN
6c60 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 Y.WARRANTY;.without.even.the.imp
6c80 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c lied.warranty.of.;;.MERCHANTABIL
6ca0 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 ITY.or.FITNESS.FOR.A.PARTICULAR.
6cc0 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c PURPOSE...See.the.;;.GNU.General
6ce0 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 .Public.License.for.more.details
6d00 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 ...;;.You.should.have.received.a
6d20 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 .copy.of.the.GNU.General.Public.
6d40 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 License.;;.along.with.this.progr
6d60 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e am...If.not,.see.<https://www.gn
6d80 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0c 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 u.org/licenses/>....;;;.Commenta
6da0 72 79 3a 0a 0a 3b 3b 20 43 6f 6e 74 61 69 6e 73 20 74 65 73 74 73 20 66 6f 72 20 61 6c 6c 20 74 ry:..;;.Contains.tests.for.all.t
6dc0 68 65 20 61 73 79 6e 63 20 6d 6f 64 75 6c 65 73 2e 0a 0c 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 he.async.modules....;;;.Code:..(
6de0 72 65 71 75 69 72 65 20 27 61 73 79 6e 63 29 0a 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 74 require.'async)...(defun.async-t
6e00 65 73 74 2d 31 20 28 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6d 65 73 73 est-1.()...(interactive)...(mess
6e20 61 67 65 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 31 2e 2e 2e 22 29 0a age."Starting.async-test-1...").
6e40 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 ..(async-start....;;.What.to.do.
6e60 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 28 6c 61 6d 62 64 61 20 in.the.child.process....(lambda.
6e80 28 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 69 73 20 61 20 74 65 73 74 ()......(message."This.is.a.test
6ea0 22 29 0a 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 33 29 0a 20 20 20 20 20 32 32 32 29 0a ")......(sleep-for.3)......222).
6ec0 0a 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 ....;;.What.to.do.when.it.finish
6ee0 65 73 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 28 6d 65 73 es....(lambda.(result)......(mes
6f00 73 61 67 65 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 sage."Async.process.done,.result
6f20 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 72 65 73 75 6c 74 29 29 29 0a 20 20 .should.be.222:.%s".result)))...
6f40 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 31 2e (message."Starting.async-test-1.
6f60 2e 2e 64 6f 6e 65 22 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 74 65 73 74 2d 32 20 28 ..done"))..(defun.async-test-2.(
6f80 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 53 74 )...(interactive)...(message."St
6fa0 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 32 2e 2e 2e 22 29 0a 20 20 28 6c 65 74 20 arting.async-test-2...")...(let.
6fc0 28 28 70 72 6f 63 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 ((proc.(async-start.............
6fe0 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 ...;;.What.to.do.in.the.child.pr
7000 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a ocess................(lambda.().
7020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 .................(message."This.
7040 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6c is.a.test")..................(sl
7060 65 65 70 2d 66 6f 72 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 32 32 29 eep-for.3)..................222)
7080 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 49 27 6d 20 67 6f 69 6e 67 20 74 6f 20 64 ))).....(message."I'm.going.to.d
70a0 6f 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 22 29 0a 20 20 20 20 3b 3b 20 2e 2e 2e 2e 0a 20 o.some.work.here").....;;.......
70c0 20 20 20 28 6d 65 73 73 61 67 65 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c ...(message."Async.process.done,
70e0 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 0a 20 20 20 20 20 .result.should.be.222:.%s"......
7100 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 67 65 74 20 70 72 6f 63 29 29 29 29 0a 0a 28 64 65 ........(async-get.proc))))..(de
7120 66 75 6e 20 61 73 79 6e 63 2d 74 65 73 74 2d 33 20 28 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 fun.async-test-3.()...(interacti
7140 76 65 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 ve)...(message."Starting.async-t
7160 65 73 74 2d 33 2e 2e 2e 22 29 0a 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 3b 3b 20 est-3...")...(async-start....;;.
7180 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a What.to.do.in.the.child.process.
71a0 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 ...(lambda.()......(message."Thi
71c0 73 20 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 33 29 s.is.a.test")......(sleep-for.3)
71e0 0a 20 20 20 20 20 28 65 72 72 6f 72 20 22 45 72 72 6f 72 20 69 6e 20 63 68 69 6c 64 20 70 72 6f ......(error."Error.in.child.pro
7200 63 65 73 73 22 29 0a 20 20 20 20 20 32 32 32 29 0a 0a 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 cess")......222).....;;.What.to.
7220 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 65 73 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 do.when.it.finishes....(lambda.(
7240 72 65 73 75 6c 74 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 41 73 79 6e 63 20 70 72 6f result)......(message."Async.pro
7260 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a cess.done,.result.should.be.222:
7280 20 25 73 22 20 72 65 73 75 6c 74 29 29 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 .%s".result)))...(message."Start
72a0 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 31 2e 2e 2e 64 6f 6e 65 22 29 29 0a 0a 28 64 65 66 ing.async-test-1...done"))..(def
72c0 75 6e 20 61 73 79 6e 63 2d 74 65 73 74 2d 34 20 28 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 un.async-test-4.()...(interactiv
72e0 65 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 e)...(message."Starting.async-te
7300 73 74 2d 34 2e 2e 2e 22 29 0a 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 st-4...")...(async-start-process
7320 20 22 73 6c 65 65 70 22 20 22 73 6c 65 65 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ."sleep"."sleep"................
7340 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 ........;;.What.to.do.when.it.fi
7360 6e 69 73 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c nishes........................(l
7380 61 6d 62 64 61 20 28 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ambda.(proc)....................
73a0 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 53 6c 65 65 70 20 64 6f 6e 65 2c 20 65 78 69 74 ......(message."Sleep.done,.exit
73c0 20 63 6f 64 65 20 77 61 73 20 25 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .code.was.%d"...................
73e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 ................(process-exit-st
7400 61 74 75 73 20 70 72 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 atus.proc)))....................
7420 20 20 20 20 22 33 22 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 69 6e 67 20 61 73 ...."3")...(message."Starting.as
7440 79 6e 63 2d 74 65 73 74 2d 34 2e 2e 2e 64 6f 6e 65 22 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 ync-test-4...done"))..(defun.asy
7460 6e 63 2d 74 65 73 74 2d 35 20 28 29 0a 20 20 22 54 65 73 74 20 63 6f 6d 6d 75 6e 69 63 61 74 69 nc-test-5.()..."Test.communicati
7480 6f 6e 20 62 65 74 77 65 65 6e 20 70 61 72 65 6e 74 20 61 6e 64 20 63 68 69 6c 64 2c 20 62 6f 74 on.between.parent.and.child,.bot
74a0 68 20 77 61 79 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6d 65 73 73 h.ways."...(interactive)...(mess
74c0 61 67 65 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 35 2e 2e 2e 22 29 0a age."Starting.async-test-5...").
74e0 20 20 28 6c 65 74 20 28 28 70 72 6f 63 0a 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 ..(let.((proc..........(async-st
7500 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 art...........;;.What.to.do.in.t
7520 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 he.child.process...........(lamb
7540 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 65 6e 64 20 6d 65 73 73 61 67 da.().............;;.Send.messag
7560 65 20 74 6f 20 70 61 72 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 e.to.parent.............(async-s
7580 65 6e 64 20 3a 68 65 6c 6c 6f 20 22 77 6f 72 6c 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 end.:hello."world").............
75a0 3b 3b 20 77 61 69 74 20 66 6f 72 20 61 20 6d 65 73 73 61 67 65 20 66 72 6f 6d 20 70 61 72 65 6e ;;.wait.for.a.message.from.paren
75c0 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 73 67 20 28 61 73 79 6e 63 2d t.............(let.((msg.(async-
75e0 72 65 63 65 69 76 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d receive)))...............(sleep-
7600 66 6f 72 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 for.3)...............(plist-get.
7620 6d 73 67 20 3a 72 65 73 75 6c 74 29 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 msg.:result)))............;;.Wha
7640 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 65 73 0a 20 20 20 20 20 20 20 t.to.do.when.it.finishes........
7660 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...(lambda.(result).............
7680 28 69 66 20 28 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 70 20 72 65 73 75 6c 74 29 0a 20 20 20 (if.(async-message-p.result)....
76a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 47 6f 74 20 68 65 6c 6c 6f .............(message."Got.hello
76c0 20 66 72 6f 6d 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 3a 20 25 73 22 0a 20 20 20 20 20 20 20 .from.child.process:.%s"........
76e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 72 65 73 ..................(plist-get.res
7700 75 6c 74 20 3a 68 65 6c 6c 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 ult.:hello))...............(mess
7720 61 67 65 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 age."Async.process.done,.result.
7740 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 should.be.222:.%s"..............
7760 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 29 29 29 29 29 29 0a 20 20 20 20 3b 3b 20 53 65 ..........result)))))).....;;.Se
7780 6e 64 20 6d 65 73 73 61 67 65 20 74 6f 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 20 nd.message.to.child.process.....
77a0 28 61 73 79 6e 63 2d 73 65 6e 64 20 70 72 6f 63 20 3a 72 65 73 75 6c 74 20 22 32 32 32 22 29 29 (async-send.proc.:result."222"))
77c0 0a 20 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 ...(message."Starting.async-test
77e0 2d 35 2e 2e 2e 64 6f 6e 65 22 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 74 65 73 74 2d -5...done"))..(defun.async-test-
7800 36 20 28 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6d 65 73 73 61 67 65 20 6.()...(interactive)...(message.
7820 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 36 2e 2e 2e 22 29 0a 20 20 28 61 "Starting.async-test-6...")...(a
7840 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 sync-start....;;.What.to.do.in.t
7860 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a he.child.process....`(lambda.().
7880 20 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 20 22 ......,(async-inject-variables."
78a0 5c 5c 60 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 5c 5c 27 22 29 0a 20 20 20 20 20 20 \\`user-mail-address\\'").......
78c0 28 66 6f 72 6d 61 74 20 22 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 20 3d 20 25 73 22 (format."user-mail-address.=.%s"
78e0 20 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 29 29 0a 0a 20 20 20 3b 3b 20 57 68 61 74 .user-mail-address)).....;;.What
7900 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 65 73 0a 20 20 20 28 6c 61 6d 62 .to.do.when.it.finishes....(lamb
7920 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 41 73 79 6e 63 da.(result)......(message."Async
7940 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 3a 20 25 73 22 20 72 65 73 75 6c 74 29 29 29 29 0a 0a 28 .process.done:.%s".result))))..(
7960 70 72 6f 76 69 64 65 20 27 61 73 79 6e 63 2d 74 65 73 74 29 0a 0a 3b 3b 3b 20 61 73 79 6e 63 2d provide.'async-test)..;;;.async-
7980 74 65 73 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 test.el.ends.here...............
79a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
79c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
79e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7a00 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 4d 61 6b 65 66 69 6c 65 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.8/Makefile............
7a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7a60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
7a80 30 30 30 33 36 30 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 37 35 31 00 20 30 00 00 00 0003605.00000000000.012751..0...
7aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7b00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
7b20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
7b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7c00 23 20 6d 61 6b 65 66 69 6c 65 20 66 6f 72 20 61 73 79 6e 63 2e 0a 0a 23 20 41 75 74 68 6f 72 3a #.makefile.for.async...#.Author:
7c20 20 54 68 69 65 72 72 79 20 56 6f 6c 70 69 61 74 74 6f 2e 0a 23 20 43 6f 70 79 72 69 67 68 74 20 .Thierry.Volpiatto..#.Copyright.
7c40 28 43 29 20 32 30 31 31 7e 32 30 32 32 2c 20 54 68 69 65 72 72 79 20 56 6f 6c 70 69 61 74 74 6f (C).2011~2022,.Thierry.Volpiatto
7c60 2c 20 61 6c 6c 20 72 69 67 68 74 73 20 72 65 73 65 72 76 65 64 2e 0a 0a 23 23 20 54 68 69 73 20 ,.all.rights.reserved...##.This.
7c80 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 0a 23 23 file.is.NOT.part.of.GNU.Emacs.##
7ca0 0a 23 23 20 4c 69 63 65 6e 73 65 0a 23 23 0a 23 23 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 .##.License.##.##.This.program.i
7cc0 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 s.free.software;.you.can.redistr
7ce0 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 23 23 20 69 74 20 75 6e 64 ibute.it.and/or.modify.##.it.und
7d00 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 er.the.terms.of.the.GNU.General.
7d20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 23 Public.License.as.published.by.#
7d40 23 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 #.the.Free.Software.Foundation;.
7d60 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 2c 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 either.version.3,.or.(at.your.op
7d80 74 69 6f 6e 29 0a 23 23 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 23 23 0a 23 tion).##.any.later.version..##.#
7da0 23 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e #.This.program.is.distributed.in
7dc0 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c .the.hope.that.it.will.be.useful
7de0 2c 0a 23 23 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 ,.##.but.WITHOUT.ANY.WARRANTY;.w
7e00 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 ithout.even.the.implied.warranty
7e20 20 6f 66 0a 23 23 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 .of.##.MERCHANTABILITY.or.FITNES
7e40 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 S.FOR.A.PARTICULAR.PURPOSE...See
7e60 20 74 68 65 0a 23 23 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e .the.##.GNU.General.Public.Licen
7e80 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 23 23 0a 23 23 20 59 6f 75 20 73 se.for.more.details..##.##.You.s
7ea0 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 hould.have.received.a.copy.of.th
7ec0 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 23 23 20 e.GNU.General.Public.License.##.
7ee0 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 3b 20 73 65 65 20 74 68 65 along.with.this.program;.see.the
7f00 20 66 69 6c 65 20 43 4f 50 59 49 4e 47 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 0a 23 23 20 3c .file.COPYING...If.not,.see.##.<
7f20 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a https://www.gnu.org/licenses/>..
7f40 0a 23 20 45 6d 61 63 73 20 69 6e 76 6f 63 61 74 69 6f 6e 0a 45 4d 41 43 53 5f 43 4f 4d 4d 41 4e .#.Emacs.invocation.EMACS_COMMAN
7f60 44 20 20 20 3a 3d 20 65 6d 61 63 73 0a 0a 45 4d 41 43 53 09 09 3a 3d 20 24 28 45 4d 41 43 53 5f D...:=.emacs..EMACS..:=.$(EMACS_
7f80 43 4f 4d 4d 41 4e 44 29 20 2d 51 20 2d 62 61 74 63 68 0a 0a 45 56 41 4c 20 3a 3d 20 24 28 45 4d COMMAND).-Q.-batch..EVAL.:=.$(EM
7fa0 41 43 53 29 20 2d 2d 65 76 61 6c 0a 0a 50 4b 47 44 49 52 20 3a 3d 20 2e 0a 0a 23 20 41 64 64 69 ACS).--eval..PKGDIR.:=....#.Addi
7fc0 74 69 6f 6e 61 6c 20 65 6d 61 63 73 20 6c 6f 61 64 70 61 74 68 0a 4c 4f 41 44 50 41 54 48 09 3a tional.emacs.loadpath.LOADPATH.:
7fe0 3d 20 2d 4c 20 2e 0a 0a 23 20 46 69 6c 65 73 20 74 6f 20 63 6f 6d 70 69 6c 65 0a 45 4c 09 09 09 =.-L....#.Files.to.compile.EL...
8000 3a 3d 20 24 28 73 6f 72 74 20 24 28 77 69 6c 64 63 61 72 64 20 2a 61 73 79 6e 63 2a 2e 65 6c 29 :=.$(sort.$(wildcard.*async*.el)
8020 29 0a 0a 23 20 43 6f 6d 70 69 6c 65 64 20 66 69 6c 65 73 0a 45 4c 43 09 09 09 3a 3d 20 24 28 45 )..#.Compiled.files.ELC...:=.$(E
8040 4c 3a 2e 65 6c 3d 2e 65 6c 63 29 0a 0a 0a 2e 50 48 4f 4e 59 3a 20 63 6c 65 61 6e 20 61 75 74 6f L:.el=.elc)....PHONY:.clean.auto
8060 6c 6f 61 64 73 20 62 61 74 63 68 2d 63 6f 6d 70 69 6c 65 20 69 6e 73 74 61 6c 6c 20 75 6e 69 6e loads.batch-compile.install.unin
8080 73 74 61 6c 6c 0a 0a 61 6c 6c 3a 20 63 6c 65 61 6e 20 61 75 74 6f 6c 6f 61 64 73 20 62 61 74 63 stall..all:.clean.autoloads.batc
80a0 68 2d 63 6f 6d 70 69 6c 65 0a 0a 24 28 45 4c 43 29 3a 20 25 2e 65 6c 63 3a 20 25 2e 65 6c 0a 09 h-compile..$(ELC):.%.elc:.%.el..
80c0 24 28 45 4d 41 43 53 29 20 24 28 4c 4f 41 44 50 41 54 48 29 20 2d 66 20 62 61 74 63 68 2d 62 79 $(EMACS).$(LOADPATH).-f.batch-by
80e0 74 65 2d 63 6f 6d 70 69 6c 65 20 24 3c 0a 0a 23 20 43 6f 6d 70 69 6c 65 20 6e 65 65 64 65 64 20 te-compile.$<..#.Compile.needed.
8100 66 69 6c 65 73 0a 63 6f 6d 70 69 6c 65 3a 20 24 28 45 4c 43 29 0a 0a 23 20 43 6f 6d 70 69 6c 65 files.compile:.$(ELC)..#.Compile
8120 20 61 6c 6c 20 66 69 6c 65 73 20 61 74 20 6f 6e 63 65 0a 62 61 74 63 68 2d 63 6f 6d 70 69 6c 65 .all.files.at.once.batch-compile
8140 3a 0a 09 24 28 45 4d 41 43 53 29 20 24 28 4c 4f 41 44 50 41 54 48 29 20 2d 66 20 62 61 74 63 68 :..$(EMACS).$(LOADPATH).-f.batch
8160 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 20 24 28 45 4c 29 0a 0a 23 20 52 65 6d 6f 76 65 20 61 6c -byte-compile.$(EL)..#.Remove.al
8180 6c 20 67 65 6e 65 72 61 74 65 64 20 66 69 6c 65 73 0a 63 6c 65 61 6e 3a 0a 09 72 6d 20 2d 66 20 l.generated.files.clean:..rm.-f.
81a0 24 28 45 4c 43 29 0a 0a 23 20 4d 61 6b 65 20 61 75 74 6f 6c 6f 61 64 73 20 66 69 6c 65 0a 61 75 $(ELC)..#.Make.autoloads.file.au
81c0 74 6f 6c 6f 61 64 73 3a 0a 09 24 28 45 56 41 4c 29 20 22 28 70 72 6f 67 6e 20 28 73 65 74 71 20 toloads:..$(EVAL)."(progn.(setq.
81e0 67 65 6e 65 72 61 74 65 64 2d 61 75 74 6f 6c 6f 61 64 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d generated-autoload-file.(expand-
8200 66 69 6c 65 2d 6e 61 6d 65 20 5c 22 61 73 79 6e 63 2d 61 75 74 6f 6c 6f 61 64 73 2e 65 6c 5c 22 file-name.\"async-autoloads.el\"
8220 20 5c 22 24 28 50 4b 47 44 49 52 29 5c 22 29 29 20 5c 0a 28 73 65 74 71 20 62 61 63 6b 75 70 2d .\"$(PKGDIR)\")).\.(setq.backup-
8240 69 6e 68 69 62 69 74 65 64 20 74 29 20 28 75 70 64 61 74 65 2d 64 69 72 65 63 74 6f 72 79 2d 61 inhibited.t).(update-directory-a
8260 75 74 6f 6c 6f 61 64 73 20 5c 22 24 28 50 4b 47 44 49 52 29 5c 22 29 29 22 0a 0a 50 52 45 46 49 utoloads.\"$(PKGDIR)\"))"..PREFI
8280 58 3d 2f 75 73 72 2f 6c 6f 63 61 6c 2f 73 68 61 72 65 2f 0a 44 45 53 54 44 49 52 3d 24 7b 50 52 X=/usr/local/share/.DESTDIR=${PR
82a0 45 46 49 58 7d 65 6d 61 63 73 2f 73 69 74 65 2d 6c 69 73 70 2f 65 6d 61 63 73 2d 61 73 79 6e 63 EFIX}emacs/site-lisp/emacs-async
82c0 2f 0a 69 6e 73 74 61 6c 6c 3a 0a 09 74 65 73 74 20 2d 64 20 24 7b 44 45 53 54 44 49 52 7d 20 7c /.install:..test.-d.${DESTDIR}.|
82e0 7c 20 6d 6b 64 69 72 20 24 7b 44 45 53 54 44 49 52 7d 0a 09 63 70 20 2d 76 66 20 2a 2e 65 6c 20 |.mkdir.${DESTDIR}..cp.-vf.*.el.
8300 24 28 44 45 53 54 44 49 52 29 0a 09 63 70 20 2d 76 66 20 2a 2e 65 6c 63 20 24 28 44 45 53 54 44 $(DESTDIR)..cp.-vf.*.elc.$(DESTD
8320 49 52 29 0a 09 63 70 20 2d 76 66 20 61 73 79 6e 63 2d 61 75 74 6f 6c 6f 61 64 73 2e 65 6c 20 24 IR)..cp.-vf.async-autoloads.el.$
8340 28 44 45 53 54 44 49 52 29 0a 0a 75 6e 69 6e 73 74 61 6c 6c 3a 0a 09 72 6d 20 2d 76 66 20 24 7b (DESTDIR)..uninstall:..rm.-vf.${
8360 44 45 53 54 44 49 52 7d 2a 2e 65 6c 63 0a 09 72 6d 20 2d 76 66 20 24 7b 44 45 53 54 44 49 52 7d DESTDIR}*.elc..rm.-vf.${DESTDIR}
8380 2a 2e 65 6c 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *.el............................
83a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8400 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 74 65 73 74 73 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.8/tests/..............
8420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8460 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
8480 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 34 34 37 00 20 35 00 00 00 0000000.00000000000.012447..5...
84a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8500 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
8520 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
8540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
85a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
85c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
85e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8600 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 74 65 73 74 73 2f 74 65 73 74 2d 61 73 79 6e 63 2e 65 6c 00 async-1.9.8/tests/test-async.el.
8620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
8680 30 30 32 35 32 31 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 37 30 00 20 30 00 00 00 0025215.00000000000.015070..0...
86a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
86c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
86e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
8720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
8740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
87a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
87c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
87e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8800 3b 3b 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 28 72 ;;.-*-.lexical-binding:.t.-*-.(r
8820 65 71 75 69 72 65 20 27 73 75 62 72 2d 78 29 0a 0a 28 72 65 71 75 69 72 65 20 27 62 75 74 74 65 equire.'subr-x)..(require.'butte
8840 72 63 75 70 29 0a 28 72 65 71 75 69 72 65 20 27 61 73 79 6e 63 29 0a 0a 28 64 65 73 63 72 69 62 rcup).(require.'async)..(describ
8860 65 20 22 41 73 79 6e 63 20 43 6f 72 65 22 0a 0a 20 20 28 64 65 73 63 72 69 62 65 20 22 52 75 6e e."Async.Core"....(describe."Run
8880 6e 69 6e 67 20 65 6d 61 63 73 20 6c 69 73 70 20 69 6e 20 61 20 73 75 62 70 72 6f 63 65 73 73 22 ning.emacs.lisp.in.a.subprocess"
88a0 0a 0a 20 20 20 20 28 69 74 20 22 73 68 6f 75 6c 64 20 65 78 65 63 75 74 65 20 66 75 6e 63 74 69 ......(it."should.execute.functi
88c0 6f 6e 20 69 6e 20 73 75 62 70 72 6f 63 65 73 73 20 61 6e 64 20 70 61 73 73 20 72 65 73 75 6c 74 on.in.subprocess.and.pass.result
88e0 20 62 61 63 6b 20 74 6f 20 70 61 72 65 6e 74 20 74 68 72 6f 75 67 68 20 61 20 63 61 6c 6c 62 61 .back.to.parent.through.a.callba
8900 63 6b 22 0a 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 ck"........(let.((messages.nil))
8920 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 .........(push."Starting.async-t
8940 65 73 74 2d 31 2e 2e 2e 22 20 6d 65 73 73 61 67 65 73 29 0a 0a 20 20 20 20 20 20 20 20 28 61 73 est-1...".messages)..........(as
8960 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f ync-start..........;;.What.to.do
8980 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 28 .in.the.child.process..........(
89a0 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 lambda.()............(message."T
89c0 68 69 73 20 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 his.is.a.test")............(slee
89e0 70 2d 66 6f 72 20 30 2e 35 29 0a 20 20 20 20 20 20 20 20 20 20 20 32 32 32 29 0a 0a 20 20 20 20 p-for.0.5)............222)......
8a00 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 .....;;.What.to.do.when.it.finis
8a20 68 65 73 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 hes..........(lambda.(result)...
8a40 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 .........(push.(format."Async.pr
8a60 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 ocess.done,.result.should.be.222
8a80 3a 20 25 73 22 20 72 65 73 75 6c 74 29 20 6d 65 73 73 61 67 65 73 29 29 29 0a 0a 20 20 20 20 20 :.%s".result).messages))).......
8aa0 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 31 2e ...(push."Starting.async-test-1.
8ac0 2e 2e 64 6f 6e 65 22 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 ..done".messages).........(sleep
8ae0 2d 66 6f 72 20 31 29 0a 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 73 74 72 69 6e 67 -for.1)..........(expect.(string
8b00 2d 6a 6f 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 67 65 73 29 20 22 5c 6e 22 29 0a -join.(nreverse.messages)."\n").
8b20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 61 6c 20 22 53 74 61 72 74 ................:to-equal."Start
8b40 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 31 2e 2e 2e 5c 6e 53 74 61 72 74 69 6e 67 20 61 73 ing.async-test-1...\nStarting.as
8b60 79 6e 63 2d 74 65 73 74 2d 31 2e 2e 2e 64 6f 6e 65 5c 6e 41 73 79 6e 63 20 70 72 6f 63 65 73 73 ync-test-1...done\nAsync.process
8b80 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 32 32 32 .done,.result.should.be.222:.222
8ba0 22 29 29 29 0a 0a 20 20 20 20 28 69 74 20 22 73 68 6f 75 6c 64 20 6c 65 74 20 74 68 65 20 75 73 ")))......(it."should.let.the.us
8bc0 65 72 20 64 6f 20 77 6f 72 6b 20 77 68 69 6c 65 20 73 75 62 70 72 6f 63 65 73 73 20 72 75 6e 73 er.do.work.while.subprocess.runs
8be0 20 61 6e 64 20 74 68 65 6e 20 77 61 69 74 20 66 6f 72 20 74 68 65 20 72 65 73 75 6c 74 22 0a 0a .and.then.wait.for.the.result"..
8c00 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 ......(let.((messages.nil)).....
8c20 20 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 32 ....(push."Starting.async-test-2
8c40 2e 2e 2e 22 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 ...".messages).........(let.((pr
8c60 6f 63 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 oc.(async-start.................
8c80 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 .....;;.What.to.do.in.the.child.
8ca0 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 process......................(la
8cc0 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 mbda.()........................(
8ce0 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 20 message."This.is.a.test").......
8d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 30 2e 35 29 .................(sleep-for.0.5)
8d20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 32 32 29 29 29 29 0a ........................222)))).
8d40 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 22 49 27 6d 20 67 6f 69 6e 67 20 74 6f 20 64 6f ..........(push."I'm.going.to.do
8d60 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 22 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 .some.work.here".messages)......
8d80 20 20 20 20 20 3b 3b 20 2e 2e 2e 2e 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 66 6f .....;;................(push.(fo
8da0 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 rmat."Async.process.done,.result
8dc0 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 28 61 73 79 6e 63 2d 67 65 74 20 70 .should.be.222:.%s".(async-get.p
8de0 72 6f 63 29 29 20 6d 65 73 73 61 67 65 73 29 29 0a 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 roc)).messages))..........(expec
8e00 74 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 67 65 t.(string-join.(nreverse.message
8e20 73 29 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 s)."\n").................:to-equ
8e40 61 6c 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 32 2e 2e 2e 5c 6e 49 27 al."Starting.async-test-2...\nI'
8e60 6d 20 67 6f 69 6e 67 20 74 6f 20 64 6f 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 5c 6e 41 73 m.going.to.do.some.work.here\nAs
8e80 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 ync.process.done,.result.should.
8ea0 62 65 20 32 32 32 3a 20 32 32 32 22 29 29 29 0a 0a 20 20 20 20 28 78 69 74 20 22 73 68 6f 75 6c be.222:.222")))......(xit."shoul
8ec0 64 20 61 6c 6c 6f 77 20 62 6f 74 68 20 61 20 63 61 6c 6c 62 61 63 6b 20 61 6e 64 20 61 73 79 6e d.allow.both.a.callback.and.asyn
8ee0 63 2d 67 65 74 20 66 6f 72 20 74 68 65 20 73 61 6d 65 20 66 75 74 75 72 65 22 0a 20 20 20 20 20 c-get.for.the.same.future"......
8f00 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 .(let.((messages.nil)).........(
8f20 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2e 2e 2e 22 20 6d 65 push."Starting.async-test...".me
8f40 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 63 20 28 61 73 79 ssages).........(let.((proc.(asy
8f60 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b nc-start......................;;
8f80 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 .What.to.do.in.the.child.process
8fa0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 ......................(lambda.()
8fc0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 ........................(sleep-f
8fe0 6f 72 20 30 2e 35 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 or.0.5)........................2
9000 32 32 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 22).......................(lambd
9020 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a.(result)......................
9040 20 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 72 65 73 75 6c 74 29 20 6d 65 73 ..(push.(format."%s".result).mes
9060 73 61 67 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 22 49 27 6d 20 sages)))))...........(push."I'm.
9080 67 6f 69 6e 67 20 74 6f 20 64 6f 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 22 20 6d 65 73 73 going.to.do.some.work.here".mess
90a0 61 67 65 73 29 0a 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 ages)............(push.(format."
90c0 61 73 79 6e 63 2d 67 65 74 3a 20 25 73 22 20 28 61 73 79 6e 63 2d 67 65 74 20 70 72 6f 63 29 29 async-get:.%s".(async-get.proc))
90e0 20 6d 65 73 73 61 67 65 73 29 29 0a 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 73 74 .messages))..........(expect.(st
9100 72 69 6e 67 2d 6a 6f 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 67 65 73 29 20 22 5c ring-join.(nreverse.messages)."\
9120 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 61 6c 20 22 53 n").................:to-equal."S
9140 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2e 2e 2e 5c 6e 49 27 6d 20 67 6f 69 6e 67 tarting.async-test...\nI'm.going
9160 20 74 6f 20 64 6f 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 5c 6e 32 32 32 5c 6e 61 73 79 6e .to.do.some.work.here\n222\nasyn
9180 63 2d 67 65 74 3a 20 32 32 32 22 29 29 29 0a 0a 20 20 20 20 28 69 74 20 22 73 68 6f 75 6c 64 20 c-get:.222")))......(it."should.
91a0 68 61 6e 64 6c 65 20 65 72 72 6f 72 73 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 handle.errors.in.the.child.proce
91c0 73 73 22 0a 0a 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 ss"........(expect.(progn.......
91e0 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a ..........(let.((messages.nil)).
9200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e ..................(push."Startin
9220 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 33 2e 2e 2e 22 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 g.async-test-3...".messages)....
9240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 ...............(async-start.....
9260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 ...............;;.What.to.do.in.
9280 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 the.child.process...............
92a0 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....(lambda.().................
92c0 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 69 73 20 61 20 74 65 73 74 22 29 0a .....(message."This.is.a.test").
92e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 .....................(sleep-for.
9300 30 2e 35 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 0.5)......................(error
9320 20 22 45 72 72 6f 72 20 69 6e 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 22 29 0a 20 20 20 20 20 ."Error.in.child.process")......
9340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 32 32 29 0a 0a 20 20 20 20 20 20 20 20 20 20 ................222)............
9360 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 .........;;.What.to.do.when.it.f
9380 69 6e 69 73 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 inishes....................(lamb
93a0 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 da.(result).....................
93c0 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f .(push.(format."Async.process.do
93e0 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 72 65 ne,.result.should.be.222:.%s".re
9400 73 75 6c 74 29 20 6d 65 73 73 61 67 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sult).messages)))...............
9420 20 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 33 ....(push."Starting.async-test-3
9440 2e 2e 2e 64 6f 6e 65 22 20 6d 65 73 73 61 67 65 73 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...done".messages)..............
9460 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 6e 72 65 76 ......(expect.(string-join.(nrev
9480 65 72 73 65 20 6d 65 73 73 61 67 65 73 29 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 erse.messages)."\n")............
94a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 61 6c 20 22 53 74 61 72 74 69 ...............:to-equal."Starti
94c0 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 33 2e 2e 2e 5c 6e 53 74 61 72 74 69 6e 67 20 61 73 79 ng.async-test-3...\nStarting.asy
94e0 6e 63 2d 74 65 73 74 2d 33 2e 2e 2e 64 6f 6e 65 22 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 nc-test-3...done")).............
9500 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .....(sleep-for.1)).............
9520 20 20 3a 74 6f 2d 74 68 72 6f 77 20 27 65 72 72 6f 72 29 29 0a 0a 20 20 20 20 28 69 74 20 22 73 ..:to-throw.'error))......(it."s
9540 68 6f 75 6c 64 20 68 61 6e 64 6c 65 20 75 6e 72 65 61 64 61 62 6c 65 20 66 6f 72 6d 73 20 69 6e hould.handle.unreadable.forms.in
9560 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 22 0a 0a 20 20 20 20 20 20 28 6c 65 74 20 28 .the.return.value"........(let.(
9580 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 (messages.nil)).........(let.((p
95a0 72 6f 63 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 roc.(async-start................
95c0 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 ......;;.What.to.do.in.the.child
95e0 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c .process......................(l
9600 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ambda.()........................
9620 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 (message."This.is.a.test")......
9640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 30 2e 31 ..................(sleep-for.0.1
9660 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 6e )........................(curren
9680 74 2d 62 75 66 66 65 72 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-buffer))......................
96a0 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 65 73 0a .;;.What.to.do.when.it.finishes.
96c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 .....................(lambda.(re
96e0 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 sult)........................(pu
9700 73 68 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 sh.(format."Async.process.done,.
9720 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 72 65 73 75 6c 74 result.should.be.222:.%s".result
9740 29 20 6d 65 73 73 61 67 65 73 29 29 29 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e ).messages)))))............(asyn
9760 63 2d 67 65 74 20 70 72 6f 63 29 0a 0a 20 20 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 c-get.proc)............(expect.(
9780 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 67 65 73 29 20 string-join.(nreverse.messages).
97a0 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 61 "\n")...................:to-equa
97c0 6c 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 l."Async.process.done,.result.sh
97e0 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 28 62 75 66 66 65 72 20 2a 73 63 72 61 74 63 68 2a 29 22 ould.be.222:.(buffer.*scratch*)"
9800 29 29 29 29 29 0a 0a 20 20 28 64 65 73 63 72 69 62 65 20 22 53 74 61 72 74 69 6e 67 20 6e 6f 6e )))))....(describe."Starting.non
9820 2d 65 6d 61 63 73 20 70 72 6f 63 65 73 73 22 0a 0a 20 20 20 20 28 69 74 20 22 73 68 6f 75 6c 64 -emacs.process"......(it."should
9840 20 73 74 61 72 74 20 61 20 70 72 6f 63 65 73 73 20 61 6e 64 20 72 65 74 75 72 6e 20 61 20 70 72 .start.a.process.and.return.a.pr
9860 6f 63 65 73 73 20 6f 62 6a 65 63 74 22 0a 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 ocess.object"........(let.((mess
9880 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 ages.nil)).........(push."Starti
98a0 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 34 2e 2e 2e 22 20 6d 65 73 73 61 67 65 73 29 0a 20 20 ng.async-test-4...".messages)...
98c0 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 22 73 6c 65 65 ......(async-start-process."slee
98e0 70 22 20 22 73 6c 65 65 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 p"."sleep"......................
9900 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 ........;;.What.to.do.when.it.fi
9920 6e 69 73 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nishes..........................
9940 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(lambda.(proc)..............
9960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 ..................(push.(format.
9980 22 53 6c 65 65 70 20 64 6f 6e 65 2c 20 65 78 69 74 20 63 6f 64 65 20 77 61 73 20 25 64 22 0a 20 "Sleep.done,.exit.code.was.%d"..
99a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
99c0 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 ............(process-exit-status
99e0 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .proc)).........................
9a00 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 65 73 73 61 67 65 73 29 29 0a 20 20 20 20 20 20 20 20 .............messages)).........
9a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 31 22 29 0a 20 20 20 20 20 20 ....................."1").......
9a40 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 34 2e 2e ..(push."Starting.async-test-4..
9a60 2e 64 6f 6e 65 22 20 6d 65 73 73 61 67 65 73 29 0a 0a 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 .done".messages)..........(sleep
9a80 2d 66 6f 72 20 31 2e 35 29 0a 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 73 74 72 69 -for.1.5)..........(expect.(stri
9aa0 6e 67 2d 6a 6f 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 67 65 73 29 20 22 5c 6e 22 ng-join.(nreverse.messages)."\n"
9ac0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 61 6c 20 22 53 74 61 ).................:to-equal."Sta
9ae0 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 34 2e 2e 2e 5c 6e 53 74 61 72 74 69 6e 67 20 rting.async-test-4...\nStarting.
9b00 61 73 79 6e 63 2d 74 65 73 74 2d 34 2e 2e 2e 64 6f 6e 65 5c 6e 53 6c 65 65 70 20 64 6f 6e 65 2c async-test-4...done\nSleep.done,
9b20 20 65 78 69 74 20 63 6f 64 65 20 77 61 73 20 30 22 29 29 29 29 0a 0a 20 20 28 64 65 73 63 72 69 .exit.code.was.0"))))....(descri
9b40 62 65 20 22 49 6e 74 65 72 70 72 6f 63 65 73 73 20 63 6f 6d 6d 75 6e 69 63 61 74 69 6f 6e 22 0a be."Interprocess.communication".
9b60 0a 20 20 20 20 28 69 74 20 22 73 68 6f 75 6c 64 20 62 65 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 .....(it."should.be.possible.to.
9b80 73 65 6e 64 20 61 6e 64 20 72 65 63 65 69 76 65 20 6d 65 73 73 61 67 65 73 20 62 65 74 77 65 65 send.and.receive.messages.betwee
9ba0 6e 20 70 61 72 65 6e 74 20 61 6e 64 20 63 68 69 6c 64 22 0a 0a 20 20 20 20 20 20 28 6c 65 74 20 n.parent.and.child"........(let.
9bc0 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 22 ((messages.nil)).........(push."
9be0 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 35 2e 2e 2e 22 20 6d 65 73 73 61 67 Starting.async-test-5...".messag
9c00 65 73 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 63 0a 20 20 20 20 20 20 20 20 es).........(let.((proc.........
9c20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 .......(async-start.............
9c40 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 ....;;.What.to.do.in.the.child.p
9c60 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 rocess.................(lambda.(
9c80 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 )...................(message."Th
9ca0 69 73 20 69 73 20 61 20 74 65 73 74 2c 20 73 65 6e 64 69 6e 67 20 6d 65 73 73 61 67 65 22 29 0a is.is.a.test,.sending.message").
9cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 65 6e 64 20 3a 68 ..................(async-send.:h
9ce0 65 6c 6c 6f 20 22 77 6f 72 6c 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ello."world")...................
9d00 3b 3b 20 77 61 69 74 20 66 6f 72 20 61 20 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 ;;.wait.for.a.message...........
9d20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 73 67 20 28 61 73 79 6e 63 2d 72 65 63 65 69 76 ........(let.((msg.(async-receiv
9d40 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 e))).....................(messag
9d60 65 20 22 43 68 69 6c 64 20 67 6f 74 20 6d 65 73 73 61 67 65 3a 20 25 73 22 0a 20 20 20 20 20 20 e."Child.got.message:.%s".......
9d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 .......................(plist-ge
9da0 74 20 6d 73 67 20 3a 67 6f 6f 64 62 79 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.msg.:goodbye)))...............
9dc0 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 30 2e 35 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ....(sleep-for.0.5).............
9de0 20 20 20 20 20 20 32 32 32 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 ......222)..................;;.W
9e00 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 65 73 0a 20 20 20 20 20 hat.to.do.when.it.finishes......
9e20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 ...........(lambda.(result).....
9e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 ..............(if.(async-message
9e60 2d 70 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -p.result)......................
9e80 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 47 6f 74 20 68 65 6c 6c 6f 20 66 72 6f 6d 20 63 .(push.(format."Got.hello.from.c
9ea0 68 69 6c 64 20 70 72 6f 63 65 73 73 3a 20 25 73 22 20 28 70 6c 69 73 74 2d 67 65 74 20 72 65 73 hild.process:.%s".(plist-get.res
9ec0 75 6c 74 20 3a 68 65 6c 6c 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ult.:hello))....................
9ee0 20 20 20 20 20 20 20 20 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .........messages)..............
9f00 20 20 20 20 20 20 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 .......(push.(format."Async.proc
9f20 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 ess.done,.result.should.be.222:.
9f40 25 73 22 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 %s".result).....................
9f60 20 20 20 20 20 20 6d 65 73 73 61 67 65 73 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 ......messages))))))...........(
9f80 61 73 79 6e 63 2d 73 65 6e 64 20 70 72 6f 63 20 3a 67 6f 6f 64 62 79 65 20 22 65 76 65 72 79 6f async-send.proc.:goodbye."everyo
9fa0 6e 65 22 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 ne")).........(push."Starting.as
9fc0 79 6e 63 2d 74 65 73 74 2d 35 2e 2e 2e 64 6f 6e 65 22 20 6d 65 73 73 61 67 65 73 29 0a 0a 20 20 ync-test-5...done".messages)....
9fe0 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 31 29 0a 0a 20 20 20 20 20 20 20 20 28 65 78 ......(sleep-for.1)..........(ex
a000 70 65 63 74 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 pect.(string-join.(nreverse.mess
a020 61 67 65 73 29 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d ages)."\n").................:to-
a040 65 71 75 61 6c 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 35 2e 2e 2e 5c equal."Starting.async-test-5...\
a060 6e 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 35 2e 2e 2e 64 6f 6e 65 5c 6e 47 nStarting.async-test-5...done\nG
a080 6f 74 20 68 65 6c 6c 6f 20 66 72 6f 6d 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 3a 20 77 6f 72 ot.hello.from.child.process:.wor
a0a0 6c 64 5c 6e 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 ld\nAsync.process.done,.result.s
a0c0 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 32 32 32 22 29 29 29 0a 0a 20 20 20 20 28 69 74 20 22 hould.be.222:.222")))......(it."
a0e0 63 68 69 6c 64 20 73 68 6f 75 6c 64 20 62 65 20 61 62 6c 65 20 74 6f 20 73 65 6e 64 20 72 65 61 child.should.be.able.to.send.rea
a100 6c 6c 79 20 6c 6f 6e 67 20 6d 65 73 73 61 67 65 73 20 74 6f 20 74 68 65 20 70 61 72 65 6e 74 20 lly.long.messages.to.the.parent.
a120 28 31 20 4d 42 29 22 0a 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e (1.MB)"........(let.((messages.n
a140 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 63 20 28 61 73 79 6e 63 2d il)).........(let.((proc.(async-
a160 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 start......................;;.Wh
a180 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 at.to.do.in.the.child.process...
a1a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 ...................(lambda.()...
a1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 65 6e 64 .....................(async-send
a1e0 20 3a 68 65 6c 6c 6f 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 31 30 34 38 35 37 36 20 3f 78 29 .:hello.(make-string.1048576.?x)
a200 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 0a 0a 20 20 20 )........................t).....
a220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 ..................;;.What.to.do.
a240 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 when.it.finishes................
a260 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 ......(lambda.(result)..........
a280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 ..............(if.(async-message
a2a0 2d 70 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -p.result)......................
a2c0 20 20 20 20 20 20 28 70 75 73 68 20 28 70 6c 69 73 74 2d 67 65 74 20 72 65 73 75 6c 74 20 3a 68 ......(push.(plist-get.result.:h
a2e0 65 6c 6c 6f 29 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ello).messages).................
a300 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 72 65 73 75 6c 74 20 6d 65 73 73 61 67 65 73 29 29 .........(push.result.messages))
a320 29 29 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 28 73 6c 65 65 70 2d 66 6f 72 20 30 2e 35 ))))............;;(sleep-for.0.5
a340 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 77 61 69 74 20 70 72 6f 63 29 0a 20 20 )...........(async-wait.proc)...
a360 20 20 20 20 20 20 20 20 29 0a 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 63 61 72 20 ........)..........(expect.(car.
a380 6d 65 73 73 61 67 65 73 29 20 3a 74 6f 2d 65 71 75 61 6c 20 74 29 0a 20 20 20 20 20 20 20 20 28 messages).:to-equal.t).........(
a3a0 65 78 70 65 63 74 20 28 63 61 64 72 20 6d 65 73 73 61 67 65 73 29 20 3a 74 6f 2d 65 71 75 61 6c expect.(cadr.messages).:to-equal
a3c0 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 31 30 34 38 35 37 36 20 3f 78 29 29 29 29 0a 0a 20 20 .(make-string.1048576.?x))))....
a3e0 20 20 3b 3b 20 77 69 6e 64 6f 77 73 20 70 72 6f 63 65 73 73 20 70 65 72 66 6f 72 6d 61 6e 63 65 ..;;.windows.process.performance
a400 20 69 73 20 68 6f 72 72 69 62 6c 65 20 73 6f 20 77 65 20 6e 65 65 64 20 74 6f 20 73 6b 69 70 0a .is.horrible.so.we.need.to.skip.
a420 20 20 20 20 3b 3b 20 74 68 69 73 20 61 73 20 69 74 20 74 61 6b 65 73 20 74 6f 6f 20 6d 75 63 68 ....;;.this.as.it.takes.too.much
a440 20 74 69 6d 65 2e 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 61 6e 64 20 28 65 71 20 73 79 73 74 .time......(unless.(and.(eq.syst
a460 65 6d 2d 74 79 70 65 20 27 77 69 6e 64 6f 77 73 2d 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 em-type.'windows-nt)............
a480 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 3c 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 22 32 ......(version<.emacs-version."2
a4a0 37 22 29 29 0a 20 20 20 20 20 20 28 69 74 20 22 63 68 69 6c 64 20 73 68 6f 75 6c 64 20 62 65 20 7")).......(it."child.should.be.
a4c0 61 62 6c 65 20 74 6f 20 73 65 6e 64 20 72 65 61 6c 6c 79 20 6c 6f 6e 67 20 6d 65 73 73 61 67 65 able.to.send.really.long.message
a4e0 73 20 74 6f 20 74 68 65 20 70 61 72 65 6e 74 20 28 31 30 20 4d 42 29 22 0a 0a 20 20 20 20 20 20 s.to.the.parent.(10.MB)"........
a500 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 ..(let.((messages.nil)).........
a520 20 20 28 6c 65 74 20 28 28 70 72 6f 63 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 ..(let.((proc.(async-start......
a540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 ..................;;.What.to.do.
a560 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 in.the.child.process............
a580 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 ............(lambda.()..........
a5a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 65 6e 64 20 3a 68 65 6c ................(async-send.:hel
a5c0 6c 6f 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 31 30 34 38 35 37 36 30 20 3f 78 29 29 0a 20 20 lo.(make-string.10485760.?x))...
a5e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 0a 0a 20 20 20 20 20 .......................t).......
a600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 ..................;;.What.to.do.
a620 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 when.it.finishes................
a640 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 ........(lambda.(result)........
a660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 73 79 6e 63 2d 6d 65 73 ..................(if.(async-mes
a680 73 61 67 65 2d 70 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sage-p.result)..................
a6a0 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 70 6c 69 73 74 2d 67 65 74 20 72 65 73 ............(push.(plist-get.res
a6c0 75 6c 74 20 3a 68 65 6c 6c 6f 29 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 ult.:hello).messages)...........
a6e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 72 65 73 75 6c 74 20 6d 65 .................(push.result.me
a700 73 73 61 67 65 73 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d ssages)))))).............(async-
a720 77 61 69 74 20 70 72 6f 63 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 wait.proc))............(expect.(
a740 63 61 72 20 6d 65 73 73 61 67 65 73 29 20 3a 74 6f 2d 65 71 75 61 6c 20 74 29 0a 20 20 20 20 20 car.messages).:to-equal.t)......
a760 20 20 20 20 20 28 65 78 70 65 63 74 20 28 63 61 64 72 20 6d 65 73 73 61 67 65 73 29 20 3a 74 6f .....(expect.(cadr.messages).:to
a780 2d 65 71 75 61 6c 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 31 30 34 38 35 37 36 30 20 3f 78 29 -equal.(make-string.10485760.?x)
a7a0 29 29 29 29 29 0a 0a 20 20 28 64 65 73 63 72 69 62 65 20 22 48 61 6e 64 6c 69 6e 67 20 70 72 6f )))))....(describe."Handling.pro
a7c0 63 65 73 73 20 62 75 66 66 65 72 73 22 0a 0a 20 20 20 20 28 69 74 20 22 73 68 6f 75 6c 64 20 61 cess.buffers"......(it."should.a
a7e0 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 6c 6f 73 65 20 73 74 64 6f 75 74 20 61 6e 64 20 73 74 utomatically.close.stdout.and.st
a800 64 65 72 72 20 62 75 66 66 65 72 20 77 68 65 6e 20 70 72 6f 63 65 73 73 20 65 78 69 74 73 22 0a derr.buffer.when.process.exits".
a820 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 .......(let.((messages.nil))....
a840 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 .....(async-start..........(lamb
a860 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 da.()............(message."This.
a880 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f is.a.test")............(sleep-fo
a8a0 72 20 30 2e 35 29 0a 20 20 20 20 20 20 20 20 20 20 20 32 32 32 29 0a 0a 20 20 20 20 20 20 20 20 r.0.5)............222)..........
a8c0 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 75 .(lambda.(result)............(pu
a8e0 73 68 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 sh.(format."Async.process.done,.
a900 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 72 65 73 75 6c 74 result.should.be.222:.%s".result
a920 29 20 6d 65 73 73 61 67 65 73 29 29 29 0a 0a 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f ).messages)))..........(sleep-fo
a940 72 20 31 29 0a 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 73 74 72 69 6e 67 2d 6a 6f r.1)..........(expect.(string-jo
a960 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 67 65 73 29 20 22 5c 6e 22 29 0a 20 20 20 in.(nreverse.messages)."\n")....
a980 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 61 6c 20 22 41 73 79 6e 63 20 70 72 .............:to-equal."Async.pr
a9a0 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 ocess.done,.result.should.be.222
a9c0 3a 20 32 32 32 22 29 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 63 6c 2d 66 69 6e 64 :.222").........(expect.(cl-find
a9e0 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 -if.(lambda.(x).(string-match-p.
aa00 22 65 6d 61 63 73 22 20 78 29 29 20 28 6d 61 70 63 61 72 20 23 27 62 75 66 66 65 72 2d 6e 61 6d "emacs".x)).(mapcar.#'buffer-nam
aa20 65 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e.(buffer-list)))...............
aa40 20 20 3a 74 6f 2d 62 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 63 ..:to-be.nil).........(expect.(c
aa60 6c 2d 66 69 6e 64 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 73 74 72 69 6e 67 2d 6d 61 l-find-if.(lambda.(x).(string-ma
aa80 74 63 68 2d 70 20 22 65 6d 61 63 73 3a 65 72 72 22 20 78 29 29 20 28 6d 61 70 63 61 72 20 23 27 tch-p."emacs:err".x)).(mapcar.#'
aaa0 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 29 0a 20 20 20 20 buffer-name.(buffer-list))).....
aac0 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 62 65 20 6e 69 6c 29 29 29 0a 0a 20 20 20 20 28 ............:to-be.nil)))......(
aae0 69 74 20 22 73 68 6f 75 6c 64 20 6b 65 65 70 20 73 74 64 6f 75 74 20 61 6e 64 20 73 74 64 65 72 it."should.keep.stdout.and.stder
ab00 72 20 62 75 66 66 65 72 20 77 68 65 6e 20 70 72 6f 63 65 73 73 20 65 78 69 74 73 20 69 66 20 64 r.buffer.when.process.exits.if.d
ab20 65 62 75 67 20 69 73 20 61 63 74 69 76 65 22 0a 0a 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 ebug.is.active"........(unwind-p
ab40 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 rotect...........(let.((messages
ab60 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 64 65 62 .nil).................(async-deb
ab80 75 67 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a ug.t)).............(async-start.
aba0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 .............(lambda.().........
abc0 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 69 73 20 61 20 74 65 73 74 22 .......(message."This.is.a.test"
abe0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 30 2e 35 29 )................(sleep-for.0.5)
ac00 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 32 32 29 0a 0a 20 20 20 20 20 20 20 20 20 20 ................222)............
ac20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...(lambda.(result).............
ac40 20 20 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 ...(push.(format."Async.process.
ac60 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 done,.result.should.be.222:.%s".
ac80 72 65 73 75 6c 74 29 20 6d 65 73 73 61 67 65 73 29 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 result).messages))).............
aca0 20 28 73 6c 65 65 70 2d 66 6f 72 20 31 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 .(sleep-for.1)..............(exp
acc0 65 63 74 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 ect.(string-join.(nreverse.messa
ace0 67 65 73 29 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a ges)."\n").....................:
ad00 74 6f 2d 65 71 75 61 6c 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 to-equal."Async.process.done,.re
ad20 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 32 32 32 22 29 0a 20 20 20 20 20 20 sult.should.be.222:.222").......
ad40 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 63 6c 2d 66 69 6e 64 2d 69 66 20 28 6c 61 6d 62 64 ......(expect.(cl-find-if.(lambd
ad60 61 20 28 78 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 65 6d 61 63 73 22 20 78 29 a.(x).(string-match-p."emacs".x)
ad80 29 20 28 6d 61 70 63 61 72 20 23 27 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d ).(mapcar.#'buffer-name.(buffer-
ada0 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d list))).....................:to-
adc0 62 65 2d 74 72 75 74 68 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 be-truthy).............(expect.(
ade0 63 6c 2d 66 69 6e 64 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 73 74 72 69 6e 67 2d 6d cl-find-if.(lambda.(x).(string-m
ae00 61 74 63 68 2d 70 20 22 65 6d 61 63 73 3a 65 72 72 22 20 78 29 29 20 28 6d 61 70 63 61 72 20 23 atch-p."emacs:err".x)).(mapcar.#
ae20 27 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 29 0a 20 20 20 'buffer-name.(buffer-list)))....
ae40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 62 65 2d 74 72 75 74 68 79 29 29 .................:to-be-truthy))
ae60 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6b 69 6c 6c 2d 62 75 66 66 65 72 2d 71 75 65 72 .........(let.((kill-buffer-quer
ae80 79 2d 66 75 6e 63 74 69 6f 6e 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c y-functions.nil))...........(kil
aea0 6c 2d 62 75 66 66 65 72 20 22 2a 65 6d 61 63 73 2a 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 6b l-buffer."*emacs*")...........(k
aec0 69 6c 6c 2d 62 75 66 66 65 72 20 22 2a 65 6d 61 63 73 3a 65 72 72 2a 22 29 29 29 29 29 0a 0a 20 ill-buffer."*emacs:err*")))))...
aee0 20 28 64 65 73 63 72 69 62 65 20 22 49 6e 6a 65 63 74 69 6e 67 20 65 6e 76 69 72 6f 6e 6d 65 6e .(describe."Injecting.environmen
af00 74 22 0a 0a 20 20 20 20 28 69 74 20 22 73 68 6f 75 6c 64 20 63 6f 6e 73 74 72 75 63 74 20 61 20 t"......(it."should.construct.a.
af20 66 6f 72 6d 20 66 6f 72 20 69 6e 6a 65 63 74 69 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 65 form.for.injecting.the.current.e
af40 6e 76 69 72 6f 6e 6d 65 6e 74 22 0a 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 nvironment".......(with-temp-buf
af60 66 65 72 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 75 73 65 72 2d 6d 61 69 fer.........(setq-local.user-mai
af80 6c 2d 61 64 64 72 65 73 73 20 22 68 65 6c 6c 6f 40 67 6e 75 2e 6f 72 67 22 29 0a 0a 20 20 20 20 l-address."hello@gnu.org")......
afa0 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 ....(let.((messages.nil)).......
afc0 20 20 20 20 28 70 75 73 68 20 22 53 74 61 72 74 69 6e 67 20 61 73 79 6e 63 2d 74 65 73 74 2d 36 ....(push."Starting.async-test-6
afe0 2e 2e 2e 22 20 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 ...".messages)...........(let.((
b000 70 72 6f 63 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 proc.(async-start...............
b020 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 .........;;.What.to.do.in.the.ch
b040 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ild.process.....................
b060 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...`(lambda.()..................
b080 20 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 .........,(async-inject-variable
b0a0 73 20 22 5c 5c 60 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 5c 5c 27 22 29 0a 20 20 20 s."\\`user-mail-address\\'")....
b0c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 .......................(format."
b0e0 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 20 3d 20 25 73 22 20 75 73 65 72 2d 6d 61 69 user-mail-address.=.%s".user-mai
b100 6c 2d 61 64 64 72 65 73 73 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l-address)).....................
b120 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 ....;;.What.to.do.when.it.finish
b140 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 es........................(lambd
b160 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a.(result)......................
b180 20 20 20 20 28 70 75 73 68 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 ....(push.(format."Async.process
b1a0 20 64 6f 6e 65 3a 20 25 73 22 20 72 65 73 75 6c 74 29 20 6d 65 73 73 61 67 65 73 29 29 29 29 29 .done:.%s".result).messages)))))
b1c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 67 65 74 20 70 72 6f 63 29 29 0a 0a .............(async-get.proc))..
b1e0 20 20 20 20 20 20 20 20 20 20 28 65 78 70 65 63 74 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 ..........(expect.(string-join.(
b200 6e 72 65 76 65 72 73 65 20 6d 65 73 73 61 67 65 73 29 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 nreverse.messages)."\n")........
b220 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 2d 65 71 75 61 6c 20 22 53 74 61 72 74 69 6e 67 20 61 ...........:to-equal."Starting.a
b240 73 79 6e 63 2d 74 65 73 74 2d 36 2e 2e 2e 5c 6e 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f sync-test-6...\nAsync.process.do
b260 6e 65 3a 20 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 20 3d 20 68 65 6c 6c 6f 40 67 6e ne:.user-mail-address.=.hello@gn
b280 75 2e 6f 72 67 22 29 29 29 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 u.org"))))))....................
b2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b400 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2e 65 6c 00 00 00 async-1.9.8/async-bytecomp.el...
b420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b460 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
b480 30 30 32 31 37 36 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 37 32 00 20 30 00 00 00 0021760.00000000000.014572..0...
b4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b500 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
b520 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
b540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b600 3b 3b 3b 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2e 65 6c 20 2d 2d 2d 20 43 6f 6d 70 69 6c ;;;.async-bytecomp.el.---.Compil
b620 65 20 65 6c 69 73 70 20 66 69 6c 65 73 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 2d 2a 2d e.elisp.files.asynchronously.-*-
b640 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 .lexical-binding:.t.-*-..;;.Copy
b660 72 69 67 68 74 20 28 43 29 20 32 30 31 34 2d 32 30 32 32 20 46 72 65 65 20 53 6f 66 74 77 61 72 right.(C).2014-2022.Free.Softwar
b680 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 0a 0a 3b 3b 20 41 75 74 68 6f 72 73 3a 20 e.Foundation,.Inc...;;.Authors:.
b6a0 4a 6f 68 6e 20 57 69 65 67 6c 65 79 20 3c 6a 77 69 65 67 6c 65 79 40 67 6d 61 69 6c 2e 63 6f 6d John.Wiegley.<jwiegley@gmail.com
b6c0 3e 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 54 68 69 65 72 72 79 20 56 6f 6c 70 69 61 74 74 6f 20 >.;;..........Thierry.Volpiatto.
b6e0 3c 74 68 69 65 76 6f 6c 40 70 6f 73 74 65 6f 2e 6e 65 74 3e 0a 0a 3b 3b 20 4b 65 79 77 6f 72 64 <thievol@posteo.net>..;;.Keyword
b700 73 3a 20 64 69 72 65 64 20 61 73 79 6e 63 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 0a 3b 3b 20 58 s:.dired.async.byte-compile.;;.X
b720 2d 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 -URL:.https://github.com/jwiegle
b740 79 2f 65 6d 61 63 73 2d 61 73 79 6e 63 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 y/emacs-async..;;.This.program.i
b760 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 s.free.software;.you.can.redistr
b780 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 ibute.it.and/or.modify.;;.it.und
b7a0 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 er.the.terms.of.the.GNU.General.
b7c0 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b Public.License.as.published.by.;
b7e0 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 ;.the.Free.Software.Foundation,.
b800 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c either.version.3.of.the.License,
b820 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 .or.;;.(at.your.option).any.late
b840 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 r.version...;;.This.program.is.d
b860 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 istributed.in.the.hope.that.it.w
b880 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e ill.be.useful,.;;.but.WITHOUT.AN
b8a0 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 Y.WARRANTY;.without.even.the.imp
b8c0 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c lied.warranty.of.;;.MERCHANTABIL
b8e0 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 ITY.or.FITNESS.FOR.A.PARTICULAR.
b900 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c PURPOSE...See.the.;;.GNU.General
b920 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 .Public.License.for.more.details
b940 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 ...;;.You.should.have.received.a
b960 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 .copy.of.the.GNU.General.Public.
b980 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 License.;;.along.with.this.progr
b9a0 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e am...If.not,.see.<https://www.gn
b9c0 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 u.org/licenses/>...;;;.Commentar
b9e0 79 3a 0a 3b 3b 0a 3b 3b 20 20 54 68 69 73 20 70 61 63 6b 61 67 65 20 70 72 6f 76 69 64 65 20 74 y:.;;.;;..This.package.provide.t
ba00 68 65 20 60 61 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 2d 64 69 72 65 63 74 6f he.`async-byte-recompile-directo
ba20 72 79 27 20 66 75 6e 63 74 69 6f 6e 0a 3b 3b 20 20 77 68 69 63 68 20 61 6c 6c 6f 77 73 2c 20 61 ry'.function.;;..which.allows,.a
ba40 73 20 74 68 65 20 6e 61 6d 65 20 73 61 79 73 20 74 6f 20 72 65 63 6f 6d 70 69 6c 65 20 61 20 64 s.the.name.says.to.recompile.a.d
ba60 69 72 65 63 74 6f 72 79 20 6f 75 74 73 69 64 65 20 6f 66 0a 3b 3b 20 20 79 6f 75 72 20 72 75 6e irectory.outside.of.;;..your.run
ba80 6e 69 6e 67 20 65 6d 61 63 73 2e 0a 3b 3b 20 20 54 68 65 20 62 65 6e 65 66 69 74 20 69 73 20 79 ning.emacs..;;..The.benefit.is.y
baa0 6f 75 72 20 66 69 6c 65 73 20 77 69 6c 6c 20 62 65 20 63 6f 6d 70 69 6c 65 64 20 69 6e 20 61 20 our.files.will.be.compiled.in.a.
bac0 63 6c 65 61 6e 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 77 69 74 68 6f 75 74 0a 3b 3b 20 20 74 68 clean.environment.without.;;..th
bae0 65 20 6f 6c 64 20 2a 2e 65 6c 20 66 69 6c 65 73 20 6c 6f 61 64 65 64 2e 0a 3b 3b 20 20 41 6d 6f e.old.*.el.files.loaded..;;..Amo
bb00 6e 67 20 6f 74 68 65 72 20 74 68 69 6e 67 73 2c 20 74 68 69 73 20 66 69 78 20 61 20 62 75 67 20 ng.other.things,.this.fix.a.bug.
bb20 69 6e 20 70 61 63 6b 61 67 65 2e 65 6c 20 77 68 69 63 68 20 72 65 63 6f 6d 70 69 6c 65 0a 3b 3b in.package.el.which.recompile.;;
bb40 20 20 74 68 65 20 6e 65 77 20 66 69 6c 65 73 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 65 ..the.new.files.in.the.current.e
bb60 6e 76 69 72 6f 6e 6d 65 6e 74 20 77 69 74 68 20 74 68 65 20 6f 6c 64 20 66 69 6c 65 73 20 6c 6f nvironment.with.the.old.files.lo
bb80 61 64 65 64 2c 20 63 72 65 61 74 69 6e 67 0a 3b 3b 20 20 65 72 72 6f 72 73 20 69 6e 20 6d 6f 73 aded,.creating.;;..errors.in.mos
bba0 74 20 70 61 63 6b 61 67 65 73 20 61 66 74 65 72 20 75 70 67 72 61 64 65 73 2e 0a 3b 3b 0a 3b 3b t.packages.after.upgrades..;;.;;
bbc0 20 20 4e 42 3a 20 54 68 69 73 20 70 61 63 6b 61 67 65 20 69 73 20 61 64 76 69 63 69 6e 67 20 74 ..NB:.This.package.is.advicing.t
bbe0 68 65 20 66 75 6e 63 74 69 6f 6e 20 60 70 61 63 6b 61 67 65 2d 2d 63 6f 6d 70 69 6c 65 27 2e 0a he.function.`package--compile'..
bc00 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 .;;;.Code:..(require.'cl-lib).(r
bc20 65 71 75 69 72 65 20 27 61 73 79 6e 63 29 0a 28 72 65 71 75 69 72 65 20 27 62 79 74 65 63 6f 6d equire.'async).(require.'bytecom
bc40 70 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 61 63 6b 61 67 65 2d 64 65 p)..(declare-function.package-de
bc60 73 63 2d 6e 61 6d 65 20 22 70 61 63 6b 61 67 65 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 sc-name."package.el").(declare-f
bc80 75 6e 63 74 69 6f 6e 20 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 64 69 72 20 22 70 61 63 6b 61 67 unction.package-desc-dir."packag
bca0 65 2e 65 6c 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d e.el")..(defcustom.async-bytecom
bcc0 70 2d 61 6c 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 20 27 61 6c 6c 0a 20 20 22 50 61 63 6b 61 p-allowed-packages.'all..."Packa
bce0 67 65 73 20 69 6e 20 74 68 69 73 20 6c 69 73 74 20 77 69 6c 6c 20 62 65 20 63 6f 6d 70 69 6c 65 ges.in.this.list.will.be.compile
bd00 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 62 79 20 60 70 61 63 6b 61 67 65 2d 2d 63 6f d.asynchronously.by.`package--co
bd20 6d 70 69 6c 65 27 2e 0a 41 6c 6c 20 74 68 65 20 64 65 70 65 6e 64 65 6e 63 69 65 73 20 6f 66 20 mpile'..All.the.dependencies.of.
bd40 74 68 65 73 65 20 70 61 63 6b 61 67 65 73 20 77 69 6c 6c 20 62 65 20 63 6f 6d 70 69 6c 65 64 20 these.packages.will.be.compiled.
bd60 61 73 79 6e 63 20 74 6f 6f 2c 0a 73 6f 20 6e 6f 20 6e 65 65 64 20 74 6f 20 61 64 64 20 64 65 70 async.too,.so.no.need.to.add.dep
bd80 65 6e 64 65 6e 63 69 65 73 20 74 6f 20 74 68 69 73 20 6c 69 73 74 2e 0a 54 68 65 20 76 61 6c 75 endencies.to.this.list..The.valu
bda0 65 20 6f 66 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 63 61 6e 20 61 6c 73 6f 20 62 65 20 74 e.of.this.variable.can.also.be.t
bdc0 68 65 20 73 79 6d 62 6f 6c 20 60 61 6c 6c 27 20 28 64 65 66 61 75 6c 74 29 2c 20 69 6e 20 74 68 he.symbol.`all'.(default),.in.th
bde0 69 73 20 63 61 73 65 0a 61 6c 6c 20 70 61 63 6b 61 67 65 73 20 61 72 65 20 61 6c 77 61 79 73 20 is.case.all.packages.are.always.
be00 63 6f 6d 70 69 6c 65 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 3a 67 72 6f compiled.asynchronously."...:gro
be20 75 70 20 27 61 73 79 6e 63 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 0a 20 20 20 20 20 up.'async...:type.'(choice......
be40 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 41 6c 6c 20 70 61 63 6b 61 67 65 73 22 20 .....(const.:tag."All.packages".
be60 61 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 70 65 61 74 20 73 79 6d 62 6f 6c 29 29 29 all)...........(repeat.symbol)))
be80 0a 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 ..(defvar.async-byte-compile-log
bea0 2d 66 69 6c 65 0a 20 20 28 63 6f 6e 63 61 74 20 75 73 65 72 2d 65 6d 61 63 73 2d 64 69 72 65 63 -file...(concat.user-emacs-direc
bec0 74 6f 72 79 20 22 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2e 6c 6f 67 22 29 29 0a 0a 28 64 65 tory."async-bytecomp.log"))..(de
bee0 66 76 61 72 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 6c 6f 61 64 2d 76 61 72 69 61 62 6c fvar.async-bytecomp-load-variabl
bf00 65 2d 72 65 67 65 78 70 20 22 5c 5c 60 6c 6f 61 64 2d 70 61 74 68 5c 5c 27 22 0a 20 20 22 54 68 e-regexp."\\`load-path\\'"..."Th
bf20 65 20 76 61 72 69 61 62 6c 65 20 75 73 65 64 20 62 79 20 60 61 73 79 6e 63 2d 69 6e 6a 65 63 74 e.variable.used.by.`async-inject
bf40 2d 76 61 72 69 61 62 6c 65 73 27 20 77 68 65 6e 20 28 72 65 29 63 6f 6d 70 69 6c 69 6e 67 20 61 -variables'.when.(re)compiling.a
bf60 73 79 6e 63 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 61 sync.")..;;;###autoload.(defun.a
bf80 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 28 64 sync-byte-recompile-directory.(d
bfa0 69 72 65 63 74 6f 72 79 20 26 6f 70 74 69 6f 6e 61 6c 20 71 75 69 65 74 29 0a 20 20 22 43 6f 6d irectory.&optional.quiet)..."Com
bfc0 70 69 6c 65 20 61 6c 6c 20 2a 2e 65 6c 20 66 69 6c 65 73 20 69 6e 20 44 49 52 45 43 54 4f 52 59 pile.all.*.el.files.in.DIRECTORY
bfe0 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 41 6c 6c 20 2a 2e 65 6c 63 20 66 69 6c 65 73 .asynchronously..All.*.elc.files
c000 20 61 72 65 20 73 79 73 74 65 6d 61 74 69 63 61 6c 6c 79 20 64 65 6c 65 74 65 64 20 62 65 66 6f .are.systematically.deleted.befo
c020 72 65 20 70 72 6f 63 65 65 64 69 6e 67 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 re.proceeding."...(cl-loop.with.
c040 64 69 72 20 3d 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 64 69 72 65 63 74 6f 72 79 dir.=.(directory-files.directory
c060 20 74 20 22 5c 5c 2e 65 6c 63 5c 5c 27 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 75 6e 6c 65 73 .t."\\.elc\\'")............unles
c080 73 20 64 69 72 20 72 65 74 75 72 6e 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 s.dir.return.nil............for.
c0a0 66 20 69 6e 20 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 66 69 6c 65 2d 65 f.in.dir............when.(file-e
c0c0 78 69 73 74 73 2d 70 20 66 29 20 64 6f 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 66 29 29 0a 20 xists-p.f).do.(delete-file.f))..
c0e0 20 3b 3b 20 45 6e 73 75 72 65 20 61 73 79 6e 63 20 69 73 20 72 65 6c 6f 61 64 65 64 20 77 68 65 .;;.Ensure.async.is.reloaded.whe
c100 6e 20 61 73 79 6e 63 2e 65 6c 63 20 69 73 20 64 65 6c 65 74 65 64 2e 0a 20 20 3b 3b 20 54 68 69 n.async.elc.is.deleted....;;.Thi
c120 73 20 68 61 70 70 65 6e 20 77 68 65 6e 20 72 65 63 6f 6d 70 69 6c 69 6e 67 20 69 74 73 20 6f 77 s.happen.when.recompiling.its.ow
c140 6e 20 64 69 72 65 63 74 6f 72 79 2e 0a 20 20 28 6c 6f 61 64 20 22 61 73 79 6e 63 22 29 0a 20 20 n.directory....(load."async")...
c160 28 6c 65 74 20 28 28 63 61 6c 6c 2d 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 (let.((call-back..........(lambd
c180 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 a.(&optional._ignore)...........
c1a0 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 .(if.(file-exists-p.async-byte-c
c1c0 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ompile-log-file)................
c1e0 28 6c 65 74 20 28 28 62 75 66 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 79 (let.((buf.(get-buffer-create.by
c200 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 te-compile-log-buffer)).........
c220 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .............(n.0)).............
c240 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 .....(with-current-buffer.buf...
c260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 .................(goto-char.(poi
c280 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 nt-max))....................(let
c2a0 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 20 .((inhibit-read-only.t))........
c2c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 ..............(insert-file-conte
c2e0 6e 74 73 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 nts.async-byte-compile-log-file)
c300 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 69 6c 61 74 69 ......................(compilati
c320 6f 6e 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 on-mode))....................(di
c340 73 70 6c 61 79 2d 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 splay-buffer.buf)...............
c360 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d .....(delete-file.async-byte-com
c380 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pile-log-file)..................
c3a0 20 20 28 75 6e 6c 65 73 73 20 71 75 69 65 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(unless.quiet.................
c3c0 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 .....(save-excursion............
c3e0 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 ............(goto-char.(point-mi
c400 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c n))........................(whil
c420 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 2e 2a 3a 45 72 72 6f 72 3a e.(re-search-forward."^.*:Error:
c440 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ".nil.t)........................
c460 20 20 28 63 6c 2d 69 6e 63 66 20 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(cl-incf.n))).................
c480 20 20 20 20 20 28 69 66 20 28 3e 20 6e 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....(if.(>.n.0)................
c4a0 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 46 61 69 6c 65 64 20 74 6f 20 63 6f ..........(message."Failed.to.co
c4c0 6d 70 69 6c 65 20 25 64 20 66 69 6c 65 73 20 69 6e 20 64 69 72 65 63 74 6f 72 79 20 60 25 73 27 mpile.%d.files.in.directory.`%s'
c4e0 22 20 6e 20 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ".n.directory)..................
c500 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 69 72 65 63 74 6f 72 79 20 60 25 73 27 20 63 ......(message."Directory.`%s'.c
c520 6f 6d 70 69 6c 65 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 77 61 72 6e ompiled.asynchronously.with.warn
c540 69 6e 67 73 22 20 64 69 72 65 63 74 6f 72 79 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 ings".directory)))))............
c560 20 20 28 75 6e 6c 65 73 73 20 71 75 69 65 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ..(unless.quiet................(
c580 6d 65 73 73 61 67 65 20 22 44 69 72 65 63 74 6f 72 79 20 60 25 73 27 20 63 6f 6d 70 69 6c 65 64 message."Directory.`%s'.compiled
c5a0 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 73 75 63 63 65 73 73 22 20 64 69 .asynchronously.with.success".di
c5c0 72 65 63 74 6f 72 79 29 29 29 29 29 29 0a 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 rectory)))))).....(async-start..
c5e0 20 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 ....`(lambda.().........(require
c600 20 27 62 79 74 65 63 6f 6d 70 29 0a 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 .'bytecomp).........,(async-inje
c620 63 74 2d 76 61 72 69 61 62 6c 65 73 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 6c 6f 61 64 ct-variables.async-bytecomp-load
c640 2d 76 61 72 69 61 62 6c 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 -variable-regexp).........(let.(
c660 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 (default-directory.(file-name-as
c680 2d 64 69 72 65 63 74 6f 72 79 20 2c 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 -directory.,directory)).........
c6a0 20 20 20 20 20 20 65 72 72 6f 72 2d 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 64 64 ......error-data)...........(add
c6c0 2d 74 6f 2d 6c 69 73 74 20 27 6c 6f 61 64 2d 70 61 74 68 20 64 65 66 61 75 6c 74 2d 64 69 72 65 -to-list.'load-path.default-dire
c6e0 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 ctory)...........(byte-recompile
c700 2d 64 69 72 65 63 74 6f 72 79 20 2c 64 69 72 65 63 74 6f 72 79 20 30 20 74 29 0a 20 20 20 20 20 -directory.,directory.0.t)......
c720 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 79 74 65 2d 63 6f 6d 70 .....(when.(get-buffer.byte-comp
c740 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 ile-log-buffer).............(set
c760 71 20 65 72 72 6f 72 2d 64 61 74 61 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 q.error-data.(with-current-buffe
c780 72 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 r.byte-compile-log-buffer.......
c7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 .........................(buffer
c7c0 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 2d -substring-no-properties.(point-
c7e0 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 min).(point-max)))).............
c800 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 65 72 72 6f 72 2d 64 61 74 61 20 22 22 29 0a (unless.(string=.error-data."").
c820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 2c 61 ..............(with-temp-file.,a
c840 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 0a 20 20 20 20 20 sync-byte-compile-log-file......
c860 20 20 20 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 ...........(erase-buffer).......
c880 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 65 72 72 6f 72 2d 64 61 74 61 29 29 29 29 ..........(insert.error-data))))
c8a0 29 29 0a 20 20 20 20 20 63 61 6c 6c 2d 62 61 63 6b 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 71 ))......call-back).....(unless.q
c8c0 75 69 65 74 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 65 64 20 63 6f 6d 70 69 6c 69 6e 67 uiet.(message."Started.compiling
c8e0 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 64 69 72 65 63 74 6f 72 79 20 25 73 22 20 64 69 .asynchronously.directory.%s".di
c900 72 65 63 74 6f 72 79 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 61 72 63 rectory))))..(defvar.package-arc
c920 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 61 hive-contents).(defvar.package-a
c940 6c 69 73 74 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 61 63 6b 61 67 65 2d list).(declare-function.package-
c960 64 65 73 63 2d 72 65 71 73 20 22 70 61 63 6b 61 67 65 2e 65 6c 22 20 28 63 6c 2d 78 29 29 0a 0a desc-reqs."package.el".(cl-x))..
c980 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 2d 67 65 74 2d 70 61 63 6b 61 (defun.async-bytecomp--get-packa
c9a0 67 65 2d 64 65 70 73 20 28 70 6b 67 73 29 0a 20 20 3b 3b 20 53 61 6d 65 20 61 73 20 60 70 61 63 ge-deps.(pkgs)...;;.Same.as.`pac
c9c0 6b 61 67 65 2d 2d 67 65 74 2d 64 65 70 73 27 20 62 75 74 20 70 61 72 73 65 20 69 6e 73 74 65 61 kage--get-deps'.but.parse.instea
c9e0 64 20 60 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 27 0a 20 20 3b d.`package-archive-contents'...;
ca00 3b 20 62 65 63 61 75 73 65 20 50 4b 47 20 69 73 20 6e 6f 74 20 61 6c 72 65 61 64 79 20 69 6e 73 ;.because.PKG.is.not.already.ins
ca20 74 61 6c 6c 65 64 20 61 6e 64 20 6e 6f 74 20 70 72 65 73 65 6e 74 20 69 6e 20 60 70 61 63 6b 61 talled.and.not.present.in.`packa
ca40 67 65 2d 61 6c 69 73 74 27 2e 0a 20 20 3b 3b 20 48 6f 77 65 76 65 72 20 66 61 6c 6c 62 61 63 6b ge-alist'....;;.However.fallback
ca60 20 74 6f 20 60 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 27 20 69 6e 20 63 61 73 65 20 50 4b 47 20 .to.`package-alist'.in.case.PKG.
ca80 6e 6f 20 6d 6f 72 65 20 70 72 65 73 65 6e 74 0a 20 20 3b 3b 20 69 6e 20 60 70 61 63 6b 61 67 65 no.more.present...;;.in.`package
caa0 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 27 20 64 75 65 20 74 6f 20 6d 6f 64 69 66 69 -archive-contents'.due.to.modifi
cac0 63 61 74 69 6f 6e 20 74 6f 20 60 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 73 27 2e 0a 20 20 cation.to.`package-archives'....
cae0 3b 3b 20 53 65 65 20 69 73 73 75 65 20 23 35 38 2e 0a 20 20 28 6c 65 74 20 28 28 73 65 65 6e 20 ;;.See.issue.#58....(let.((seen.
cb00 27 28 29 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 70 6b 67 73 0a 20 20 20 20 20 20 28 6c 65 74 '())).....(while.pkgs.......(let
cb20 20 28 28 70 6b 67 20 28 70 6f 70 20 70 6b 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c .((pkg.(pop.pkgs))).........(unl
cb40 65 73 73 20 28 6d 65 6d 71 20 70 6b 67 20 73 65 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c ess.(memq.pkg.seen)...........(l
cb60 65 74 20 28 28 70 6b 67 2d 64 65 73 63 20 28 63 61 64 72 20 28 6f 72 20 28 61 73 73 71 20 70 6b et.((pkg-desc.(cadr.(or.(assq.pk
cb80 67 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 20 20 g.package-archive-contents).....
cba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
cbc0 28 61 73 73 71 20 70 6b 67 20 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 29 29 29 29 29 0a 20 20 20 (assq.pkg.package-alist)))))....
cbe0 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 6b 67 2d 64 65 73 63 0a 20 20 20 20 20 20 20 20 .........(when.pkg-desc.........
cc00 20 20 20 20 20 20 28 70 75 73 68 20 70 6b 67 20 73 65 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 ......(push.pkg.seen)...........
cc20 20 20 20 20 28 73 65 74 71 20 70 6b 67 73 20 28 61 70 70 65 6e 64 20 28 6d 61 70 63 61 72 20 23 ....(setq.pkgs.(append.(mapcar.#
cc40 27 63 61 72 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 72 65 71 73 20 70 6b 67 2d 64 65 73 63 'car.(package-desc-reqs.pkg-desc
cc60 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ))..............................
cc80 20 20 20 20 70 6b 67 73 29 29 29 29 29 29 29 0a 20 20 20 20 73 65 65 6e 29 29 0a 0a 28 64 65 66 ....pkgs))))))).....seen))..(def
cca0 75 6e 20 61 73 79 6e 63 2d 2d 70 61 63 6b 61 67 65 2d 63 6f 6d 70 69 6c 65 20 28 6f 72 69 67 2d un.async--package-compile.(orig-
ccc0 66 75 6e 20 70 6b 67 2d 64 65 73 63 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 28 6c 65 74 20 fun.pkg-desc.&rest.args)...(let.
cce0 28 28 63 75 72 2d 70 61 63 6b 61 67 65 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 6e 61 6d 65 ((cur-package.(package-desc-name
cd00 20 70 6b 67 2d 64 65 73 63 29 29 0a 20 20 20 20 20 20 20 20 28 70 6b 67 2d 64 69 72 20 28 70 61 .pkg-desc)).........(pkg-dir.(pa
cd20 63 6b 61 67 65 2d 64 65 73 63 2d 64 69 72 20 70 6b 67 2d 64 65 73 63 29 29 29 0a 20 20 20 20 28 ckage-desc-dir.pkg-desc))).....(
cd40 69 66 20 28 6f 72 20 28 6d 65 6d 62 65 72 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c if.(or.(member.async-bytecomp-al
cd60 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 20 27 28 74 20 61 6c 6c 20 28 61 6c 6c 29 29 29 0a 20 lowed-packages.'(t.all.(all)))..
cd80 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 63 75 72 2d 70 61 63 6b 61 67 65 20 28 61 73 ...........(memq.cur-package.(as
cda0 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 2d 67 65 74 2d 70 61 63 6b 61 67 65 2d 64 65 70 73 0a 20 ync-bytecomp--get-package-deps..
cdc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 ..............................as
cde0 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 29 29 29 ync-bytecomp-allowed-packages)))
ce00 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 49 58 .........(progn...........;;.FIX
ce20 4d 45 3a 20 57 68 79 20 64 6f 20 77 65 20 75 73 65 20 28 65 71 20 63 75 72 2d 70 61 63 6b 61 67 ME:.Why.do.we.use.(eq.cur-packag
ce40 65 20 27 61 73 79 6e 63 29 20 6f 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 e.'async).once...........;;.and.
ce60 28 73 74 72 69 6e 67 3d 20 63 75 72 2d 70 61 63 6b 61 67 65 20 22 61 73 79 6e 63 22 29 20 61 66 (string=.cur-package."async").af
ce80 74 65 72 77 61 72 64 73 3f 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 63 75 terwards?...........(when.(eq.cu
cea0 72 2d 70 61 63 6b 61 67 65 20 27 61 73 79 6e 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 r-package.'async).............(f
cec0 6d 61 6b 75 6e 62 6f 75 6e 64 20 27 61 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 makunbound.'async-byte-recompile
cee0 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 64 64 20 74 6f -directory))...........;;.Add.to
cf00 20 60 6c 6f 61 64 2d 70 61 74 68 27 20 74 68 65 20 6c 61 74 65 73 74 20 76 65 72 73 69 6f 6e 20 .`load-path'.the.latest.version.
cf20 6f 66 20 61 73 79 6e 63 20 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 6c 6f 61 64 of.async.and...........;;.reload
cf40 20 69 74 20 77 68 65 6e 20 72 65 69 6e 73 74 61 6c 6c 69 6e 67 20 61 73 79 6e 63 2e 0a 20 20 20 .it.when.reinstalling.async.....
cf60 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d 20 63 75 72 2d 70 61 63 6b 61 67 .......(when.(string=.cur-packag
cf80 65 20 22 61 73 79 6e 63 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 70 75 73 68 6e e."async").............(cl-pushn
cfa0 65 77 20 70 6b 67 2d 64 69 72 20 6c 6f 61 64 2d 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 ew.pkg-dir.load-path)...........
cfc0 20 20 28 6c 6f 61 64 20 22 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 22 29 29 0a 20 20 20 20 20 ..(load."async-bytecomp"))......
cfe0 20 20 20 20 20 3b 3b 20 60 61 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 2d 64 69 .....;;.`async-byte-recompile-di
d000 72 65 63 74 6f 72 79 27 20 77 69 6c 6c 20 61 64 64 20 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 rectory'.will.add.directory.....
d020 20 20 20 20 20 20 3b 3b 20 61 73 20 6e 65 65 64 65 64 20 74 6f 20 60 6c 6f 61 64 2d 70 61 74 68 ......;;.as.needed.to.`load-path
d040 27 2e 0a 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 '............(async-byte-recompi
d060 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 64 69 72 20 70 le-directory.(package-desc-dir.p
d080 6b 67 2d 64 65 73 63 29 20 74 29 29 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 6f 72 69 67 2d 66 kg-desc).t)).......(apply.orig-f
d0a0 75 6e 20 70 6b 67 2d 64 65 73 63 20 61 72 67 73 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f un.pkg-desc.args))))..;;;###auto
d0c0 6c 6f 61 64 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 61 73 79 6e 63 2d 62 79 load.(define-minor-mode.async-by
d0e0 74 65 63 6f 6d 70 2d 70 61 63 6b 61 67 65 2d 6d 6f 64 65 0a 20 20 22 42 79 74 65 20 63 6f 6d 70 tecomp-package-mode..."Byte.comp
d100 69 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 70 61 63 6b 61 67 65 73 20 69 6e 73 74 ile.asynchronously.packages.inst
d120 61 6c 6c 65 64 20 77 69 74 68 20 70 61 63 6b 61 67 65 2e 65 6c 2e 0a 41 73 79 6e 63 20 63 6f 6d alled.with.package.el..Async.com
d140 70 69 6c 61 74 69 6f 6e 20 6f 66 20 70 61 63 6b 61 67 65 73 20 63 61 6e 20 62 65 20 63 6f 6e 74 pilation.of.packages.can.be.cont
d160 72 6f 6c 6c 65 64 20 62 79 0a 60 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c 6c 6f 77 65 rolled.by.`async-bytecomp-allowe
d180 64 2d 70 61 63 6b 61 67 65 73 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 61 73 79 6e 63 0a 20 20 d-packages'."...:group.'async...
d1a0 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 69 66 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 70 :global.t...(if.async-bytecomp-p
d1c0 61 63 6b 61 67 65 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 20 27 70 ackage-mode.......(advice-add.'p
d1e0 61 63 6b 61 67 65 2d 2d 63 6f 6d 70 69 6c 65 20 3a 61 72 6f 75 6e 64 20 23 27 61 73 79 6e 63 2d ackage--compile.:around.#'async-
d200 2d 70 61 63 6b 61 67 65 2d 63 6f 6d 70 69 6c 65 29 0a 20 20 20 20 28 61 64 76 69 63 65 2d 72 65 -package-compile).....(advice-re
d220 6d 6f 76 65 20 27 70 61 63 6b 61 67 65 2d 2d 63 6f 6d 70 69 6c 65 20 23 27 61 73 79 6e 63 2d 2d move.'package--compile.#'async--
d240 70 61 63 6b 61 67 65 2d 63 6f 6d 70 69 6c 65 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f package-compile)))..;;;###autolo
d260 61 64 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 66 69 6c ad.(defun.async-byte-compile-fil
d280 65 20 28 66 69 6c 65 29 0a 20 20 22 42 79 74 65 20 63 6f 6d 70 69 6c 65 20 4c 69 73 70 20 63 6f e.(file)..."Byte.compile.Lisp.co
d2a0 64 65 20 46 49 4c 45 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 0a 53 61 6d 65 20 61 73 de.FILE.asynchronously...Same.as
d2c0 20 60 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 66 69 6c 65 27 20 62 75 74 20 61 73 79 6e 63 68 72 .`byte-compile-file'.but.asynchr
d2e0 6f 6e 6f 75 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 66 46 69 6c 65 3a 20 22 onous."...(interactive."fFile:."
d300 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6c 6c 2d 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 28 6c )...(let.((call-back..........(l
d320 61 6d 62 64 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 ambda.(&optional._ignore).......
d340 20 20 20 20 20 28 6c 65 74 20 28 28 62 6e 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 .....(let.((bn.(file-name-nondir
d360 65 63 74 6f 72 79 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 ectory.file)))..............(if.
d380 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c (file-exists-p.async-byte-compil
d3a0 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 e-log-file)..................(le
d3c0 74 20 28 28 62 75 66 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 79 74 65 2d t.((buf.(get-buffer-create.byte-
d3e0 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 compile-log-buffer))............
d400 20 20 20 20 20 20 20 20 20 20 20 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ............start)..............
d420 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 ......(with-current-buffer.buf..
d440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 ....................(goto-char.(
d460 73 65 74 71 20 73 74 61 72 74 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 setq.start.(point-max)))........
d480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 ..............(let.((inhibit-rea
d4a0 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d-only.t))......................
d4c0 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 61 73 79 6e 63 2d 62 79 ..(insert-file-contents.async-by
d4e0 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 te-compile-log-file)............
d500 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 6d 6f 64 65 29 29 0a ............(compilation-mode)).
d520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 62 75 .....................(display-bu
d540 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ffer.buf)......................(
d560 64 65 6c 65 74 65 2d 66 69 6c 65 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c delete-file.async-byte-compile-l
d580 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 og-file)......................(s
d5a0 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ave-excursion...................
d5c0 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 20 .....(goto-char.start)..........
d5e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 ..............(if.(re-search-for
d600 77 61 72 64 20 22 5e 2e 2a 3a 45 72 72 6f 72 3a 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 ward."^.*:Error:".nil.t)........
d620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 46 61 ....................(message."Fa
d640 69 6c 65 64 20 74 6f 20 63 6f 6d 70 69 6c 65 20 60 25 73 27 22 20 62 6e 29 0a 20 20 20 20 20 20 iled.to.compile.`%s'".bn).......
d660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 60 25 73 ...................(message."`%s
d680 27 20 63 6f 6d 70 69 6c 65 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 77 '.compiled.asynchronously.with.w
d6a0 61 72 6e 69 6e 67 73 22 20 62 6e 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 arnings".bn)))))................
d6c0 28 6d 65 73 73 61 67 65 20 22 60 25 73 27 20 63 6f 6d 70 69 6c 65 64 20 61 73 79 6e 63 68 72 6f (message."`%s'.compiled.asynchro
d6e0 6e 6f 75 73 6c 79 20 77 69 74 68 20 73 75 63 63 65 73 73 22 20 62 6e 29 29 29 29 29 29 0a 20 20 nously.with.success".bn))))))...
d700 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a ..(async-start......`(lambda.().
d720 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 62 79 74 65 63 6f 6d 70 29 0a 20 20 20 20 ........(require.'bytecomp).....
d740 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 20 61 73 79 ....,(async-inject-variables.asy
d760 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 6c 6f 61 64 2d 76 61 72 69 61 62 6c 65 2d 72 65 67 65 78 70 nc-bytecomp-load-variable-regexp
d780 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f ).........(let.((default-directo
d7a0 72 79 20 2c 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 29 29 ry.,(file-name-directory.file)))
d7c0 0a 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 6c 6f 61 64 2d 70 61 ...........(add-to-list.'load-pa
d7e0 74 68 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 th.default-directory)...........
d800 28 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 66 69 6c 65 20 2c 66 69 6c 65 29 0a 20 20 20 20 20 20 (byte-compile-file.,file).......
d820 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 79 74 65 2d 63 6f 6d 70 69 ....(when.(get-buffer.byte-compi
d840 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 le-log-buffer).............(setq
d860 20 65 72 72 6f 72 2d 64 61 74 61 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 .error-data.(with-current-buffer
d880 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 .byte-compile-log-buffer........
d8a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d ........................(buffer-
d8c0 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 2d 6d substring-no-properties.(point-m
d8e0 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 in).(point-max)))).............(
d900 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 65 72 72 6f 72 2d 64 61 74 61 20 22 22 29 0a 20 unless.(string=.error-data."")..
d920 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 2c 61 73 .............(with-temp-file.,as
d940 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 0a 20 20 20 20 20 20 ync-byte-compile-log-file.......
d960 20 20 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 ..........(erase-buffer)........
d980 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 65 72 72 6f 72 2d 64 61 74 61 29 29 29 29 29 .........(insert.error-data)))))
d9a0 29 0a 20 20 20 20 20 63 61 6c 6c 2d 62 61 63 6b 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 61 )......call-back)))..(provide.'a
d9c0 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 29 0a 0a 3b 3b 3b 20 61 73 79 6e 63 2d 62 79 74 65 63 6f sync-bytecomp)..;;;.async-byteco
d9e0 6d 70 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 mp.el.ends.here.................
da00 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 52 45 41 44 4d 45 2e 6d 64 00 00 00 00 00 00 00 00 00 00 00 async-1.9.8/README.md...........
da20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
da80 30 30 32 32 31 31 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 35 36 31 00 20 30 00 00 00 0022111.00000000000.012561..0...
daa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
db20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
db40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dbc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dbe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dc00 3c 70 3e 3c 61 20 68 72 65 66 3d 22 68 74 74 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c <p><a.href="http://www.gnu.org/l
dc20 69 63 65 6e 73 65 73 2f 67 70 6c 2d 33 2e 30 2e 74 78 74 22 3e 3c 69 6d 67 20 73 72 63 3d 22 68 icenses/gpl-3.0.txt"><img.src="h
dc40 74 74 70 73 3a 2f 2f 69 6d 67 2e 73 68 69 65 6c 64 73 2e 69 6f 2f 62 61 64 67 65 2f 6c 69 63 65 ttps://img.shields.io/badge/lice
dc60 6e 73 65 2d 47 50 4c 5f 33 2d 67 72 65 65 6e 2e 73 76 67 22 20 61 6c 74 3d 22 4c 69 63 65 6e 73 nse-GPL_3-green.svg".alt="Licens
dc80 65 20 47 50 4c 20 33 22 20 2f 3e 3c 2f 61 3e 0a 3c 61 20 68 72 65 66 3d 22 68 74 74 70 73 3a 2f e.GPL.3"./></a>.<a.href="https:/
dca0 2f 65 6c 70 61 2e 67 6e 75 2e 6f 72 67 2f 70 61 63 6b 61 67 65 73 2f 61 73 79 6e 63 2e 68 74 6d /elpa.gnu.org/packages/async.htm
dcc0 6c 22 3e 3c 69 6d 67 20 73 72 63 3d 22 68 74 74 70 73 3a 2f 2f 65 6c 70 61 2e 67 6e 75 2e 6f 72 l"><img.src="https://elpa.gnu.or
dce0 67 2f 70 61 63 6b 61 67 65 73 2f 61 73 79 6e 63 2e 73 76 67 22 20 61 6c 74 3d 22 47 4e 55 20 45 g/packages/async.svg".alt="GNU.E
dd00 4c 50 41 22 20 74 69 74 6c 65 3d 22 22 20 2f 3e 3c 2f 61 3e 0a 3c 61 20 68 72 65 66 3d 22 68 74 LPA".title=""./></a>.<a.href="ht
dd20 74 70 3a 2f 2f 6d 65 6c 70 61 2e 6f 72 67 2f 23 2f 61 73 79 6e 63 22 3e 3c 69 6d 67 20 73 72 63 tp://melpa.org/#/async"><img.src
dd40 3d 22 68 74 74 70 3a 2f 2f 6d 65 6c 70 61 2e 6f 72 67 2f 70 61 63 6b 61 67 65 73 2f 61 73 79 6e ="http://melpa.org/packages/asyn
dd60 63 2d 62 61 64 67 65 2e 73 76 67 22 20 61 6c 74 3d 22 4d 45 4c 50 41 22 20 74 69 74 6c 65 3d 22 c-badge.svg".alt="MELPA".title="
dd80 22 20 2f 3e 3c 2f 61 3e 0a 3c 61 20 68 72 65 66 3d 22 68 74 74 70 3a 2f 2f 73 74 61 62 6c 65 2e "./></a>.<a.href="http://stable.
dda0 6d 65 6c 70 61 2e 6f 72 67 2f 23 2f 61 73 79 6e 63 22 3e 3c 69 6d 67 20 73 72 63 3d 22 68 74 74 melpa.org/#/async"><img.src="htt
ddc0 70 3a 2f 2f 73 74 61 62 6c 65 2e 6d 65 6c 70 61 2e 6f 72 67 2f 70 61 63 6b 61 67 65 73 2f 61 73 p://stable.melpa.org/packages/as
dde0 79 6e 63 2d 62 61 64 67 65 2e 73 76 67 22 20 61 6c 74 3d 22 4d 45 4c 50 41 20 53 74 61 62 6c 65 ync-badge.svg".alt="MELPA.Stable
de00 22 20 74 69 74 6c 65 3d 22 22 20 2f 3e 3c 2f 61 3e 3c 2f 70 3e 0a 0a 0a 23 20 65 6d 61 63 73 2d ".title=""./></a></p>...#.emacs-
de20 61 73 79 6e 63 0a 0a 60 61 73 79 6e 63 2e 65 6c 60 20 69 73 20 61 20 6d 6f 64 75 6c 65 20 66 6f async..`async.el`.is.a.module.fo
de40 72 20 64 6f 69 6e 67 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 70 72 6f 63 65 73 73 69 6e 67 20 r.doing.asynchronous.processing.
de60 69 6e 20 45 6d 61 63 73 2e 0a 53 6f 6d 65 20 61 73 79 6e 63 20 61 70 70 6c 69 63 61 74 69 6f 6e in.Emacs..Some.async.application
de80 73 20 61 72 65 20 70 72 6f 76 69 64 65 64 20 61 73 20 77 65 6c 6c 20 77 69 74 68 20 74 68 69 73 s.are.provided.as.well.with.this
dea0 20 70 61 63 6b 61 67 65 3a 0a 0a 2a 20 44 69 72 65 64 2d 61 73 79 6e 63 0a 2a 20 73 6d 74 70 2d .package:..*.Dired-async.*.smtp-
dec0 6d 61 69 6c 2d 61 73 79 6e 63 0a 2a 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 0a 0a 23 20 49 mail-async.*.async-bytecomp..#.I
dee0 6e 73 74 61 6c 6c 0a 0a 59 6f 75 20 63 61 6e 20 69 6e 73 74 61 6c 6c 20 65 6d 61 63 73 2d 61 73 nstall..You.can.install.emacs-as
df00 79 6e 63 20 70 61 63 6b 61 67 65 20 66 72 6f 6d 20 4d 45 4c 50 41 20 75 73 69 6e 67 20 70 61 63 ync.package.from.MELPA.using.pac
df20 6b 61 67 65 2e 65 6c 2e 0a 0a 59 6f 75 20 63 61 6e 20 61 6c 73 6f 20 69 6e 73 74 61 6c 6c 20 66 kage.el...You.can.also.install.f
df40 72 6f 6d 20 73 6f 75 72 63 65 73 2c 20 69 6e 20 74 68 69 73 20 63 61 73 65 20 79 6f 75 20 73 68 rom.sources,.in.this.case.you.sh
df60 6f 75 6c 64 20 69 6e 73 74 61 6c 6c 0a 75 73 69 6e 67 20 6d 61 6b 65 20 61 6e 64 20 6d 61 6b 65 ould.install.using.make.and.make
df80 20 69 6e 73 74 61 6c 6c 20 74 6f 20 65 6e 73 75 72 65 20 65 6d 61 63 73 2d 61 73 79 6e 63 20 69 .install.to.ensure.emacs-async.i
dfa0 73 20 69 6e 73 74 61 6c 6c 65 64 20 69 6e 20 61 0a 73 74 61 6e 64 61 72 64 20 6c 6f 61 64 2d 70 s.installed.in.a.standard.load-p
dfc0 61 74 68 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 77 68 65 72 65 20 6f 74 68 65 72 20 70 61 63 6b ath.destination.where.other.pack
dfe0 61 67 65 73 20 63 61 6e 20 66 69 6e 64 20 69 74 0a 65 61 73 69 6c 79 20 77 68 65 6e 20 63 6f 6d ages.can.find.it.easily.when.com
e000 70 69 6c 69 6e 67 2e 0a 0a 23 23 20 49 6e 73 74 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 0a piling...##.Install.dired-async.
e020 0a 41 64 64 20 74 6f 20 79 6f 75 72 20 60 2e 65 6d 61 63 73 2e 65 6c 60 3a 0a 0a 20 20 20 20 28 .Add.to.your.`.emacs.el`:......(
e040 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 20 22 64 69 72 65 autoload.'dired-async-mode."dire
e060 64 2d 61 73 79 6e 63 2e 65 6c 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 28 64 69 72 65 64 2d 61 73 d-async.el".nil.t).....(dired-as
e080 79 6e 63 2d 6d 6f 64 65 20 31 29 0a 0a 54 68 69 73 20 77 69 6c 6c 20 61 6c 6c 6f 77 20 79 6f 75 ync-mode.1)..This.will.allow.you
e0a0 20 74 6f 20 72 75 6e 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 0a 74 68 65 20 64 69 72 65 64 .to.run.asynchronously.the.dired
e0c0 20 63 6f 6d 6d 61 6e 64 73 20 66 6f 72 20 63 6f 70 79 69 6e 67 2c 20 72 65 6e 61 6d 69 6e 67 20 .commands.for.copying,.renaming.
e0e0 61 6e 64 20 73 79 6d 6c 69 6e 6b 69 6e 67 2e 0a 49 66 20 79 6f 75 20 61 72 65 20 61 20 5b 68 65 and.symlinking..If.you.are.a.[he
e100 6c 6d 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 65 6d 61 63 73 2d 68 65 6c lm](https://github.com/emacs-hel
e120 6d 2f 68 65 6c 6d 29 20 75 73 65 72 2c 20 74 68 69 73 20 77 69 6c 6c 20 61 6c 6c 6f 77 20 79 6f m/helm).user,.this.will.allow.yo
e140 75 0a 74 6f 20 63 6f 70 79 2c 20 72 65 6e 61 6d 65 20 65 74 63 2e 2e 2e 20 61 73 79 6e 63 68 72 u.to.copy,.rename.etc....asynchr
e160 6f 6e 6f 75 73 6c 79 20 66 72 6f 6d 20 5b 68 65 6c 6d 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 onously.from.[helm](https://gith
e180 75 62 2e 63 6f 6d 2f 65 6d 61 63 73 2d 68 65 6c 6d 2f 68 65 6c 6d 29 2e 0a 4e 6f 74 65 20 74 68 ub.com/emacs-helm/helm)..Note.th
e1a0 61 74 20 77 69 74 68 20 5b 68 65 6c 6d 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f at.with.[helm](https://github.co
e1c0 6d 2f 65 6d 61 63 73 2d 68 65 6c 6d 2f 68 65 6c 6d 29 0a 79 6f 75 20 63 61 6e 20 64 69 73 61 62 m/emacs-helm/helm).you.can.disab
e1e0 6c 65 20 74 68 69 73 20 62 79 20 72 75 6e 6e 69 6e 67 20 74 68 65 20 63 6f 70 79 2c 20 72 65 6e le.this.by.running.the.copy,.ren
e200 61 6d 65 20 65 74 63 2e 2e 2e 20 63 6f 6d 6d 61 6e 64 73 20 77 69 74 68 20 61 20 70 72 65 66 69 ame.etc....commands.with.a.prefi
e220 78 20 61 72 67 75 6d 65 6e 74 2e 0a 0a 49 66 20 79 6f 75 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 x.argument...If.you.don't.want.t
e240 6f 20 6d 61 6b 65 20 64 69 72 65 64 2f 68 65 6c 6d 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 64 o.make.dired/helm.asynchronous.d
e260 69 73 61 62 6c 65 20 69 74 20 77 69 74 68 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 isable.it.with.`dired-async-mode
e280 60 2e 0a 0a 23 23 23 20 44 65 62 69 61 6e 20 61 6e 64 20 55 62 75 6e 74 75 0a 0a 55 73 65 72 73 `...###.Debian.and.Ubuntu..Users
e2a0 20 6f 66 20 44 65 62 69 61 6e 20 39 20 6f 72 20 6c 61 74 65 72 20 6f 72 20 55 62 75 6e 74 75 20 .of.Debian.9.or.later.or.Ubuntu.
e2c0 31 36 2e 30 34 20 6f 72 20 6c 61 74 65 72 20 6d 61 79 20 73 69 6d 70 6c 79 20 60 61 70 74 2d 67 16.04.or.later.may.simply.`apt-g
e2e0 65 74 20 69 6e 73 74 61 6c 6c 20 65 6c 70 61 2d 61 73 79 6e 63 60 2e 0a 0a 23 23 20 41 75 74 68 et.install.elpa-async`...##.Auth
e300 65 6e 74 69 63 61 74 69 6f 6e 20 61 6e 64 20 75 73 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 0a entication.and.user.interaction.
e320 0a 53 6f 6d 65 20 61 75 74 68 65 6e 74 69 63 61 74 69 6f 6e 73 20 72 65 71 75 69 72 65 20 75 73 .Some.authentications.require.us
e340 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 2c 20 66 6f 72 20 65 78 61 6d 70 6c 65 20 61 6e 73 77 er.interaction,.for.example.answ
e360 65 72 69 6e 67 20 74 6f 20 61 0a 70 72 6f 6d 70 74 2c 20 65 6e 74 65 72 69 6e 67 20 61 20 70 61 ering.to.a.prompt,.entering.a.pa
e380 73 73 77 6f 72 64 73 20 65 74 63 2e 20 59 6f 75 72 20 61 73 79 6e 63 20 69 6d 70 6c 65 6d 65 6e sswords.etc..Your.async.implemen
e3a0 74 61 74 69 6f 6e 20 73 68 6f 75 6c 64 0a 61 76 6f 69 64 20 61 6e 79 20 73 75 63 68 20 75 73 65 tation.should.avoid.any.such.use
e3c0 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 2c 20 74 6f 20 61 76 6f 69 64 20 62 65 69 6e 67 20 73 74 r.interaction,.to.avoid.being.st
e3e0 75 63 6b 20 77 69 74 68 20 61 20 70 72 6f 6d 70 74 20 79 6f 75 0a 77 69 6c 6c 20 6e 6f 74 20 62 uck.with.a.prompt.you.will.not.b
e400 65 20 61 62 6c 65 20 74 6f 20 61 6e 73 77 65 72 20 74 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 e.able.to.answer.to.in.the.child
e420 20 65 6d 61 63 73 2e 20 20 46 6f 72 20 61 6c 6c 20 77 68 61 74 20 69 73 20 72 65 6d 6f 74 65 0a .emacs...For.all.what.is.remote.
e440 28 6d 61 69 6c 73 2c 20 74 72 61 6d 70 20 65 74 63 2e 2e 2e 29 20 79 6f 75 20 68 61 76 65 20 74 (mails,.tramp.etc...).you.have.t
e460 6f 20 6c 65 74 20 65 6d 61 63 73 20 6d 61 6e 61 67 65 20 79 6f 75 72 20 69 64 65 6e 74 69 66 69 o.let.emacs.manage.your.identifi
e480 63 61 74 69 6f 6e 0a 77 69 74 68 20 5b 61 75 74 68 2d 73 6f 75 72 63 65 73 5d 28 68 74 74 70 73 cation.with.[auth-sources](https
e4a0 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 73 6f 66 74 77 61 72 65 2f 65 6d 61 63 73 2f 6d 61 ://www.gnu.org/software/emacs/ma
e4c0 6e 75 61 6c 2f 68 74 6d 6c 5f 6d 6f 6e 6f 2f 61 75 74 68 2e 68 74 6d 6c 29 2c 20 73 6f 20 74 68 nual/html_mono/auth.html),.so.th
e4e0 61 74 20 79 6f 75 20 64 6f 20 6e 6f 74 20 68 61 76 65 20 74 6f 20 65 6e 74 65 72 20 61 20 70 61 at.you.do.not.have.to.enter.a.pa
e500 73 73 77 6f 72 64 2e 0a 0a 42 61 73 69 63 61 6c 6c 79 20 61 6c 6c 20 79 6f 75 20 6e 65 65 64 20 ssword...Basically.all.you.need.
e520 69 73 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 20 74 68 69 73 20 69 6e 20 79 6f 75 72 20 69 is.something.like.this.in.your.i
e540 6e 69 74 20 66 69 6c 65 3a 0a 0a 20 20 20 20 28 75 73 65 2d 70 61 63 6b 61 67 65 20 61 75 74 68 nit.file:......(use-package.auth
e560 2d 73 6f 75 72 63 65 0a 20 20 20 20 20 20 3a 6e 6f 2d 72 65 71 75 69 72 65 20 74 0a 20 20 20 20 -source.......:no-require.t.....
e580 20 20 3a 63 6f 6e 66 69 67 20 28 73 65 74 71 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 ..:config.(setq.auth-sources.'("
e5a0 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 20 22 7e 2f 2e 6e 65 74 72 63 22 29 29 29 0a 0a ~/.authinfo.gpg"."~/.netrc")))..
e5c0 41 6e 64 20 61 20 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 20 66 69 6c 65 20 63 6f 6e And.a."~/.authinfo.gpg".file.con
e5e0 74 61 69 6e 69 6e 67 20 65 6e 74 72 69 65 73 20 73 75 63 68 20 61 73 0a 0a 20 20 20 20 64 65 66 taining.entries.such.as......def
e600 61 75 6c 74 20 70 6f 72 74 20 73 75 64 6f 20 6c 6f 67 69 6e 20 72 6f 6f 74 20 70 61 73 73 77 6f ault.port.sudo.login.root.passwo
e620 72 64 20 78 78 78 78 78 78 78 78 0a 20 20 20 20 0a 6f 72 0a 0a 20 20 20 20 6d 61 63 68 69 6e 65 rd.xxxxxxxx......or......machine
e640 20 78 78 78 78 78 20 70 6f 72 74 20 78 78 78 20 6c 6f 67 69 6e 20 78 78 78 20 70 61 73 73 77 6f .xxxxx.port.xxx.login.xxx.passwo
e660 72 64 20 78 78 78 78 78 78 78 0a 0a 66 6f 72 20 6d 6f 72 65 20 73 70 65 63 69 66 69 63 20 68 6f rd.xxxxxxx..for.more.specific.ho
e680 73 74 73 20 28 73 6d 74 70 2c 20 6d 61 69 6c 73 20 65 74 63 2e 2e 2e 29 0a 0a 53 65 65 20 5b 61 sts.(smtp,.mails.etc...)..See.[a
e6a0 75 74 68 2d 73 6f 75 72 63 65 73 20 6d 61 6e 75 61 6c 5d 28 68 74 74 70 73 3a 2f 2f 77 77 77 2e uth-sources.manual](https://www.
e6c0 67 6e 75 2e 6f 72 67 2f 73 6f 66 74 77 61 72 65 2f 65 6d 61 63 73 2f 6d 61 6e 75 61 6c 2f 68 74 gnu.org/software/emacs/manual/ht
e6e0 6d 6c 5f 6d 6f 6e 6f 2f 61 75 74 68 2e 68 74 6d 6c 29 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f ml_mono/auth.html).for.more.info
e700 73 2e 0a 0a 48 6f 77 65 76 65 72 2c 20 77 68 65 6e 20 63 68 6f 6f 73 69 6e 67 20 74 68 65 20 64 s...However,.when.choosing.the.d
e720 65 73 74 69 6e 61 74 69 6f 6e 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 28 65 2e 67 2e estination.with.completion.(e.g.
e740 20 68 65 6c 6d 29 20 61 6e 64 0a 79 6f 75 20 68 61 76 65 20 6e 6f 20 22 2e 61 75 74 68 69 6e 66 .helm).and.you.have.no.".authinf
e760 6f 22 20 66 69 6c 65 20 6f 72 20 6a 75 73 74 20 6e 6f 20 65 6e 74 72 79 20 66 6f 72 20 74 68 69 o".file.or.just.no.entry.for.thi
e780 73 20 68 6f 73 74 2c 20 74 72 61 6d 70 20 77 69 6c 6c 0a 70 72 6f 6d 70 74 20 66 6f 72 20 70 61 s.host,.tramp.will.prompt.for.pa
e7a0 73 73 77 6f 72 64 20 61 6e 64 20 6f 66 66 65 72 20 79 6f 75 20 74 6f 20 73 61 76 65 20 69 74 2c ssword.and.offer.you.to.save.it,
e7c0 20 69 66 20 79 6f 75 20 61 6e 73 77 65 72 20 27 79 65 73 27 20 79 6f 75 0a 77 69 6c 6c 20 62 65 .if.you.answer.'yes'.you.will.be
e7e0 20 61 62 6c 65 20 74 6f 20 61 63 68 69 65 76 65 20 79 6f 75 20 61 73 79 6e 63 20 6f 70 65 72 61 .able.to.achieve.you.async.opera
e800 74 69 6f 6e 20 61 73 20 74 68 65 20 63 68 69 6c 64 20 45 6d 61 63 73 20 77 69 6c 6c 0a 75 73 65 tion.as.the.child.Emacs.will.use
e820 20 74 68 69 73 20 6a 75 73 74 20 63 72 65 61 74 65 64 20 22 2e 61 75 74 68 69 6e 66 6f 22 20 66 .this.just.created.".authinfo".f
e840 69 6c 65 2c 20 69 66 20 79 6f 75 20 73 61 79 20 27 6e 6f 27 2c 20 79 6f 75 72 20 64 69 72 65 64 ile,.if.you.say.'no',.your.dired
e860 2d 61 73 79 6e 63 0a 70 72 6f 63 65 73 73 20 77 69 6c 6c 20 68 61 6e 67 20 66 6f 72 65 76 65 72 -async.process.will.hang.forever
e880 20 62 65 63 61 75 73 65 20 63 68 69 6c 64 20 65 6d 61 63 73 20 69 73 20 77 61 69 74 69 6e 67 20 .because.child.emacs.is.waiting.
e8a0 66 6f 72 20 70 61 73 73 77 6f 72 64 2e 0a 0a 4e 4f 54 45 3a 20 46 6f 72 20 61 6c 6c 20 79 6f 75 for.password...NOTE:.For.all.you
e8c0 72 20 61 73 79 6e 63 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 73 20 69 6e 20 65 6d 61 63 73 r.async.implementations.in.emacs
e8e0 2d 32 36 2b 20 76 65 72 73 69 6f 6e 73 20 74 68 61 74 0a 68 61 6e 64 6c 65 20 72 65 6d 6f 74 65 -26+.versions.that.handle.remote
e900 20 66 69 6c 65 73 20 28 74 72 61 6d 70 29 2c 20 79 6f 75 20 77 69 6c 6c 20 68 61 76 65 20 74 6f .files.(tramp),.you.will.have.to
e920 20 6c 65 74 2d 62 69 6e 64 0a 60 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 68 60 20 74 .let-bind.`async-quiet-switch`.t
e940 6f 20 60 2d 71 60 20 74 6f 20 77 6f 72 6b 61 72 6f 75 6e 64 20 61 20 74 72 61 6d 70 20 62 75 67 o.`-q`.to.workaround.a.tramp.bug
e960 20 74 68 61 74 20 70 72 65 76 65 6e 74 20 60 65 6d 61 63 73 20 2d 51 60 20 74 6f 20 75 73 65 20 .that.prevent.`emacs.-Q`.to.use.
e980 5b 61 75 74 68 2d 73 6f 75 72 63 65 73 5d 28 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f [auth-sources](https://www.gnu.o
e9a0 72 67 2f 73 6f 66 74 77 61 72 65 2f 65 6d 61 63 73 2f 6d 61 6e 75 61 6c 2f 68 74 6d 6c 5f 6d 6f rg/software/emacs/manual/html_mo
e9c0 6e 6f 2f 61 75 74 68 2e 68 74 6d 6c 29 20 6d 65 63 68 61 6e 69 73 6d 2e 0a 0a 23 23 20 45 6e 61 no/auth.html).mechanism...##.Ena
e9e0 62 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 20 6f 66 20 ble.asynchronous.compilation.of.
ea00 79 6f 75 72 20 28 4d 29 65 6c 70 61 20 70 61 63 6b 61 67 65 73 0a 0a 42 79 20 64 65 66 61 75 6c your.(M)elpa.packages..By.defaul
ea20 74 20 65 6d 61 63 73 20 70 61 63 6b 61 67 65 2e 65 6c 20 63 6f 6d 70 69 6c 65 20 70 61 63 6b 61 t.emacs.package.el.compile.packa
ea40 67 65 73 20 69 6e 20 69 74 73 20 72 75 6e 6e 69 6e 67 20 65 6d 61 63 73 20 73 65 73 73 69 6f 6e ges.in.its.running.emacs.session
ea60 2e 0a 54 68 69 73 20 69 73 20 6e 6f 74 20 61 20 70 72 6f 62 6c 65 6d 20 77 68 65 6e 20 69 6e 73 ..This.is.not.a.problem.when.ins
ea80 74 61 6c 6c 69 6e 67 20 61 20 6e 65 77 20 70 61 63 6b 61 67 65 20 28 77 68 69 63 68 20 69 73 20 talling.a.new.package.(which.is.
eaa0 6e 6f 74 20 61 63 74 75 61 6c 6c 79 20 6c 6f 61 64 65 64 20 69 6e 20 63 75 72 72 65 6e 74 20 65 not.actually.loaded.in.current.e
eac0 6d 61 63 73 29 0a 62 75 74 20 69 74 20 6d 61 79 20 63 72 65 61 74 65 20 65 72 72 6f 72 73 20 61 macs).but.it.may.create.errors.a
eae0 6e 64 20 62 61 64 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 20 77 68 65 6e 20 75 70 67 72 61 64 69 6e nd.bad.compilation.when.upgradin
eb00 67 20 61 20 70 61 63 6b 61 67 65 20 28 6f 6c 64 20 76 65 72 73 69 6f 6e 20 6f 66 20 70 61 63 6b g.a.package.(old.version.of.pack
eb20 61 67 65 20 69 73 20 61 6c 72 65 61 64 79 20 6c 6f 61 64 65 64 0a 61 6e 64 20 72 75 6e 6e 69 6e age.is.already.loaded.and.runnin
eb40 67 20 69 6e 20 63 75 72 72 65 6e 74 20 65 6d 61 63 73 29 2e 0a 59 6f 75 20 63 61 6e 20 72 65 6d g.in.current.emacs)..You.can.rem
eb60 65 64 79 20 74 6f 20 74 68 69 73 20 62 79 20 61 6c 6c 6f 77 69 6e 67 20 61 73 79 6e 63 20 74 6f edy.to.this.by.allowing.async.to
eb80 20 63 6f 6d 70 69 6c 65 20 79 6f 75 72 20 70 61 63 6b 61 67 65 73 20 61 73 79 6e 63 68 72 6f 6e .compile.your.packages.asynchron
eba0 6f 75 73 6c 79 2c 0a 28 68 65 6c 6d 20 61 6e 64 20 6d 61 67 69 74 20 61 63 74 75 61 6c 6c 79 20 ously,.(helm.and.magit.actually.
ebc0 64 6f 20 74 68 69 73 20 62 79 20 64 65 66 61 75 6c 74 2c 0a 73 6f 20 69 66 20 79 6f 75 20 61 72 do.this.by.default,.so.if.you.ar
ebe0 65 20 75 73 69 6e 67 20 74 68 65 73 65 20 70 61 63 6b 61 67 65 73 20 74 68 65 79 20 77 69 6c 6c e.using.these.packages.they.will
ec00 20 63 6f 6d 70 69 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 29 0a 74 6f 20 64 6f 20 74 .compile.asynchronously).to.do.t
ec20 68 69 73 2c 20 61 64 64 20 74 6f 20 79 6f 75 72 20 69 6e 69 74 20 66 69 6c 65 3a 0a 20 20 20 20 his,.add.to.your.init.file:.....
ec40 0a 20 20 20 20 28 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 70 61 63 6b 61 67 65 2d 6d 6f 64 .....(async-bytecomp-package-mod
ec60 65 20 31 29 0a 0a 0a 59 6f 75 20 63 61 6e 20 63 6f 6e 74 72 6f 6c 20 77 68 69 63 68 20 70 61 63 e.1)...You.can.control.which.pac
ec80 6b 61 67 65 73 20 77 69 6c 6c 20 63 6f 6d 70 69 6c 65 20 61 73 79 6e 63 20 77 69 74 68 20 60 61 kages.will.compile.async.with.`a
eca0 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 60 2e sync-bytecomp-allowed-packages`.
ecc0 0a 53 65 74 20 69 74 20 74 6f 20 60 27 28 61 6c 6c 29 60 20 74 6f 20 62 65 20 73 75 72 65 20 79 .Set.it.to.`'(all)`.to.be.sure.y
ece0 6f 75 20 77 69 6c 6c 20 63 6f 6d 70 69 6c 65 20 61 6c 6c 20 70 61 63 6b 61 67 65 73 20 61 73 79 ou.will.compile.all.packages.asy
ed00 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 0a 23 23 20 53 65 6e 64 20 6d 61 69 6c 73 20 61 73 79 6e nchronously...##.Send.mails.asyn
ed20 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 73 6d 74 70 20 6d 61 69 6c 20 61 73 79 6e 63 0a chronously.with.smtp.mail.async.
ed40 0a 54 6f 20 65 6e 61 62 6c 65 20 74 68 69 73 20 66 65 61 74 75 72 65 2c 20 65 6e 73 75 72 65 20 .To.enable.this.feature,.ensure.
ed60 73 6d 74 70 2d 6d 61 69 6c 2d 61 73 79 6e 63 2e 65 6c 20 69 73 20 6c 6f 61 64 65 64 20 61 6e 64 smtp-mail-async.el.is.loaded.and
ed80 20 75 73 65 0a 0a 60 28 73 65 74 71 20 6d 65 73 73 61 67 65 2d 73 65 6e 64 2d 6d 61 69 6c 2d 66 .use..`(setq.message-send-mail-f
eda0 75 6e 63 74 69 6f 6e 20 27 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 29 unction.'async-smtpmail-send-it)
edc0 60 2e 0a 0a 57 41 52 4e 49 4e 47 53 3a 0a 0a 2d 20 57 68 65 6e 20 75 73 69 6e 67 20 72 65 63 65 `...WARNINGS:..-.When.using.rece
ede0 6e 74 20 65 6d 61 63 73 20 28 32 35 2b 29 20 74 68 65 20 6e 65 74 77 6f 72 6b 20 73 65 63 75 72 nt.emacs.(25+).the.network.secur
ee00 69 74 79 20 6d 61 6e 61 67 65 72 20 6d 61 79 62 65 0a 63 61 6c 6c 65 64 20 69 6e 74 65 72 61 63 ity.manager.maybe.called.interac
ee20 74 69 76 65 6c 79 20 69 6e 20 63 68 69 6c 64 20 65 6d 61 63 73 20 61 6e 64 20 6d 61 6b 65 20 60 tively.in.child.emacs.and.make.`
ee40 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 60 0a 66 61 69 6c 2c 20 73 6f async-smtpmail-send-it`.fail,.so
ee60 20 62 65 20 73 75 72 65 20 74 6f 20 73 65 6e 64 20 65 6d 61 69 6c 20 6f 6e 63 65 20 73 79 6e 63 .be.sure.to.send.email.once.sync
ee80 68 72 6f 6e 6f 75 73 6c 79 20 62 65 66 6f 72 65 20 75 73 69 6e 67 0a 60 61 73 79 6e 63 2d 73 6d hronously.before.using.`async-sm
eea0 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 60 20 61 73 20 79 6f 75 72 20 60 6d 65 73 73 61 67 65 tpmail-send-it`.as.your.`message
eec0 2d 73 65 6e 64 2d 6d 61 69 6c 2d 66 75 6e 63 74 69 6f 6e 60 2e 0a 0a 2d 20 59 6f 75 20 6d 61 79 -send-mail-function`...-.You.may
eee0 20 6c 6f 6f 73 65 20 79 6f 75 72 20 73 65 6e 74 20 6d 61 69 6c 20 69 66 20 79 6f 75 72 20 6e 65 .loose.your.sent.mail.if.your.ne
ef00 74 77 6f 72 6b 20 69 73 20 64 6f 77 6e 2c 20 73 6f 20 65 6e 73 75 72 65 20 74 6f 0a 71 75 65 75 twork.is.down,.so.ensure.to.queu
ef20 65 20 79 6f 75 72 20 6d 61 69 6c 73 20 69 66 20 73 6f 2e 20 20 79 6f 75 20 63 61 6e 20 64 6f 20 e.your.mails.if.so...you.can.do.
ef40 74 68 69 73 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 2c 0a 73 65 65 20 5b 69 73 73 75 65 20 23 this.automatically,.see.[issue.#
ef60 36 34 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 64](https://github.com/jwiegley/
ef80 65 6d 61 63 73 2d 61 73 79 6e 63 2f 69 73 73 75 65 73 2f 36 34 29 2e 0a 0a 23 20 41 73 79 6e 63 emacs-async/issues/64)...#.Async
efa0 20 75 73 61 67 65 0a 0a 54 68 65 20 69 6e 74 65 72 66 61 63 65 20 69 73 20 69 6e 74 65 6e 64 65 .usage..The.interface.is.intende
efc0 64 20 74 6f 20 62 65 20 76 65 72 79 20 65 61 73 79 20 74 6f 20 75 73 65 3a 0a 0a 23 23 20 61 73 d.to.be.very.easy.to.use:..##.as
efe0 79 6e 63 2d 73 74 61 72 74 0a 0a 20 20 20 20 61 73 79 6e 63 2d 73 74 61 72 74 20 53 54 41 52 54 ync-start......async-start.START
f000 2d 46 55 4e 43 20 46 49 4e 49 53 48 2d 46 55 4e 43 0a 0a 45 78 65 63 75 74 65 20 53 54 41 52 54 -FUNC.FINISH-FUNC..Execute.START
f020 2d 46 55 4e 43 20 28 6f 66 74 65 6e 20 61 20 6c 61 6d 62 64 61 29 20 69 6e 20 61 20 73 75 62 6f -FUNC.(often.a.lambda).in.a.subo
f040 72 64 69 6e 61 74 65 20 45 6d 61 63 73 20 70 72 6f 63 65 73 73 2e 20 20 57 68 65 6e 0a 64 6f 6e rdinate.Emacs.process...When.don
f060 65 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 70 61 73 73 65 64 20 74 6f e,.the.return.value.is.passed.to
f080 20 46 49 4e 49 53 48 2d 46 55 4e 43 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 0a 60 60 60 65 6c 69 73 .FINISH-FUNC...Example:..```elis
f0a0 70 0a 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 p.(async-start....;;.What.to.do.
f0c0 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 28 6c 61 6d 62 64 61 20 in.the.child.process....(lambda.
f0e0 28 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 69 73 20 61 20 74 65 73 74 ()......(message."This.is.a.test
f100 22 29 0a 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 33 29 0a 20 20 20 20 20 32 32 32 29 0a ")......(sleep-for.3)......222).
f120 0a 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 69 74 20 66 69 6e 69 73 68 ....;;.What.to.do.when.it.finish
f140 65 73 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 28 6d 65 73 es....(lambda.(result)......(mes
f160 73 61 67 65 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 sage."Async.process.done,.result
f180 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 72 65 73 75 6c 74 29 29 29 0a 60 60 .should.be.222:.%s".result))).``
f1a0 60 0a 0a 49 66 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 60 6e 69 6c 60 20 6f 72 20 6d 69 `..If.FINISH-FUNC.is.`nil`.or.mi
f1c0 73 73 69 6e 67 2c 20 61 20 66 75 74 75 72 65 20 69 73 20 72 65 74 75 72 6e 65 64 20 74 68 61 74 ssing,.a.future.is.returned.that
f1e0 20 63 61 6e 20 62 65 20 69 6e 73 70 65 63 74 65 64 0a 75 73 69 6e 67 20 60 61 73 79 6e 63 2d 67 .can.be.inspected.using.`async-g
f200 65 74 60 2c 20 62 6c 6f 63 6b 69 6e 67 20 75 6e 74 69 6c 20 74 68 65 20 76 61 6c 75 65 20 69 73 et`,.blocking.until.the.value.is
f220 20 72 65 61 64 79 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 6c 65 74 .ready...Example:..```elisp.(let
f240 20 28 28 70 72 6f 63 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 .((proc.(async-start............
f260 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 ....;;.What.to.do.in.the.child.p
f280 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 rocess................(lambda.()
f2a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 ..................(message."This
f2c0 20 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 .is.a.test")..................(s
f2e0 6c 65 65 70 2d 66 6f 72 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 32 32 leep-for.3)..................222
f300 29 29 29 29 0a 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 49 27 6d 20 67 6f 69 6e 67 20 74 6f ))))......(message."I'm.going.to
f320 20 64 6f 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 22 29 20 3b 3b 20 2e 2e 2e 2e 0a 0a 20 20 .do.some.work.here").;;.........
f340 20 20 28 6d 65 73 73 61 67 65 20 22 57 61 69 74 69 6e 67 20 6f 6e 20 61 73 79 6e 63 20 70 72 6f ..(message."Waiting.on.async.pro
f360 63 65 73 73 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 0a cess,.result.should.be.222:.%s".
f380 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 67 65 74 20 70 72 6f 63 29 29 29 0a .............(async-get.proc))).
f3a0 60 60 60 0a 0a 49 66 20 79 6f 75 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 6f 20 75 73 65 20 61 20 ```..If.you.don't.want.to.use.a.
f3c0 63 61 6c 6c 62 61 63 6b 2c 20 61 6e 64 20 79 6f 75 20 64 6f 6e 27 74 20 63 61 72 65 20 61 62 6f callback,.and.you.don't.care.abo
f3e0 75 74 20 61 6e 79 20 72 65 74 75 72 6e 20 76 61 6c 75 65 0a 66 72 6f 6d 20 74 68 65 20 63 68 69 ut.any.return.value.from.the.chi
f400 6c 64 20 70 72 6f 63 65 73 73 2c 20 70 61 73 73 20 74 68 65 20 60 27 69 67 6e 6f 72 65 60 20 73 ld.process,.pass.the.`'ignore`.s
f420 79 6d 62 6f 6c 20 61 73 20 74 68 65 20 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 28 69 66 ymbol.as.the.second.argument.(if
f440 0a 79 6f 75 20 64 6f 6e 27 74 2c 20 61 6e 64 20 6e 65 76 65 72 20 63 61 6c 6c 20 60 61 73 79 6e .you.don't,.and.never.call.`asyn
f460 63 2d 67 65 74 60 2c 20 69 74 20 77 69 6c 6c 20 6c 65 61 76 65 20 60 60 2a 65 6d 61 63 73 2a 60 c-get`,.it.will.leave.``*emacs*`
f480 60 20 70 72 6f 63 65 73 73 20 62 75 66 66 65 72 73 0a 68 61 6e 67 69 6e 67 20 61 72 6f 75 6e 64 `.process.buffers.hanging.around
f4a0 29 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 28 6c 61 6d 62 ):..```elisp.(async-start..(lamb
f4c0 64 61 20 28 29 0a 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 22 61 20 72 65 6d 6f 74 65 20 da.()....(delete-file."a.remote.
f4e0 66 69 6c 65 20 6f 6e 20 61 20 73 6c 6f 77 20 6c 69 6e 6b 22 20 6e 69 6c 29 29 0a 20 27 69 67 6e file.on.a.slow.link".nil))..'ign
f500 6f 72 65 29 0a 60 60 60 0a 0a 4e 6f 74 65 3a 20 45 76 65 6e 20 77 68 65 6e 20 46 49 4e 49 53 48 ore).```..Note:.Even.when.FINISH
f520 2d 46 55 4e 43 20 69 73 20 70 72 65 73 65 6e 74 2c 20 61 20 66 75 74 75 72 65 20 69 73 20 73 74 -FUNC.is.present,.a.future.is.st
f540 69 6c 6c 20 72 65 74 75 72 6e 65 64 20 65 78 63 65 70 74 20 74 68 61 74 0a 69 74 20 79 69 65 6c ill.returned.except.that.it.yiel
f560 64 73 20 6e 6f 20 76 61 6c 75 65 20 28 73 69 6e 63 65 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 ds.no.value.(since.the.value.is.
f580 70 61 73 73 65 64 20 74 6f 20 46 49 4e 49 53 48 2d 46 55 4e 43 29 2e 20 20 43 61 6c 6c 69 6e 67 passed.to.FINISH-FUNC)...Calling
f5a0 0a 60 61 73 79 6e 63 2d 67 65 74 60 20 6f 6e 20 73 75 63 68 20 61 20 66 75 74 75 72 65 20 61 6c .`async-get`.on.such.a.future.al
f5c0 77 61 79 73 20 72 65 74 75 72 6e 73 20 60 6e 69 6c 60 2e 20 20 49 74 20 63 61 6e 20 73 74 69 6c ways.returns.`nil`...It.can.stil
f5e0 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 68 6f 77 65 76 65 72 2c 20 61 73 20 61 6e 20 61 72 67 75 l.be.useful,.however,.as.an.argu
f600 6d 65 6e 74 20 74 6f 20 60 61 73 79 6e 63 2d 72 65 61 64 79 60 20 6f 72 20 60 61 73 79 6e 63 2d ment.to.`async-ready`.or.`async-
f620 77 61 69 74 60 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 0a 0a wait`...##.async-start-process..
f640 20 20 20 20 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 4e 41 4d 45 20 50 52 4f ....async-start-process.NAME.PRO
f660 47 52 41 4d 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 26 72 65 73 74 20 50 52 4f 47 52 41 4d 2d 41 GRAM.FINISH-FUNC.&rest.PROGRAM-A
f680 52 47 53 0a 0a 53 74 61 72 74 20 74 68 65 20 65 78 65 63 75 74 61 62 6c 65 20 50 52 4f 47 52 41 RGS..Start.the.executable.PROGRA
f6a0 4d 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 20 20 53 65 65 20 60 61 73 79 6e 63 2d 73 74 M.asynchronously...See.`async-st
f6c0 61 72 74 60 2e 20 20 50 52 4f 47 52 41 4d 20 69 73 0a 70 61 73 73 65 64 20 50 52 4f 47 52 41 4d art`...PROGRAM.is.passed.PROGRAM
f6e0 2d 41 52 47 53 2c 20 63 61 6c 6c 69 6e 67 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 77 69 74 68 20 -ARGS,.calling.FINISH-FUNC.with.
f700 74 68 65 20 70 72 6f 63 65 73 73 20 6f 62 6a 65 63 74 20 77 68 65 6e 20 64 6f 6e 65 2e 0a 49 66 the.process.object.when.done..If
f720 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 60 6e 69 6c 60 2c 20 74 68 65 20 66 75 74 75 72 .FINISH-FUNC.is.`nil`,.the.futur
f740 65 20 6f 62 6a 65 63 74 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 68 65 20 70 72 6f 63 65 73 73 e.object.will.return.the.process
f760 20 6f 62 6a 65 63 74 20 77 68 65 6e 0a 74 68 65 20 70 72 6f 67 72 61 6d 20 69 73 20 66 69 6e 69 .object.when.the.program.is.fini
f780 73 68 65 64 2e 20 20 53 65 74 20 44 45 46 41 55 4c 54 2d 44 49 52 45 43 54 4f 52 59 20 74 6f 20 shed...Set.DEFAULT-DIRECTORY.to.
f7a0 63 68 61 6e 67 65 20 50 52 4f 47 52 41 4d 27 73 20 63 75 72 72 65 6e 74 0a 77 6f 72 6b 69 6e 67 change.PROGRAM's.current.working
f7c0 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 67 65 74 0a 0a 20 20 20 20 61 .directory...##.async-get......a
f7e0 73 79 6e 63 2d 67 65 74 20 46 55 54 55 52 45 0a 0a 47 65 74 20 74 68 65 20 76 61 6c 75 65 20 66 sync-get.FUTURE..Get.the.value.f
f800 72 6f 6d 20 61 6e 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 63 61 6c 6c 65 64 20 66 75 6e rom.an.asynchronously.called.fun
f820 63 74 69 6f 6e 20 77 68 65 6e 20 69 74 20 69 73 20 72 65 61 64 79 2e 20 20 46 55 54 55 52 45 20 ction.when.it.is.ready...FUTURE.
f840 69 73 0a 72 65 74 75 72 6e 65 64 20 62 79 20 60 61 73 79 6e 63 2d 73 74 61 72 74 60 20 6f 72 20 is.returned.by.`async-start`.or.
f860 60 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 60 20 77 68 65 6e 20 69 74 73 20 46 `async-start-process`.when.its.F
f880 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 0a 60 6e 69 6c 60 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 72 INISH-FUNC.is.`nil`...##.async-r
f8a0 65 61 64 79 0a 0a 20 20 20 20 61 73 79 6e 63 2d 72 65 61 64 79 20 46 55 54 55 52 45 0a 0a 51 75 eady......async-ready.FUTURE..Qu
f8c0 65 72 79 20 61 20 46 55 54 55 52 45 20 74 6f 20 73 65 65 20 69 66 20 69 74 73 20 66 75 6e 63 74 ery.a.FUTURE.to.see.if.its.funct
f8e0 69 6f 6e 27 73 20 76 61 6c 75 65 20 69 73 20 72 65 61 64 79 20 2d 2d 20 69 2e 65 2e 2c 20 69 66 ion's.value.is.ready.--.i.e.,.if
f900 20 6e 6f 20 62 6c 6f 63 6b 69 6e 67 0a 77 6f 75 6c 64 20 72 65 73 75 6c 74 20 66 72 6f 6d 20 61 .no.blocking.would.result.from.a
f920 20 63 61 6c 6c 20 74 6f 20 60 61 73 79 6e 63 2d 67 65 74 60 20 6f 6e 20 74 68 61 74 20 46 55 54 .call.to.`async-get`.on.that.FUT
f940 55 52 45 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 77 61 69 74 0a 0a 20 20 20 20 61 73 79 6e 63 2d 77 URE...##.async-wait......async-w
f960 61 69 74 20 46 55 54 55 52 45 0a 0a 57 61 69 74 20 66 6f 72 20 46 55 54 55 52 45 20 74 6f 20 62 ait.FUTURE..Wait.for.FUTURE.to.b
f980 65 63 6f 6d 65 20 72 65 61 64 79 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 ecome.ready...##.async-inject-va
f9a0 72 69 61 62 6c 65 73 0a 0a 20 20 20 20 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 riables......async-inject-variab
f9c0 6c 65 73 20 49 4e 43 4c 55 44 45 2d 52 45 47 45 58 50 20 26 6f 70 74 69 6f 6e 61 6c 20 50 52 45 les.INCLUDE-REGEXP.&optional.PRE
f9e0 44 49 43 41 54 45 20 45 58 43 4c 55 44 45 2d 52 45 47 45 58 50 0a 0a 52 65 74 75 72 6e 20 61 20 DICATE.EXCLUDE-REGEXP..Return.a.
fa00 60 73 65 74 71 60 20 66 6f 72 6d 20 74 68 61 74 20 72 65 70 6c 69 63 61 74 65 73 20 70 61 72 74 `setq`.form.that.replicates.part
fa20 20 6f 66 20 74 68 65 20 63 61 6c 6c 69 6e 67 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e 20 20 49 74 .of.the.calling.environment...It
fa40 20 73 65 74 73 0a 74 68 65 20 76 61 6c 75 65 20 66 6f 72 20 65 76 65 72 79 20 76 61 72 69 61 62 .sets.the.value.for.every.variab
fa60 6c 65 20 6d 61 74 63 68 69 6e 67 20 49 4e 43 4c 55 44 45 2d 52 45 47 45 58 50 20 61 6e 64 20 61 le.matching.INCLUDE-REGEXP.and.a
fa80 6c 73 6f 20 50 52 45 44 49 43 41 54 45 2e 20 20 49 74 0a 77 69 6c 6c 20 6e 6f 74 20 70 65 72 66 lso.PREDICATE...It.will.not.perf
faa0 6f 72 6d 20 69 6e 6a 65 63 74 69 6f 6e 20 66 6f 72 20 61 6e 79 20 76 61 72 69 61 62 6c 65 20 6d orm.injection.for.any.variable.m
fac0 61 74 63 68 69 6e 67 20 45 58 43 4c 55 44 45 2d 52 45 47 45 58 50 20 28 69 66 0a 70 72 65 73 65 atching.EXCLUDE-REGEXP.(if.prese
fae0 6e 74 29 2e 20 20 49 74 20 69 73 20 69 6e 74 65 6e 64 65 64 20 74 6f 20 62 65 20 75 73 65 64 20 nt)...It.is.intended.to.be.used.
fb00 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 61 73 79 6e 63 2d 73 74 61 as.follows:..```elisp.(async-sta
fb20 72 74 0a 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 28 72 65 71 75 69 72 65 rt....`(lambda.().......(require
fb40 20 27 73 6d 74 70 6d 61 69 6c 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 .'smtpmail).......(with-temp-buf
fb60 66 65 72 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 2c 28 62 75 66 66 65 72 2d 73 75 62 fer.........(insert.,(buffer-sub
fb80 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 string-no-properties.(point-min)
fba0 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 50 61 73 73 20 69 .(point-max))).........;;.Pass.i
fbc0 6e 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 66 6f 72 20 73 n.the.variable.environment.for.s
fbe0 6d 74 70 6d 61 69 6c 0a 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 mtpmail.........,(async-inject-v
fc00 61 72 69 61 62 6c 65 73 20 22 5c 5c 60 5c 5c 28 73 6d 74 70 6d 61 69 6c 5c 5c 7c 5c 5c 28 75 73 ariables."\\`\\(smtpmail\\|\\(us
fc20 65 72 2d 5c 5c 29 3f 6d 61 69 6c 5c 5c 29 2d 22 29 0a 20 20 20 20 20 20 20 20 28 73 6d 74 70 6d er-\\)?mail\\)-").........(smtpm
fc40 61 69 6c 2d 73 65 6e 64 2d 69 74 29 29 29 0a 20 20 20 27 69 67 6e 6f 72 65 29 0a 60 60 60 0a 0a ail-send-it)))....'ignore).```..
fc60 23 23 20 61 73 79 6e 63 2d 6c 65 74 0a 0a 20 20 20 20 61 73 79 6e 63 2d 6c 65 74 20 42 49 4e 44 ##.async-let......async-let.BIND
fc80 49 4e 47 53 20 26 72 65 73 74 20 46 4f 52 4d 53 0a 20 20 20 20 0a 41 6c 6c 6f 77 20 74 6f 20 65 INGS.&rest.FORMS......Allow.to.e
fca0 73 74 61 62 6c 69 73 68 20 6c 65 74 20 62 69 6e 64 69 6e 67 73 20 61 73 79 6e 63 68 72 6f 6e 6f stablish.let.bindings.asynchrono
fcc0 75 73 6c 79 2e 0a 45 61 63 68 20 76 61 6c 75 65 20 6f 66 20 62 69 6e 64 69 6e 67 20 63 61 6e 20 usly..Each.value.of.binding.can.
fce0 72 65 66 65 72 20 74 6f 20 74 68 65 20 73 79 6d 62 6f 6c 73 20 61 6c 72 65 61 64 79 20 62 6f 75 refer.to.the.symbols.already.bou
fd00 6e 64 20 69 6e 20 42 49 4e 44 49 4e 47 53 20 28 6c 69 6b 65 20 60 6c 65 74 2a 60 29 2e 0a 46 4f nd.in.BINDINGS.(like.`let*`)..FO
fd20 52 4d 53 20 61 72 65 20 65 78 65 63 75 74 65 64 20 6f 6e 63 65 20 42 49 4e 44 49 4e 47 53 20 68 RMS.are.executed.once.BINDINGS.h
fd40 61 76 65 20 62 65 65 6e 20 65 76 61 6c 75 61 74 65 64 2c 20 62 75 74 20 77 69 74 68 6f 75 74 20 ave.been.evaluated,.but.without.
fd60 62 6c 6f 63 6b 69 6e 67 20 65 6d 61 63 73 2e 0a 0a 45 78 61 6d 70 6c 65 73 3a 0a 0a 60 60 60 65 blocking.emacs...Examples:..```e
fd80 6c 69 73 70 0a 28 61 73 79 6e 63 2d 6c 65 74 20 28 28 78 20 22 68 65 6c 6c 6f 22 29 0a 20 20 20 lisp.(async-let.((x."hello")....
fda0 20 20 20 20 20 20 20 20 20 28 79 20 22 77 6f 72 6c 64 22 29 29 0a 20 20 28 6d 65 73 73 61 67 65 .........(y."world"))...(message
fdc0 20 22 25 73 20 25 73 22 20 78 20 79 29 29 0a 20 20 0a 28 61 73 79 6e 63 2d 6c 65 74 20 28 28 78 ."%s.%s".x.y))....(async-let.((x
fde0 20 28 2a 20 35 20 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 79 20 28 2b 20 78 20 34 29 .(*.5.2)).............(y.(+.x.4)
fe00 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 7a 20 28 2b 20 78 20 79 29 29 29 0a 20 20 28 6d 65 ).............(z.(+.x.y)))...(me
fe20 73 73 61 67 65 20 22 25 64 20 2b 20 25 64 20 3d 20 25 64 22 20 78 20 79 20 7a 29 29 0a 0a 60 60 ssage."%d.+.%d.=.%d".x.y.z))..``
fe40 60 0a 0a 4e 6f 74 65 20 74 68 61 74 20 69 66 20 79 6f 75 20 62 69 6e 64 20 73 6f 6d 65 74 68 69 `..Note.that.if.you.bind.somethi
fe60 6e 67 20 74 6f 20 6e 69 6c 20 61 6e 64 20 73 65 74 20 69 74 20 61 66 74 65 72 77 61 72 64 20 69 ng.to.nil.and.set.it.afterward.i
fe80 6e 20 62 6f 64 79 2c 20 74 68 65 20 65 76 61 6c 75 61 74 69 6f 6e 0a 6f 66 20 74 68 69 73 20 62 n.body,.the.evaluation.of.this.b
fea0 69 6e 64 69 6e 67 20 77 69 6c 6c 20 4e 4f 54 20 62 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 2c inding.will.NOT.be.asynchronous,
fec0 20 62 75 74 20 77 69 6c 6c 20 68 61 70 70 65 6e 20 69 6e 20 79 6f 75 20 63 75 72 72 65 6e 74 20 .but.will.happen.in.you.current.
fee0 65 6d 61 63 73 2c 20 62 6c 6f 63 6b 69 6e 67 20 69 74 0a 69 66 20 74 68 65 20 65 76 61 6c 75 61 emacs,.blocking.it.if.the.evalua
ff00 74 69 6f 6e 20 6f 66 20 74 68 69 73 20 76 61 6c 75 65 20 69 73 20 73 75 66 66 69 63 69 65 6e 74 tion.of.this.value.is.sufficient
ff20 6c 79 20 69 6d 70 6f 72 74 61 6e 74 2c 20 65 2e 67 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 61 73 ly.important,.e.g:..```elisp.(as
ff40 79 6e 63 2d 6c 65 74 20 28 28 78 20 22 68 65 6c 6c 6f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 ync-let.((x."hello")............
ff60 20 28 79 20 22 77 6f 72 6c 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 7a 29 0a 20 20 28 73 .(y."world").............z)...(s
ff80 65 74 71 20 7a 20 28 2b 20 31 20 32 29 29 20 3b 3b 20 48 75 67 65 20 63 61 6c 63 75 6c 61 74 69 etq.z.(+.1.2)).;;.Huge.calculati
ffa0 6f 6e 20 6f 66 20 5a 20 77 69 6c 6c 20 62 6c 6f 63 6b 20 65 6d 61 63 73 2e 0a 20 20 28 6d 65 73 on.of.Z.will.block.emacs....(mes
ffc0 73 61 67 65 20 22 25 73 20 25 73 20 25 64 22 20 78 20 79 20 7a 29 29 0a 0a 60 60 60 0a 0a 49 4f sage."%s.%s.%d".x.y.z))..```..IO
ffe0 57 20 69 66 20 74 68 65 20 63 61 6c 63 75 6c 61 74 69 6f 6e 20 6f 66 20 5a 20 69 73 20 68 75 67 W.if.the.calculation.of.Z.is.hug
10000 65 20 61 6e 64 20 79 6f 75 20 77 61 6e 74 20 69 74 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 65 e.and.you.want.it.asynchronous.e
10020 76 61 6c 75 61 74 65 20 69 74 20 69 6e 20 42 49 4e 44 49 4e 47 53 0a 62 75 74 20 6e 6f 74 20 69 valuate.it.in.BINDINGS.but.not.i
10040 6e 20 46 4f 52 4d 53 2e 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 n.FORMS.........................
10060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
100a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
100c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
100e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
101a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
101c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
101e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10200 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.8/async.el............
10220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
10280 30 30 35 34 31 37 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 37 35 35 00 20 30 00 00 00 0054172.00000000000.012755..0...
102a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
102c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
102e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
10320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
10340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
103a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
103c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
103e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10400 3b 3b 3b 20 61 73 79 6e 63 2e 65 6c 20 2d 2d 2d 20 41 73 79 6e 63 68 72 6f 6e 6f 75 73 20 70 72 ;;;.async.el.---.Asynchronous.pr
10420 6f 63 65 73 73 69 6e 67 20 69 6e 20 45 6d 61 63 73 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 ocessing.in.Emacs.-*-.lexical-bi
10440 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 nding:.t.-*-..;;.Copyright.(C).2
10460 30 31 32 2d 32 30 32 32 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 012-2022.Free.Software.Foundatio
10480 6e 2c 20 49 6e 63 2e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 68 6e 20 57 69 65 67 6c 65 79 n,.Inc...;;.Author:.John.Wiegley
104a0 20 3c 6a 77 69 65 67 6c 65 79 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 .<jwiegley@gmail.com>.;;.Maintai
104c0 6e 65 72 3a 20 54 68 69 65 72 72 79 20 56 6f 6c 70 69 61 74 74 6f 20 3c 74 68 69 65 76 6f 6c 40 ner:.Thierry.Volpiatto.<thievol@
104e0 70 6f 73 74 65 6f 2e 6e 65 74 3e 0a 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 31 38 20 4a 75 6e 20 posteo.net>..;;.Created:.18.Jun.
10500 32 30 31 32 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 31 2e 39 2e 38 0a 3b 3b 20 50 61 63 6b 61 67 2012.;;.Version:.1.9.8.;;.Packag
10520 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 65 6d 61 63 73 20 22 32 34 2e 34 22 29 29 0a 0a 3b 3b e-Requires:.((emacs."24.4"))..;;
10540 20 4b 65 79 77 6f 72 64 73 3a 20 61 73 79 6e 63 0a 3b 3b 20 58 2d 55 52 4c 3a 20 68 74 74 70 73 .Keywords:.async.;;.X-URL:.https
10560 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 65 6d 61 63 73 2d 61 73 79 ://github.com/jwiegley/emacs-asy
10580 6e 63 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 nc..;;.This.program.is.free.soft
105a0 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e ware;.you.can.redistribute.it.an
105c0 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d d/or.modify.;;.it.under.the.term
105e0 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 s.of.the.GNU.General.Public.Lice
10600 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 nse.as.published.by.;;.the.Free.
10620 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 Software.Foundation,.either.vers
10640 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 ion.3.of.the.License,.or.;;.(at.
10660 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a your.option).any.later.version..
10680 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 .;;.This.program.is.distributed.
106a0 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 in.the.hope.that.it.will.be.usef
106c0 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b ul,.;;.but.WITHOUT.ANY.WARRANTY;
106e0 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e .without.even.the.implied.warran
10700 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e ty.of.;;.MERCHANTABILITY.or.FITN
10720 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 ESS.FOR.A.PARTICULAR.PURPOSE...S
10740 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 ee.the.;;.GNU.General.Public.Lic
10760 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 ense.for.more.details...;;.You.s
10780 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 hould.have.received.a.copy.of.th
107a0 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 e.GNU.General.Public.License.;;.
107c0 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 along.with.this.program...If.not
107e0 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e ,.see.<https://www.gnu.org/licen
10800 73 65 73 2f 3e 2e 0a 0c 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 41 64 64 ses/>....;;;.Commentary:..;;.Add
10820 73 20 74 68 65 20 61 62 69 6c 69 74 79 20 74 6f 20 63 61 6c 6c 20 61 73 79 6e 63 68 72 6f 6e 6f s.the.ability.to.call.asynchrono
10840 75 73 20 66 75 6e 63 74 69 6f 6e 73 20 61 6e 64 20 70 72 6f 63 65 73 73 20 77 69 74 68 20 65 61 us.functions.and.process.with.ea
10860 73 65 2e 20 20 53 65 65 0a 3b 3b 20 74 68 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 66 6f se...See.;;.the.documentation.fo
10880 72 20 60 61 73 79 6e 63 2d 73 74 61 72 74 27 20 61 6e 64 20 60 61 73 79 6e 63 2d 73 74 61 72 74 r.`async-start'.and.`async-start
108a0 2d 70 72 6f 63 65 73 73 27 2e 0a 0c 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 65 76 61 6c 2d 77 68 -process'....;;;.Code:..(eval-wh
108c0 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 29 0a 0a 28 en-compile.(require.'cl-lib))..(
108e0 64 65 66 76 61 72 20 74 72 61 6d 70 2d 70 61 73 73 77 6f 72 64 2d 70 72 6f 6d 70 74 2d 72 65 67 defvar.tramp-password-prompt-reg
10900 65 78 70 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 61 73 79 6e 63 20 6e 69 6c 0a 20 20 22 53 69 6d exp)..(defgroup.async.nil..."Sim
10920 70 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 70 72 6f 63 65 73 73 69 6e 67 20 69 6e 20 45 ple.asynchronous.processing.in.E
10940 6d 61 63 73 22 0a 20 20 3a 67 72 6f 75 70 20 27 6c 69 73 70 29 0a 0a 28 64 65 66 63 75 73 74 6f macs"...:group.'lisp)..(defcusto
10960 6d 20 61 73 79 6e 63 2d 76 61 72 69 61 62 6c 65 73 2d 6e 6f 70 72 6f 70 73 2d 66 75 6e 63 74 69 m.async-variables-noprops-functi
10980 6f 6e 20 23 27 61 73 79 6e 63 2d 2d 70 75 72 65 63 6f 70 79 0a 20 20 22 44 65 66 61 75 6c 74 20 on.#'async--purecopy..."Default.
109a0 66 75 6e 63 74 69 6f 6e 20 74 6f 20 72 65 6d 6f 76 65 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 function.to.remove.text.properti
109c0 65 73 20 69 6e 20 76 61 72 69 61 62 6c 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 75 6e 63 74 es.in.variables."...:type.'funct
109e0 69 6f 6e 29 0a 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 64 65 62 75 67 20 6e 69 6c 29 0a 28 ion)..(defvar.async-debug.nil).(
10a00 64 65 66 76 61 72 20 61 73 79 6e 63 2d 73 65 6e 64 2d 6f 76 65 72 2d 70 69 70 65 20 74 29 0a 28 defvar.async-send-over-pipe.t).(
10a20 64 65 66 76 61 72 20 61 73 79 6e 63 2d 69 6e 2d 63 68 69 6c 64 2d 65 6d 61 63 73 20 6e 69 6c 29 defvar.async-in-child-emacs.nil)
10a40 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 6e 69 6c 29 0a 28 64 65 .(defvar.async-callback.nil).(de
10a60 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 66 6f 72 2d 70 72 6f 63 65 73 73 20 fvar.async-callback-for-process.
10a80 6e 69 6c 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 69 66 20 74 68 65 20 73 75 62 70 72 6f 63 65 73 73 nil..."Non-nil.if.the.subprocess
10aa0 20 69 73 20 6e 6f 74 20 45 6d 61 63 73 20 65 78 65 63 75 74 69 6e 67 20 61 20 6c 69 73 70 20 66 .is.not.Emacs.executing.a.lisp.f
10ac0 6f 72 6d 2e 22 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 orm.").(defvar.async-callback-va
10ae0 6c 75 65 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d lue.nil).(defvar.async-callback-
10b00 76 61 6c 75 65 2d 73 65 74 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 75 72 value-set.nil).(defvar.async-cur
10b20 72 65 6e 74 2d 70 72 6f 63 65 73 73 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d rent-process.nil).(defvar.async-
10b40 2d 70 72 6f 63 76 61 72 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 72 65 61 64 -procvar.nil).(defvar.async-read
10b60 2d 6d 61 72 6b 65 72 20 6e 69 6c 0a 20 20 22 50 6f 73 69 74 69 6f 6e 20 66 72 6f 6d 20 77 68 69 -marker.nil..."Position.from.whi
10b80 63 68 20 77 65 20 72 65 61 64 20 74 68 65 20 6c 61 73 74 20 6d 65 73 73 61 67 65 20 70 61 63 6b ch.we.read.the.last.message.pack
10ba0 65 74 2e 0a 0a 4d 65 73 73 61 67 65 20 70 61 63 6b 65 74 73 20 61 72 65 20 64 65 6c 69 76 65 72 et...Message.packets.are.deliver
10bc0 65 64 20 66 72 6f 6d 20 63 6c 69 65 6e 74 20 6c 69 6e 65 2d 62 79 2d 6c 69 6e 65 20 61 73 20 62 ed.from.client.line-by-line.as.b
10be0 61 73 65 36 34 0a 65 6e 63 6f 64 65 64 20 73 74 72 69 6e 67 73 2e 22 29 0a 28 64 65 66 76 61 72 ase64.encoded.strings.").(defvar
10c00 20 61 73 79 6e 63 2d 63 68 69 6c 64 2d 69 6e 69 74 20 6e 69 6c 0a 20 20 22 49 6e 69 74 69 61 6c .async-child-init.nil..."Initial
10c20 69 73 61 74 69 6f 6e 20 66 69 6c 65 20 66 6f 72 20 61 73 79 6e 63 20 63 68 69 6c 64 20 45 6d 61 isation.file.for.async.child.Ema
10c40 63 73 2e 0a 0a 49 66 20 64 65 66 69 6e 65 64 20 74 68 69 73 20 61 6c 6c 6f 77 73 20 66 6f 72 20 cs...If.defined.this.allows.for.
10c60 61 6e 20 69 6e 69 74 20 66 69 6c 65 20 74 6f 20 73 65 74 75 70 20 74 68 65 20 63 68 69 6c 64 20 an.init.file.to.setup.the.child.
10c80 45 6d 61 63 73 2e 20 49 74 0a 73 68 6f 75 6c 64 20 6e 6f 74 20 62 65 20 79 6f 75 72 20 6e 6f 72 Emacs..It.should.not.be.your.nor
10ca0 6d 61 6c 20 69 6e 69 74 2e 65 6c 20 61 73 20 74 68 61 74 20 77 6f 75 6c 64 20 6c 69 6b 65 6c 79 mal.init.el.as.that.would.likely
10cc0 20 6c 6f 61 64 20 6d 6f 72 65 0a 74 68 69 6e 67 73 20 74 68 61 74 20 79 6f 75 20 72 65 71 75 69 .load.more.things.that.you.requi
10ce0 72 65 2e 20 49 74 20 73 68 6f 75 6c 64 20 6c 69 6d 69 74 20 69 74 73 65 6c 66 20 74 6f 20 65 6e re..It.should.limit.itself.to.en
10d00 73 75 72 69 6e 67 20 70 61 74 68 73 20 68 61 76 65 0a 62 65 65 6e 20 73 65 74 75 70 20 73 6f 20 suring.paths.have.been.setup.so.
10d20 61 6e 79 20 61 73 79 6e 63 20 63 6f 64 65 20 63 61 6e 20 6c 6f 61 64 20 6c 69 62 72 61 72 69 65 any.async.code.can.load.librarie
10d40 73 20 79 6f 75 20 65 78 70 65 63 74 2e 22 29 0a 0a 3b 3b 20 46 6f 72 20 65 6d 61 63 73 3c 32 39 s.you.expect.")..;;.For.emacs<29
10d60 20 28 6f 6e 6c 79 20 65 78 69 73 74 73 20 69 6e 20 65 6d 61 63 73 2d 32 39 2b 29 2e 0a 28 64 65 .(only.exists.in.emacs-29+)..(de
10d80 66 76 61 72 20 70 72 69 6e 74 2d 73 79 6d 62 6f 6c 73 2d 62 61 72 65 29 0a 0a 28 64 65 66 75 6e fvar.print-symbols-bare)..(defun
10da0 20 61 73 79 6e 63 2d 2d 70 75 72 65 63 6f 70 79 20 28 6f 62 6a 65 63 74 29 0a 20 20 22 52 65 6d .async--purecopy.(object)..."Rem
10dc0 6f 76 65 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 20 69 6e 20 4f 42 4a 45 43 54 2e 0a 0a ove.text.properties.in.OBJECT...
10de0 41 72 67 75 6d 65 6e 74 20 4f 42 4a 45 43 54 20 6d 61 79 20 62 65 20 61 20 6c 69 73 74 20 6f 72 Argument.OBJECT.may.be.a.list.or
10e00 20 61 20 73 74 72 69 6e 67 2c 20 69 66 20 61 6e 79 74 68 69 6e 67 20 65 6c 73 65 20 69 74 0a 69 .a.string,.if.anything.else.it.i
10e20 73 20 72 65 74 75 72 6e 65 64 20 75 6e 6d 6f 64 69 66 69 65 64 2e 22 0a 20 20 28 63 6f 6e 64 20 s.returned.unmodified."...(cond.
10e40 28 28 73 74 72 69 6e 67 70 20 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 28 73 75 62 73 ((stringp.object)..........(subs
10e60 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6f 62 6a 65 63 74 29 29 0a 20 20 20 tring-no-properties.object))....
10e80 20 20 20 20 20 28 28 63 6f 6e 73 70 20 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 28 63 .....((consp.object)..........(c
10ea0 6c 2d 6c 6f 6f 70 20 66 6f 72 20 65 6c 6d 20 69 6e 20 6f 62 6a 65 63 74 0a 20 20 20 20 20 20 20 l-loop.for.elm.in.object........
10ec0 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 20 73 74 72 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 ...........;;.A.string..........
10ee0 20 20 20 20 20 20 20 20 20 20 69 66 20 28 73 74 72 69 6e 67 70 20 65 6c 6d 29 0a 20 20 20 20 20 ..........if.(stringp.elm)......
10f00 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 73 75 62 73 74 72 69 6e 67 2d .............collect.(substring-
10f20 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 65 6c 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 no-properties.elm)..............
10f40 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 .....else...................;;.P
10f60 72 6f 70 65 72 20 6c 69 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 roper.lists....................i
10f80 66 20 28 61 6e 64 20 28 63 6f 6e 73 70 20 65 6c 6d 29 20 28 6e 75 6c 6c 20 28 63 64 72 20 28 6c f.(and.(consp.elm).(null.(cdr.(l
10fa0 61 73 74 20 65 6c 6d 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f ast.elm))))...................co
10fc0 6c 6c 65 63 74 20 28 61 73 79 6e 63 2d 2d 70 75 72 65 63 6f 70 79 20 65 6c 6d 29 0a 20 20 20 20 llect.(async--purecopy.elm).....
10fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ..............else..............
11000 20 20 20 20 20 3b 3b 20 44 6f 74 74 65 64 20 6c 69 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 .....;;.Dotted.lists............
11020 20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 68 61 6e 64 6c 65 20 68 65 72 65 20 6f 6e 6c 79 20 64 ........;;.We.handle.here.only.d
11040 6f 74 74 65 64 20 6c 69 73 74 20 77 68 65 72 65 20 63 61 72 20 61 6e 64 20 63 64 72 0a 20 20 20 otted.list.where.car.and.cdr....
11060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 72 65 20 61 74 6f 6d 73 20 69 2e 65 2e ...............;;.are.atoms.i.e.
11080 20 28 78 20 2e 20 79 29 20 61 6e 64 20 6e 6f 74 20 28 78 20 2e 20 28 78 20 2e 20 79 29 29 20 6f .(x...y).and.not.(x...(x...y)).o
110a0 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 78 20 2e 20 28 78 20 79 r...................;;.(x...(x.y
110c0 29 29 20 77 68 69 63 68 20 73 68 6f 75 6c 64 20 66 69 74 20 6d 6f 73 74 20 63 61 73 65 73 2e 0a )).which.should.fit.most.cases..
110e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28 61 6e 64 20 28 63 6f 6e 73 70 ..................if.(and.(consp
11100 20 65 6c 6d 29 20 28 63 64 72 20 28 6c 61 73 74 20 65 6c 6d 29 29 29 0a 20 20 20 20 20 20 20 20 .elm).(cdr.(last.elm))).........
11120 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 6c 65 74 20 28 28 6b 65 79 20 28 63 61 ..........collect.(let.((key.(ca
11140 72 20 65 6c 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r.elm)).........................
11160 20 20 20 20 20 20 20 20 28 76 61 6c 20 28 63 64 72 20 65 6c 6d 29 29 29 0a 20 20 20 20 20 20 20 ........(val.(cdr.elm)))........
11180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 69 66 20 28 .....................(cons.(if.(
111a0 73 74 72 69 6e 67 70 20 6b 65 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 stringp.key)....................
111c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 2d 6e 6f ...................(substring-no
111e0 2d 70 72 6f 70 65 72 74 69 65 73 20 6b 65 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -properties.key)................
11200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 65 79 29 0a 20 20 20 20 20 20 .....................key).......
11220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 ............................(if.
11240 28 73 74 72 69 6e 67 70 20 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (stringp.val)...................
11260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 2d 6e ....................(substring-n
11280 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 o-properties.val)...............
112a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 29 29 29 0a 20 20 20 ......................val)))....
112c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...............else.............
112e0 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 65 6c 6d 29 29 0a 20 20 20 20 20 20 20 20 28 74 20 6f ......collect.elm)).........(t.o
11300 62 6a 65 63 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 bject)))..(defun.async-inject-va
11320 72 69 61 62 6c 65 73 0a 20 20 20 20 28 69 6e 63 6c 75 64 65 2d 72 65 67 65 78 70 20 26 6f 70 74 riables.....(include-regexp.&opt
11340 69 6f 6e 61 6c 20 70 72 65 64 69 63 61 74 65 20 65 78 63 6c 75 64 65 2d 72 65 67 65 78 70 20 6e ional.predicate.exclude-regexp.n
11360 6f 70 72 6f 70 73 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 60 73 65 74 71 27 20 66 6f 72 6d 20 oprops)..."Return.a.`setq'.form.
11380 74 68 61 74 20 72 65 70 6c 69 63 61 74 65 73 20 70 61 72 74 20 6f 66 20 74 68 65 20 63 61 6c 6c that.replicates.part.of.the.call
113a0 69 6e 67 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e 0a 0a 49 74 20 73 65 74 73 20 74 68 65 20 76 61 ing.environment...It.sets.the.va
113c0 6c 75 65 20 66 6f 72 20 65 76 65 72 79 20 76 61 72 69 61 62 6c 65 20 6d 61 74 63 68 69 6e 67 20 lue.for.every.variable.matching.
113e0 49 4e 43 4c 55 44 45 2d 52 45 47 45 58 50 20 61 6e 64 0a 61 6c 73 6f 20 50 52 45 44 49 43 41 54 INCLUDE-REGEXP.and.also.PREDICAT
11400 45 2e 20 20 49 74 20 77 69 6c 6c 20 6e 6f 74 20 70 65 72 66 6f 72 6d 20 69 6e 6a 65 63 74 69 6f E...It.will.not.perform.injectio
11420 6e 20 66 6f 72 20 61 6e 79 20 76 61 72 69 61 62 6c 65 0a 6d 61 74 63 68 69 6e 67 20 45 58 43 4c n.for.any.variable.matching.EXCL
11440 55 44 45 2d 52 45 47 45 58 50 20 28 69 66 20 70 72 65 73 65 6e 74 29 20 6f 72 20 72 65 70 72 65 UDE-REGEXP.(if.present).or.repre
11460 73 65 6e 74 69 6e 67 20 61 20 60 73 79 6e 74 61 78 2d 74 61 62 6c 65 27 0a 69 2e 65 2e 20 65 6e senting.a.`syntax-table'.i.e..en
11480 64 69 6e 67 20 62 79 20 5c 22 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 5c 22 2e 0a 57 68 65 6e 20 ding.by.\"-syntax-table\"..When.
114a0 4e 4f 50 52 4f 50 53 20 69 73 20 6e 6f 6e 20 6e 69 6c 20 69 74 20 74 72 69 65 73 20 74 6f 20 73 NOPROPS.is.non.nil.it.tries.to.s
114c0 74 72 69 70 20 6f 75 74 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 20 6f 66 20 65 61 63 68 trip.out.text.properties.of.each
114e0 0a 76 61 72 69 61 62 6c 65 27 73 20 76 61 6c 75 65 20 77 69 74 68 20 60 61 73 79 6e 63 2d 76 61 .variable's.value.with.`async-va
11500 72 69 61 62 6c 65 73 2d 6e 6f 70 72 6f 70 73 2d 66 75 6e 63 74 69 6f 6e 27 2e 0a 0a 49 74 20 69 riables-noprops-function'...It.i
11520 73 20 69 6e 74 65 6e 64 65 64 20 74 6f 20 62 65 20 75 73 65 64 20 61 73 20 66 6f 6c 6c 6f 77 73 s.intended.to.be.used.as.follows
11540 3a 0a 0a 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 5c 5c 3d 60 28 :......(async-start........\\=`(
11560 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 5c 5c 3d lambda.()...........(require.\\=
11580 27 73 6d 74 70 6d 61 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 'smtpmail)...........(with-temp-
115a0 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 2c 28 62 75 66 buffer.............(insert.,(buf
115c0 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 fer-substring-no-properties.(poi
115e0 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 nt-min).(point-max)))...........
11600 20 20 3b 3b 20 50 61 73 73 20 69 6e 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 65 6e 76 69 72 6f ..;;.Pass.in.the.variable.enviro
11620 6e 6d 65 6e 74 20 66 6f 72 20 73 6d 74 70 6d 61 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c nment.for.smtpmail.............,
11640 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 20 5c 22 5c 5c 5c 5c 3d 60 (async-inject-variables.\"\\\\=`
11660 5c 5c 28 73 6d 74 70 6d 61 69 6c 5c 5c 7c 5c 5c 28 75 73 65 72 2d 5c 5c 29 3f 6d 61 69 6c 5c 5c \\(smtpmail\\|\\(user-\\)?mail\\
11680 29 2d 5c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 )-\").............(smtpmail-send
116a0 2d 69 74 29 29 29 0a 20 20 20 20 20 20 20 5c 5c 3d 27 69 67 6e 6f 72 65 29 22 0a 20 20 60 28 73 -it)))........\\='ignore)"...`(s
116c0 65 74 71 0a 20 20 20 20 2c 40 28 6c 65 74 20 28 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 etq.....,@(let.(bindings).......
116e0 20 20 28 6d 61 70 61 74 6f 6d 73 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 79 ..(mapatoms..........(lambda.(sy
11700 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 6e 61 6d 65 20 28 61 6e 64 m)............(let*.((sname.(and
11720 20 28 62 6f 75 6e 64 70 20 73 79 6d 29 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 73 79 6d 29 29 .(boundp.sym).(symbol-name.sym))
11740 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 61 6c 75 65 20 28 61 6e 64 20 )...................(value.(and.
11760 73 6e 61 6d 65 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 73 79 6d 29 29 29 29 0a 20 20 20 20 sname.(symbol-value.sym)))).....
11780 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 73 6e 61 6d 65 0a 20 20 20 20 20 20 .........(when.(and.sname.......
117a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 6e 75 6c 6c 20 69 6e 63 6c ..................(or.(null.incl
117c0 75 64 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ude-regexp).....................
117e0 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 69 6e 63 6c 75 64 65 2d 72 65 ........(string-match.include-re
11800 67 65 78 70 20 73 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 gexp.sname))....................
11820 20 20 20 20 20 28 6f 72 20 28 6e 75 6c 6c 20 65 78 63 6c 75 64 65 2d 72 65 67 65 78 70 29 0a 20 .....(or.(null.exclude-regexp)..
11840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 ...........................(not.
11860 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 65 78 63 6c 75 64 65 2d 72 65 67 65 78 70 20 73 6e 61 (string-match.exclude-regexp.sna
11880 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e me))).........................(n
118a0 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 5c ot.(string-match."-syntax-table\
118c0 5c 27 22 20 73 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c \'".sname)))................(unl
118e0 65 73 73 20 28 6f 72 20 28 73 74 72 69 6e 67 70 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 ess.(or.(stringp.value).........
11900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 76 61 6c 75 65 20 27 ...................(memq.value.'
11920 28 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (nil.t))........................
11940 20 20 20 20 28 6e 75 6d 62 65 72 70 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ....(numberp.value).............
11960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 63 74 6f 72 70 20 76 61 6c 75 65 29 29 0a ...............(vectorp.value)).
11980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76 61 6c 75 65 20 60 28 71 .................(setq.value.`(q
119a0 75 6f 74 65 20 2c 76 61 6c 75 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 uote.,value)))................(w
119c0 68 65 6e 20 6e 6f 70 72 6f 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 hen.noprops..................(se
119e0 74 71 20 76 61 6c 75 65 20 28 66 75 6e 63 61 6c 6c 20 61 73 79 6e 63 2d 76 61 72 69 61 62 6c 65 tq.value.(funcall.async-variable
11a00 73 2d 6e 6f 70 72 6f 70 73 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 s-noprops-function..............
11a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65 29 29 .........................value))
11a40 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 6e 75 6c 6c )................(when.(or.(null
11a60 20 70 72 65 64 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .predicate).....................
11a80 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 70 72 65 64 69 63 61 74 65 20 73 79 6d 29 29 0a 20 20 .....(funcall.predicate.sym))...
11aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 69 6e 64 69 6e 67 73 20 28 63 ...............(setq.bindings.(c
11ac0 6f 6e 73 20 76 61 6c 75 65 20 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ons.value.bindings).............
11ae0 20 20 20 20 20 20 20 20 20 20 20 62 69 6e 64 69 6e 67 73 20 28 63 6f 6e 73 20 73 79 6d 20 62 69 ...........bindings.(cons.sym.bi
11b00 6e 64 69 6e 67 73 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 62 69 6e 64 69 6e 67 73 29 29 ndings))))))).........bindings))
11b20 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 65 6e 76 69 72 )..(defalias.'async-inject-envir
11b40 6f 6e 6d 65 6e 74 20 27 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 29 0a onment.'async-inject-variables).
11b60 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 73 75 6c 74 20 28 66 75 6e .(defun.async-handle-result.(fun
11b80 63 20 72 65 73 75 6c 74 20 62 75 66 29 0a 20 20 28 69 66 20 28 6e 75 6c 6c 20 66 75 6e 63 29 0a c.result.buf)...(if.(null.func).
11ba0 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 2d ......(progn.........(set.(make-
11bc0 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 local-variable.'async-callback-v
11be0 61 6c 75 65 29 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 alue).result).........(set.(make
11c00 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d -local-variable.'async-callback-
11c20 76 61 6c 75 65 2d 73 65 74 29 20 74 29 29 0a 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 value-set).t)).....(unwind-prote
11c40 63 74 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 6c 69 73 74 70 20 72 65 73 75 6c ct.........(if.(and.(listp.resul
11c60 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 27 61 73 79 6e 63 2d 73 t)..................(eq.'async-s
11c80 69 67 6e 61 6c 20 28 6e 74 68 20 30 20 72 65 73 75 6c 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 ignal.(nth.0.result)))..........
11ca0 20 20 20 28 73 69 67 6e 61 6c 20 28 63 61 72 20 28 6e 74 68 20 31 20 72 65 73 75 6c 74 29 29 0a ...(signal.(car.(nth.1.result)).
11cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 6e 74 68 20 31 20 ....................(cdr.(nth.1.
11ce0 72 65 73 75 6c 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 75 6e result)))...........(funcall.fun
11d00 63 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 64 c.result)).......(unless.async-d
11d20 65 62 75 67 0a 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 ebug.........(kill-buffer.buf)))
11d40 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 77 68 65 6e 2d 64 6f 6e 65 20 28 70 72 6f 63 ))..(defun.async-when-done.(proc
11d60 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 63 68 61 6e 67 65 29 0a 20 20 22 50 72 6f 63 65 73 73 20 73 .&optional._change)..."Process.s
11d80 65 6e 74 69 6e 65 6c 20 75 73 65 64 20 74 6f 20 72 65 74 72 69 65 76 65 20 74 68 65 20 76 61 6c entinel.used.to.retrieve.the.val
11da0 75 65 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 2e 22 0a 20 20 28 77 ue.from.the.child.process."...(w
11dc0 68 65 6e 20 28 65 71 20 27 65 78 69 74 20 28 70 72 6f 63 65 73 73 2d 73 74 61 74 75 73 20 70 72 hen.(eq.'exit.(process-status.pr
11de0 6f 63 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 oc)).....(with-current-buffer.(p
11e00 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 rocess-buffer.proc).......(let.(
11e20 28 61 73 79 6e 63 2d 63 75 72 72 65 6e 74 2d 70 72 6f 63 65 73 73 20 70 72 6f 63 29 29 0a 20 20 (async-current-process.proc))...
11e40 20 20 20 20 20 20 28 69 66 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 ......(if.(=.0.(process-exit-sta
11e60 74 75 73 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 61 73 79 6e 63 tus.proc)).............(if.async
11e80 2d 63 61 6c 6c 62 61 63 6b 2d 66 6f 72 2d 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 -callback-for-process...........
11ea0 20 20 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 ......(if.async-callback........
11ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 .............(prog1.............
11ee0 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 61 73 79 6e 63 2d 63 61 6c 6c 62 ............(funcall.async-callb
11f00 61 63 6b 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ack.proc).......................
11f20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 (unless.async-debug.............
11f40 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 65 20 6e 65 65 64 20 74 6f 20 63 68 65 63 6b 20 ............;;.we.need.to.check.
11f60 74 68 69 73 20 62 65 63 61 75 73 65 20 74 68 65 6f 72 65 74 69 63 61 6c 6c 79 0a 20 20 20 20 20 this.because.theoretically......
11f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 61 73 79 6e 63 2d 63 61 6c ...................;;.`async-cal
11fa0 6c 62 61 63 6b 27 20 63 6f 75 6c 64 27 76 65 20 6b 69 6c 6c 65 64 20 69 74 20 61 6c 72 65 61 64 lback'.could've.killed.it.alread
11fc0 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 y.........................(when.
11fe0 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 (buffer-live-p.(process-buffer.p
12000 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 roc))...........................
12020 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f (kill-buffer.(process-buffer.pro
12040 63 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d c)))))...................(set.(m
12060 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 ake-local-variable.'async-callba
12080 63 6b 2d 76 61 6c 75 65 29 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ck-value).proc).................
120a0 20 20 28 73 65 74 20 28 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 ..(set.(make-local-variable.'asy
120c0 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 2d 73 65 74 29 20 74 29 29 0a 20 20 20 20 20 nc-callback-value-set).t))......
120e0 20 20 20 20 20 20 20 20 20 3b 3b 20 4d 61 79 62 65 20 73 74 72 69 70 20 6f 75 74 20 75 6e 72 65 .........;;.Maybe.strip.out.unre
12100 61 64 61 62 6c 65 20 22 23 22 3b 20 54 68 65 79 20 61 72 65 20 72 65 70 6c 61 63 65 64 20 62 79 adable."#";.They.are.replaced.by
12120 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 6d 70 74 79 20 73 74 72 69 6e 67 20 75 ...............;;.empty.string.u
12140 6e 6c 65 73 73 20 74 68 65 79 20 61 72 65 20 70 72 65 66 69 78 69 6e 67 20 61 20 73 70 65 63 69 nless.they.are.prefixing.a.speci
12160 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 62 6a 65 63 74 20 6c 69 6b 65 20 al...............;;.object.like.
12180 61 20 6d 61 72 6b 65 72 2e 20 53 65 65 20 69 73 73 75 65 20 23 31 34 35 2e 0a 20 20 20 20 20 20 a.marker..See.issue.#145........
121a0 20 20 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 ........(widen)...............(g
121c0 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 oto-char.(point-min))...........
121e0 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 ....(save-excursion.............
12200 20 20 20 20 3b 3b 20 54 72 61 6e 73 66 6f 72 6d 20 6d 61 72 6b 65 72 73 20 69 6e 20 6c 69 73 74 ....;;.Transform.markers.in.list
12220 20 6c 69 6b 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 6d 61 72 6b 65 72 .like.................;;.(marker
12240 20 28 6d 6f 76 65 73 20 61 66 74 65 72 20 69 6e 73 65 72 74 69 6f 6e 29 20 61 74 20 32 33 33 38 .(moves.after.insertion).at.2338
12260 20 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 65 73 74 5c 2e 6f 72 67 .in.................;;.test\.org
12280 29 20 73 6f 20 74 68 61 74 20 72 65 6d 61 70 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 20 ).so.that.remap.text.properties.
122a0 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 61 6e 20 function.................;;.can.
122c0 70 61 72 73 65 20 69 74 20 74 6f 20 72 65 73 74 69 74 75 74 65 20 6d 61 72 6b 65 72 2e 0a 20 20 parse.it.to.restitute.marker....
122e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d ..............(while.(re-search-
12300 66 6f 72 77 61 72 64 20 22 23 3c 5c 5c 28 5b 5e 3e 5d 2a 5c 5c 29 3e 22 20 6e 69 6c 20 74 29 0a forward."#<\\([^>]*\\)>".nil.t).
12320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 ..................(replace-match
12340 20 28 63 6f 6e 63 61 74 20 22 28 22 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 20 22 29 .(concat."(".(match-string.1).")
12360 22 29 20 74 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 ").t.t)))...............(while.(
12380 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 23 28 22 20 6e 69 6c 20 74 29 0a 20 20 re-search-forward."#(".nil.t)...
123a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 28 22 ..............(replace-match."("
123c0 20 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 .t.t))...............(goto-char.
123e0 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 61 63 6b (point-max))...............(back
12400 77 61 72 64 2d 73 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 ward-sexp)...............(let.((
12420 76 61 6c 75 65 20 28 72 65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a value.(read.(current-buffer)))).
12440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 ................(async-handle-re
12460 73 75 6c 74 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 76 61 6c 75 65 20 28 63 75 72 72 65 sult.async-callback.value.(curre
12480 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 nt-buffer))))...........(set.(ma
124a0 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 ke-local-variable.'async-callbac
124c0 6b 2d 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 27 65 k-value)................(list.'e
124e0 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 rror......................(forma
12500 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 27 25 73 27 20 66 61 69 6c 65 64 20 77 69 74 t."Async.process.'%s'.failed.wit
12520 68 20 65 78 69 74 20 63 6f 64 65 20 25 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 h.exit.code.%d".................
12540 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 6e 61 6d 65 20 70 72 6f 63 29 .............(process-name.proc)
12560 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 29 29 29 29 0a 20 .(process-exit-status.proc))))..
12580 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 .........(set.(make-local-variab
125a0 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 2d 73 65 74 29 20 74 29 le.'async-callback-value-set).t)
125c0 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 72 65 61 64 2d 66 72 6f 6d 2d 63 6c )))))..(defun.async-read-from-cl
125e0 69 65 6e 74 20 28 70 72 6f 63 20 73 74 72 69 6e 67 29 0a 20 20 22 50 72 6f 63 65 73 73 20 74 65 ient.(proc.string)..."Process.te
12600 78 74 20 66 72 6f 6d 20 63 6c 69 65 6e 74 20 70 72 6f 63 65 73 73 2e 0a 0a 54 68 65 20 73 74 72 xt.from.client.process...The.str
12620 69 6e 67 20 63 68 75 6e 6b 73 20 75 73 75 61 6c 6c 79 20 61 72 72 69 76 65 20 69 6e 20 6d 61 78 ing.chunks.usually.arrive.in.max
12640 69 6d 75 6d 20 6f 66 20 34 30 39 36 20 62 79 74 65 73 2c 20 73 6f 20 61 0a 6c 6f 6e 67 20 63 6c imum.of.4096.bytes,.so.a.long.cl
12660 69 65 6e 74 20 6d 65 73 73 61 67 65 20 6d 69 67 68 74 20 62 65 20 73 70 6c 69 74 20 69 6e 74 6f ient.message.might.be.split.into
12680 20 6d 75 6c 74 69 70 6c 65 20 63 61 6c 6c 73 20 6f 66 20 74 68 69 73 0a 66 75 6e 63 74 69 6f 6e .multiple.calls.of.this.function
126a0 2e 0a 0a 57 65 20 75 73 65 20 61 20 6d 61 72 6b 65 72 20 60 61 73 79 6e 63 2d 72 65 61 64 2d 6d ...We.use.a.marker.`async-read-m
126c0 61 72 6b 65 72 27 20 74 6f 20 74 72 61 63 6b 20 74 68 65 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 arker'.to.track.the.position.of.
126e0 74 68 65 0a 6c 61 73 74 73 20 63 6f 6d 70 6c 65 74 65 20 6c 69 6e 65 2e 20 20 45 76 65 72 79 20 the.lasts.complete.line...Every.
12700 74 69 6d 65 20 77 65 20 67 65 74 20 6e 65 77 20 69 6e 70 75 74 2c 20 77 65 20 74 72 79 20 74 6f time.we.get.new.input,.we.try.to
12720 20 6c 6f 6f 6b 0a 66 6f 72 20 6e 65 77 6c 69 6e 65 2c 20 61 6e 64 20 69 66 20 66 6f 75 6e 64 2c .look.for.newline,.and.if.found,
12740 20 70 72 6f 63 65 73 73 20 74 68 65 20 65 6e 74 69 72 65 20 6c 69 6e 65 20 61 6e 64 20 62 75 6d .process.the.entire.line.and.bum
12760 70 20 74 68 65 0a 6d 61 72 6b 65 72 20 70 6f 73 69 74 69 6f 6e 20 74 6f 20 74 68 65 20 65 6e 64 p.the.marker.position.to.the.end
12780 20 6f 66 20 74 68 69 73 20 6e 65 78 74 20 6c 69 6e 65 2e 22 0a 20 20 28 77 69 74 68 2d 63 75 72 .of.this.next.line."...(with-cur
127a0 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 rent-buffer.(process-buffer.proc
127c0 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 74 72 61 6d 70 2d ).....(when.(and.(boundp.'tramp-
127e0 70 61 73 73 77 6f 72 64 2d 70 72 6f 6d 70 74 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 password-prompt-regexp).........
12800 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 74 72 61 6d 70 2d 70 61 73 73 77 .......(string-match.tramp-passw
12820 6f 72 64 2d 70 72 6f 6d 70 74 2d 72 65 67 65 78 70 20 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 ord-prompt-regexp.string))......
12840 20 28 70 72 6f 63 65 73 73 2d 73 65 6e 64 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 70 72 6f .(process-send-string........pro
12860 63 20 28 63 6f 6e 63 61 74 20 28 72 65 61 64 2d 70 61 73 73 77 64 20 28 6d 61 74 63 68 2d 73 74 c.(concat.(read-passwd.(match-st
12880 72 69 6e 67 20 30 20 73 74 72 69 6e 67 29 29 20 22 5c 6e 22 29 29 29 0a 20 20 20 20 28 67 6f 74 ring.0.string))."\n"))).....(got
128a0 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 28 73 61 76 65 2d 65 78 o-char.(point-max)).....(save-ex
128c0 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 29 0a 0a cursion.......(insert.string))..
128e0 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 6e 22 20 ....(while.(search-forward."\n".
12900 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 nil.t).......(save-excursion....
12920 20 20 20 20 20 28 73 61 76 65 2d 72 65 73 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 .....(save-restriction..........
12940 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 61 72 72 6f 77 2d 74 6f 2d 72 65 .(widen)...........(narrow-to-re
12960 67 69 6f 6e 20 61 73 79 6e 63 2d 72 65 61 64 2d 6d 61 72 6b 65 72 20 28 70 6f 69 6e 74 29 29 0a gion.async-read-marker.(point)).
12980 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 ..........(goto-char.(point-min)
129a0 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 6d 73 67 29 0a 20 20 20 20 20 20 20 20 20 )...........(let.(msg)..........
129c0 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 ...(condition-case.nil..........
129e0 20 20 20 20 20 20 20 3b 3b 20 49 74 20 69 73 20 73 61 66 65 20 74 6f 20 74 68 72 6f 77 20 65 72 .......;;.It.is.safe.to.throw.er
12a00 72 6f 72 73 20 69 6e 20 74 68 65 20 72 65 61 64 20 62 65 63 61 75 73 65 20 77 65 0a 20 20 20 20 rors.in.the.read.because.we.....
12a20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 65 6e 64 20 6d 65 73 73 61 67 65 73 20 61 6c 77 ............;;.send.messages.alw
12a40 61 79 73 20 6f 6e 20 74 68 65 69 72 20 6f 77 6e 20 6c 69 6e 65 2c 20 61 6e 64 20 74 68 65 79 0a ays.on.their.own.line,.and.they.
12a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 72 65 20 61 6c 77 61 79 73 20 61 20 ................;;.are.always.a.
12a80 62 61 73 65 36 34 20 65 6e 63 6f 64 65 64 20 73 74 72 69 6e 67 2c 20 73 6f 20 61 20 6d 65 73 73 base64.encoded.string,.so.a.mess
12aa0 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 69 6c 6c 20 61 6c 77 61 age.................;;.will.alwa
12ac0 79 73 20 72 65 61 64 2e 20 20 57 65 20 77 69 6c 6c 20 61 6c 73 6f 20 69 67 6e 6f 72 65 20 74 68 ys.read...We.will.also.ignore.th
12ae0 65 20 72 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 66 20 74 68 69 e.rest.................;;.of.thi
12b00 73 20 6c 69 6e 65 20 73 69 6e 63 65 20 74 68 65 72 65 20 77 6f 6e 27 74 20 62 65 20 61 6e 79 74 s.line.since.there.won't.be.anyt
12b20 68 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 6e 74 65 72 65 73 74 hing.................;;.interest
12b40 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 ing..................(while.(set
12b60 71 20 6d 73 67 20 28 72 65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 q.msg.(read.(current-buffer)))..
12b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 73 67 2d 64 65 63 6f .................(let.((msg-deco
12ba0 64 65 64 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 ded.(ignore-errors.(base64-decod
12bc0 65 2d 73 74 72 69 6e 67 20 6d 73 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-string.msg))))................
12be0 20 20 20 20 20 28 77 68 65 6e 20 6d 73 67 2d 64 65 63 6f 64 65 64 0a 20 20 20 20 20 20 20 20 20 .....(when.msg-decoded..........
12c00 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6d 73 67 2d 64 65 63 6f 64 65 64 20 28 .............(setq.msg-decoded.(
12c20 63 61 72 20 28 72 65 61 64 2d 66 72 6f 6d 2d 73 74 72 69 6e 67 20 6d 73 67 2d 64 65 63 6f 64 65 car.(read-from-string.msg-decode
12c40 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e d))).......................(when
12c60 20 28 61 6e 64 20 28 6c 69 73 74 70 20 6d 73 67 2d 64 65 63 6f 64 65 64 29 0a 20 20 20 20 20 20 .(and.(listp.msg-decoded).......
12c80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e ...........................(asyn
12ca0 63 2d 6d 65 73 73 61 67 65 2d 70 20 6d 73 67 2d 64 65 63 6f 64 65 64 29 0a 20 20 20 20 20 20 20 c-message-p.msg-decoded)........
12cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 79 6e 63 2d ..........................async-
12ce0 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 callback).......................
12d00 20 20 28 66 75 6e 63 61 6c 6c 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 6d 73 67 2d 64 65 ..(funcall.async-callback.msg-de
12d20 63 6f 64 65 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 coded)))))...............;;.This
12d40 20 69 73 20 4f 4b 2c 20 77 65 20 72 65 61 63 68 65 64 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 .is.OK,.we.reached.the.end.of.th
12d60 65 20 63 68 75 6e 6b 20 73 75 62 70 72 6f 63 65 73 73 20 73 65 6e 74 0a 20 20 20 20 20 20 20 20 e.chunk.subprocess.sent.........
12d80 20 20 20 20 20 20 3b 3b 20 61 74 20 74 68 69 73 20 74 69 6d 65 2e 0a 20 20 20 20 20 20 20 20 20 ......;;.at.this.time...........
12da0 20 20 20 20 20 28 69 6e 76 61 6c 69 64 2d 72 65 61 64 2d 73 79 6e 74 61 78 20 74 29 0a 20 20 20 .....(invalid-read-syntax.t)....
12dc0 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 2d 6f 66 2d 66 69 6c 65 20 74 29 29 29 0a 20 20 20 ...........(end-of-file.t)))....
12de0 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 .......(goto-char.(point-max))..
12e00 20 20 20 20 20 20 20 20 20 28 6d 6f 76 65 2d 6d 61 72 6b 65 72 20 61 73 79 6e 63 2d 72 65 61 64 .........(move-marker.async-read
12e20 2d 6d 61 72 6b 65 72 20 28 70 6f 69 6e 74 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 -marker.(point)))))))..(defun.as
12e40 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 74 72 ync--receive-sexp.(&optional.str
12e60 65 61 6d 29 0a 20 20 3b 3b 20 46 49 58 4d 45 3a 20 57 68 79 20 75 73 65 20 60 75 74 66 2d 38 2d eam)...;;.FIXME:.Why.use.`utf-8-
12e80 61 75 74 6f 27 20 69 6e 73 74 65 61 64 20 6f 66 20 60 75 74 66 2d 38 2d 75 6e 69 78 27 3f 20 20 auto'.instead.of.`utf-8-unix'?..
12ea0 54 68 69 73 20 69 73 0a 20 20 3b 3b 20 61 20 63 6f 6d 6d 75 6e 69 63 61 74 69 6f 6e 20 63 68 61 This.is...;;.a.communication.cha
12ec0 6e 6e 65 6c 20 6f 76 65 72 20 77 68 69 63 68 20 77 65 20 68 61 76 65 20 63 6f 6d 70 6c 65 74 65 nnel.over.which.we.have.complete
12ee0 20 63 6f 6e 74 72 6f 6c 2c 0a 20 20 3b 3b 20 73 6f 20 77 65 20 67 65 74 20 74 6f 20 63 68 6f 6f .control,...;;.so.we.get.to.choo
12f00 73 65 20 65 78 61 63 74 6c 79 20 77 68 69 63 68 20 65 6e 63 6f 64 69 6e 67 20 61 6e 64 20 45 4f se.exactly.which.encoding.and.EO
12f20 4c 20 77 65 20 75 73 65 2c 20 69 73 6e 27 74 0a 20 20 3b 3b 20 69 74 3f 0a 20 20 3b 3b 20 55 50 L.we.use,.isn't...;;.it?...;;.UP
12f40 44 41 54 45 3a 20 57 65 20 75 73 65 20 6e 6f 77 20 60 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e DATE:.We.use.now.`utf-8-emacs-un
12f60 69 78 27 20 69 6e 73 74 65 61 64 20 6f 66 20 60 75 74 66 2d 38 2d 61 75 74 6f 27 20 61 73 0a 20 ix'.instead.of.`utf-8-auto'.as..
12f80 20 3b 3b 20 72 65 63 6f 6d 6d 65 6e 64 65 64 20 69 6e 20 62 75 67 23 31 36 35 2e 0a 20 20 28 6c .;;.recommended.in.bug#165....(l
12fa0 65 74 20 28 28 73 65 78 70 20 28 64 65 63 6f 64 65 2d 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 20 et.((sexp.(decode-coding-string.
12fc0 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 72 65 61 64 20 73 74 72 65 (base64-decode-string.(read.stre
12fe0 61 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 am))............................
13000 20 20 20 20 20 20 20 20 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 29 0a 20 20 20 .........'utf-8-emacs-unix))....
13020 20 20 20 20 20 3b 3b 20 50 61 72 65 6e 74 20 65 78 70 65 63 74 73 20 55 54 46 2d 38 20 65 6e 63 .....;;.Parent.expects.UTF-8.enc
13040 6f 64 65 64 20 74 65 78 74 2e 0a 20 20 20 20 20 20 20 20 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 oded.text..........(coding-syste
13060 6d 2d 66 6f 72 2d 77 72 69 74 65 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 29 0a m-for-write.'utf-8-emacs-unix)).
13080 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 28 6d 65 73 ....(if.async-debug.........(mes
130a0 73 61 67 65 20 22 52 65 63 65 69 76 65 64 20 73 65 78 70 20 7b 7b 7b 25 73 7d 7d 7d 22 20 28 70 sage."Received.sexp.{{{%s}}}".(p
130c0 70 2d 74 6f 2d 73 74 72 69 6e 67 20 73 65 78 70 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 73 65 p-to-string.sexp))).....(setq.se
130e0 78 70 20 28 72 65 61 64 20 73 65 78 70 29 29 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 64 65 xp.(read.sexp)).....(if.async-de
13100 62 75 67 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 52 65 61 64 20 73 65 78 70 20 bug.........(message."Read.sexp.
13120 7b 7b 7b 25 73 7d 7d 7d 22 20 28 70 70 2d 74 6f 2d 73 74 72 69 6e 67 20 73 65 78 70 29 29 29 0a {{{%s}}}".(pp-to-string.sexp))).
13140 20 20 20 20 28 65 76 61 6c 20 73 65 78 70 20 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e ....(eval.sexp.t)))..(defun.asyn
13160 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 28 73 65 78 70 29 0a 20 20 28 6c 65 74 20 28 70 72 c--insert-sexp.(sexp)...(let.(pr
13180 69 6e 74 2d 6c 65 76 65 6c 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74 2d 6c 65 6e 67 74 68 0a 20 int-level.........print-length..
131a0 20 20 20 20 20 20 20 28 70 72 69 6e 74 2d 65 73 63 61 70 65 2d 6e 6f 6e 61 73 63 69 69 20 74 29 .......(print-escape-nonascii.t)
131c0 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 74 2d 63 69 72 63 6c 65 20 74 29 0a 20 20 20 20 20 20 .........(print-circle.t).......
131e0 20 20 3b 3b 20 46 69 78 20 62 75 67 23 31 35 33 20 69 6e 20 65 6d 61 63 73 2d 32 39 20 77 69 74 ..;;.Fix.bug#153.in.emacs-29.wit
13200 68 20 73 79 6d 62 6f 6c 27 73 20 70 6f 73 69 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 28 70 h.symbol's.positions..........(p
13220 72 69 6e 74 2d 73 79 6d 62 6f 6c 73 2d 62 61 72 65 20 74 29 29 0a 20 20 20 20 28 70 72 69 6e 31 rint-symbols-bare.t)).....(prin1
13240 20 73 65 78 70 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 3b 3b 20 4a .sexp.(current-buffer)).....;;.J
13260 75 73 74 20 69 6e 20 63 61 73 65 20 74 68 65 20 73 74 72 69 6e 67 20 77 65 27 72 65 20 73 65 6e ust.in.case.the.string.we're.sen
13280 64 69 6e 67 20 6d 69 67 68 74 20 63 6f 6e 74 61 69 6e 20 45 4f 46 0a 20 20 20 20 28 65 6e 63 6f ding.might.contain.EOF.....(enco
132a0 64 65 2d 63 6f 64 69 6e 67 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f de-coding-region.(point-min).(po
132c0 69 6e 74 2d 6d 61 78 29 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 0a 20 20 20 20 int-max).'utf-8-emacs-unix).....
132e0 28 62 61 73 65 36 34 2d 65 6e 63 6f 64 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e (base64-encode-region.(point-min
13300 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 74 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 ).(point-max).t).....(goto-char.
13320 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 20 28 69 6e 73 65 72 74 20 3f 5c 22 29 0a 20 20 20 20 28 67 (point-min)).(insert.?\").....(g
13340 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 20 28 69 6e 73 65 72 74 20 3f 5c oto-char.(point-max)).(insert.?\
13360 22 20 3f 5c 6e 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 2d 74 72 61 6e 73 6d 69 74 ".?\n)))..(defun.async--transmit
13380 2d 73 65 78 70 20 28 70 72 6f 63 65 73 73 20 73 65 78 70 29 0a 20 20 28 77 69 74 68 2d 74 65 6d -sexp.(process.sexp)...(with-tem
133a0 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 p-buffer.....(if.async-debug....
133c0 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 72 61 6e 73 6d 69 74 74 69 6e 67 20 73 65 78 70 .....(message."Transmitting.sexp
133e0 20 7b 7b 7b 25 73 7d 7d 7d 22 20 28 70 70 2d 74 6f 2d 73 74 72 69 6e 67 20 73 65 78 70 29 29 29 .{{{%s}}}".(pp-to-string.sexp)))
13400 0a 20 20 20 20 28 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 73 65 78 70 29 0a 20 .....(async--insert-sexp.sexp)..
13420 20 20 20 28 70 72 6f 63 65 73 73 2d 73 65 6e 64 2d 72 65 67 69 6f 6e 20 70 72 6f 63 65 73 73 20 ...(process-send-region.process.
13440 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 (point-min).(point-max))))..(def
13460 75 6e 20 61 73 79 6e 63 2d 62 61 74 63 68 2d 69 6e 76 6f 6b 65 20 28 29 0a 20 20 22 43 61 6c 6c un.async-batch-invoke.()..."Call
13480 65 64 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 20 45 6d 61 63 73 20 70 72 6f 63 65 73 73 27 ed.from.the.child.Emacs.process'
134a0 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 2e 22 0a 20 20 3b 3b 20 4d 61 6b 65 20 73 75 72 65 20 27 .command.line."...;;.Make.sure.'
134c0 6d 65 73 73 61 67 65 27 20 61 6e 64 20 27 70 72 69 6e 31 27 20 65 6e 63 6f 64 65 20 73 74 75 66 message'.and.'prin1'.encode.stuf
134e0 66 20 69 6e 20 55 54 46 2d 38 2c 20 61 73 20 70 61 72 65 6e 74 0a 20 20 3b 3b 20 70 72 6f 63 65 f.in.UTF-8,.as.parent...;;.proce
13500 73 73 20 65 78 70 65 63 74 73 2e 0a 20 20 28 6c 65 74 20 28 28 63 6f 64 69 6e 67 2d 73 79 73 74 ss.expects....(let.((coding-syst
13520 65 6d 2d 66 6f 72 2d 77 72 69 74 65 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 0a em-for-write.'utf-8-emacs-unix).
13540 20 20 20 20 20 20 20 20 28 61 72 67 73 2d 6c 65 66 74 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d ........(args-left.command-line-
13560 61 72 67 73 2d 6c 65 66 74 29 29 0a 20 20 20 20 28 73 65 74 71 20 61 73 79 6e 63 2d 69 6e 2d 63 args-left)).....(setq.async-in-c
13580 68 69 6c 64 2d 65 6d 61 63 73 20 74 0a 20 20 20 20 20 20 20 20 20 20 64 65 62 75 67 2d 6f 6e 2d hild-emacs.t...........debug-on-
135a0 65 72 72 6f 72 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d error.async-debug...........comm
135c0 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 73 2d 6c 65 66 74 20 6e 69 6c 29 0a 20 20 20 20 28 63 6f 6e and-line-args-left.nil).....(con
135e0 64 69 74 69 6f 6e 2d 63 61 73 65 2d 75 6e 6c 65 73 73 2d 64 65 62 75 67 20 65 72 72 0a 20 20 20 dition-case-unless-debug.err....
13600 20 20 20 20 20 28 6c 65 74 20 28 28 72 65 74 20 28 66 75 6e 63 61 6c 6c 0a 20 20 20 20 20 20 20 .....(let.((ret.(funcall........
13620 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 .............(async--receive-sex
13640 70 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 73 65 6e 64 2d 6f 76 65 72 2d 70 69 70 65 0a 20 p.(unless.async-send-over-pipe..
13660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
13680 20 20 20 20 20 20 20 20 20 20 61 72 67 73 2d 6c 65 66 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 ..........args-left)))))........
136a0 20 20 20 3b 3b 20 54 68 65 20 6e 65 77 6c 69 6e 65 73 20 6d 61 6b 65 73 20 63 6c 69 65 6e 74 20 ...;;.The.newlines.makes.client.
136c0 6d 65 73 73 61 67 65 73 20 6d 6f 72 65 20 72 6f 62 75 73 74 20 61 6e 64 20 61 6c 73 6f 0a 20 20 messages.more.robust.and.also...
136e0 20 20 20 20 20 20 20 20 3b 3b 20 68 61 6e 64 6c 65 20 73 6f 6d 65 20 77 65 69 72 64 20 6c 69 6e ........;;.handle.some.weird.lin
13700 65 2d 62 75 66 66 65 72 69 6e 67 20 69 73 73 75 65 73 20 6f 6e 20 77 69 6e 64 6f 77 73 2e 0a 20 e-buffering.issues.on.windows...
13720 20 20 20 20 20 20 20 20 20 3b 3b 20 53 6f 6d 65 74 69 6d 65 73 2c 20 74 68 65 20 6c 61 73 74 20 .........;;.Sometimes,.the.last.
13740 22 63 68 75 6e 6b 22 20 77 61 73 20 6e 6f 74 20 72 65 61 64 20 62 79 20 74 68 65 20 66 69 6c 74 "chunk".was.not.read.by.the.filt
13760 65 72 2c 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 6f 20 61 20 6e 65 77 6c 69 6e 65 20 68 65 er,...........;;.so.a.newline.he
13780 72 65 20 73 68 6f 75 6c 64 20 66 6f 72 63 65 20 61 20 62 75 66 66 65 72 20 66 6c 75 73 68 2e 0a re.should.force.a.buffer.flush..
137a0 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 ..........(princ."\n")..........
137c0 20 28 70 72 69 6e 31 20 72 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c .(prin1.ret)...........(princ."\
137e0 6e 22 29 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 0a 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a n")).......(error........(progn.
13800 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 28 .........(princ."\n")..........(
13820 70 72 69 6e 31 20 28 6c 69 73 74 20 27 61 73 79 6e 63 2d 73 69 67 6e 61 6c 20 65 72 72 29 29 0a prin1.(list.'async-signal.err)).
13840 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c 6e 22 29 29 29 29 29 29 0a 0a 28 64 65 66 .........(princ."\n"))))))..(def
13860 75 6e 20 61 73 79 6e 63 2d 72 65 61 64 79 20 28 66 75 74 75 72 65 29 0a 20 20 22 51 75 65 72 79 un.async-ready.(future)..."Query
13880 20 61 20 46 55 54 55 52 45 20 74 6f 20 73 65 65 20 69 66 20 69 74 20 69 73 20 72 65 61 64 79 2e .a.FUTURE.to.see.if.it.is.ready.
138a0 0a 0a 49 2e 65 2e 2c 20 69 66 20 6e 6f 20 62 6c 6f 63 6b 69 6e 67 20 77 6f 75 6c 64 20 72 65 73 ..I.e.,.if.no.blocking.would.res
138c0 75 6c 74 20 66 72 6f 6d 20 61 20 63 61 6c 6c 20 74 6f 20 60 61 73 79 6e 63 2d 67 65 74 27 20 6f ult.from.a.call.to.`async-get'.o
138e0 6e 20 74 68 61 74 20 46 55 54 55 52 45 2e 22 0a 20 20 28 61 6e 64 20 28 6d 65 6d 71 20 28 70 72 n.that.FUTURE."...(and.(memq.(pr
13900 6f 63 65 73 73 2d 73 74 61 74 75 73 20 66 75 74 75 72 65 29 20 27 28 65 78 69 74 20 73 69 67 6e ocess-status.future).'(exit.sign
13920 61 6c 29 29 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 70 72 6f 63 65 73 73 2d al))........(let.((buf.(process-
13940 62 75 66 66 65 72 20 66 75 74 75 72 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 buffer.future)))..........(if.(b
13960 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 uffer-live-p.buf)..............(
13980 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 with-current-buffer.buf.........
139a0 20 20 20 20 20 20 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 2d 73 65 74 29 .......async-callback-value-set)
139c0 0a 20 20 20 20 20 20 20 20 20 20 20 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d ............t))))..(defun.async-
139e0 77 61 69 74 20 28 66 75 74 75 72 65 29 0a 20 20 22 57 61 69 74 20 66 6f 72 20 46 55 54 55 52 45 wait.(future)..."Wait.for.FUTURE
13a00 20 74 6f 20 62 65 63 6f 6d 65 20 72 65 61 64 79 2e 22 0a 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 .to.become.ready."...(while.(not
13a20 20 28 61 73 79 6e 63 2d 72 65 61 64 79 20 66 75 74 75 72 65 29 29 0a 20 20 20 20 28 73 6c 65 65 .(async-ready.future)).....(slee
13a40 70 2d 66 6f 72 20 30 2e 30 35 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 67 65 74 20 p-for.0.05)))..(defun.async-get.
13a60 28 66 75 74 75 72 65 29 0a 20 20 22 47 65 74 20 74 68 65 20 76 61 6c 75 65 20 66 72 6f 6d 20 70 (future)..."Get.the.value.from.p
13a80 72 6f 63 65 73 73 20 46 55 54 55 52 45 20 77 68 65 6e 20 69 74 20 69 73 20 72 65 61 64 79 2e 0a rocess.FUTURE.when.it.is.ready..
13aa0 46 55 54 55 52 45 20 69 73 20 72 65 74 75 72 6e 65 64 20 62 79 20 60 61 73 79 6e 63 2d 73 74 61 FUTURE.is.returned.by.`async-sta
13ac0 72 74 27 20 6f 72 20 60 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 27 20 77 68 65 rt'.or.`async-start-process'.whe
13ae0 6e 0a 69 74 73 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 6e 69 6c 2e 22 0a 20 20 28 61 6e n.its.FINISH-FUNC.is.nil."...(an
13b00 64 20 66 75 74 75 72 65 20 28 61 73 79 6e 63 2d 77 61 69 74 20 66 75 74 75 72 65 29 29 0a 20 20 d.future.(async-wait.future))...
13b20 28 6c 65 74 20 28 28 62 75 66 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 66 75 74 75 72 (let.((buf.(process-buffer.futur
13b40 65 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 e))).....(when.(buffer-live-p.bu
13b60 66 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 f).......(with-current-buffer.bu
13b80 66 0a 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 73 75 6c 74 0a 20 f.........(async-handle-result..
13ba0 20 20 20 20 20 20 20 20 23 27 69 64 65 6e 74 69 74 79 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 ........#'identity.async-callbac
13bc0 6b 2d 76 61 6c 75 65 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 29 0a 0a 28 k-value.(current-buffer))))))..(
13be0 64 65 66 75 6e 20 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 70 20 28 76 61 6c 75 65 29 0a 20 20 defun.async-message-p.(value)...
13c00 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 56 41 4c 55 45 20 69 73 20 61 6e 20 61 "Return.non-nil.if.VALUE.is.an.a
13c20 73 79 6e 63 2e 65 6c 20 6d 65 73 73 61 67 65 20 70 61 63 6b 65 74 2e 22 0a 20 20 28 61 6e 64 20 sync.el.message.packet."...(and.
13c40 28 6c 69 73 74 70 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 (listp.value)........(plist-get.
13c60 76 61 6c 75 65 20 3a 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 value.:async-message)))..(defun.
13c80 61 73 79 6e 63 2d 73 65 6e 64 20 28 70 72 6f 63 65 73 73 2d 6f 72 2d 6b 65 79 20 26 72 65 73 74 async-send.(process-or-key.&rest
13ca0 20 61 72 67 73 29 0a 20 20 22 53 65 6e 64 20 74 68 65 20 67 69 76 65 6e 20 6d 65 73 73 61 67 65 .args)..."Send.the.given.message
13cc0 20 74 6f 20 74 68 65 20 61 73 79 63 68 72 6f 6e 6f 75 73 20 63 68 69 6c 64 20 6f 72 20 70 61 72 .to.the.asychronous.child.or.par
13ce0 65 6e 74 20 45 6d 61 63 73 2e 0a 0a 54 6f 20 73 65 6e 64 20 6d 65 73 73 61 67 65 73 20 66 72 6f ent.Emacs...To.send.messages.fro
13d00 6d 20 74 68 65 20 70 61 72 65 6e 74 20 74 6f 20 61 20 63 68 69 6c 64 2c 20 50 52 4f 43 45 53 53 m.the.parent.to.a.child,.PROCESS
13d20 2d 4f 52 2d 4b 45 59 20 69 73 0a 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 20 6f 62 6a -OR-KEY.is.the.child.process.obj
13d40 65 63 74 2e 20 20 41 52 47 53 20 69 73 20 61 20 70 6c 69 73 74 2e 20 20 45 78 61 6d 70 6c 65 3a ect...ARGS.is.a.plist...Example:
13d60 0a 0a 20 20 28 61 73 79 6e 63 2d 73 65 6e 64 20 70 72 6f 63 20 3a 6f 70 65 72 61 74 69 6f 6e 20 ....(async-send.proc.:operation.
13d80 3a 6c 6f 61 64 2d 66 69 6c 65 20 3a 66 69 6c 65 20 5c 22 74 68 69 73 20 66 69 6c 65 5c 22 29 0a :load-file.:file.\"this.file\").
13da0 0a 54 6f 20 73 65 6e 64 20 6d 65 73 73 61 67 65 73 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 .To.send.messages.from.the.child
13dc0 20 74 6f 20 74 68 65 20 70 61 72 65 6e 74 2c 20 50 52 4f 43 45 53 53 2d 4f 52 2d 4b 45 59 20 69 .to.the.parent,.PROCESS-OR-KEY.i
13de0 73 0a 74 68 65 20 66 69 72 73 74 20 6b 65 79 20 6f 66 20 74 68 65 20 70 6c 69 73 74 2c 20 41 52 s.the.first.key.of.the.plist,.AR
13e00 47 53 20 69 73 20 61 20 76 61 6c 75 65 20 66 6f 6c 6c 6f 77 65 64 20 62 79 0a 6f 70 74 69 6f 6e GS.is.a.value.followed.by.option
13e20 61 6c 6c 79 20 6d 6f 72 65 20 6b 65 79 2d 76 61 6c 75 65 20 70 61 69 72 73 2e 20 20 45 78 61 6d ally.more.key-value.pairs...Exam
13e40 70 6c 65 3a 0a 0a 20 20 28 61 73 79 6e 63 2d 73 65 6e 64 20 3a 73 74 61 74 75 73 20 5c 22 66 69 ple:....(async-send.:status.\"fi
13e60 6e 69 73 68 65 64 5c 22 20 3a 66 69 6c 65 2d 73 69 7a 65 20 31 32 33 29 22 0a 20 20 28 6c 65 74 nished\".:file-size.123)"...(let
13e80 20 28 28 61 72 67 73 20 28 61 70 70 65 6e 64 20 61 72 67 73 20 27 28 3a 61 73 79 6e 63 2d 6d 65 .((args.(append.args.'(:async-me
13ea0 73 73 61 67 65 20 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 69 6e 2d 63 68 69 ssage.t)))).....(if.async-in-chi
13ec0 6c 64 2d 65 6d 61 63 73 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 70 72 69 6e 63 27 20 62 65 63 61 ld-emacs.........;;.`princ'.beca
13ee0 75 73 65 20 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 61 6c 72 65 61 64 79 20 71 use.async--insert-sexp.already.q
13f00 75 6f 74 65 73 20 65 76 65 72 79 74 68 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 uotes.everything..........(princ
13f20 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 ..........(with-temp-buffer.....
13f40 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 28 63 6f 6e 73 .......(async--insert-sexp.(cons
13f60 20 70 72 6f 63 65 73 73 2d 6f 72 2d 6b 65 79 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 .process-or-key.args))..........
13f80 20 20 3b 3b 20 61 6c 77 61 79 73 20 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 6f 6e 65 20 6d ..;;.always.make.sure.that.one.m
13fa0 65 73 73 61 67 65 20 70 61 63 6b 61 67 65 20 68 61 73 20 69 74 73 20 6f 77 6e 0a 20 20 20 20 20 essage.package.has.its.own......
13fc0 20 20 20 20 20 20 3b 3b 20 6c 69 6e 65 20 61 73 20 74 68 65 72 65 20 63 61 6e 20 62 65 20 61 6e ......;;.line.as.there.can.be.an
13fe0 79 20 72 61 6e 64 6f 6d 20 64 65 62 75 67 20 67 61 72 62 61 67 65 20 70 72 69 6e 74 65 64 0a 20 y.random.debug.garbage.printed..
14000 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 62 6f 76 65 20 69 74 2e 0a 20 20 20 20 20 20 20 20 20 ..........;;.above.it...........
14020 20 20 28 63 6f 6e 63 61 74 20 22 5c 6e 22 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 ..(concat."\n".(buffer-string)))
14040 29 0a 20 20 20 20 20 20 28 61 73 79 6e 63 2d 2d 74 72 61 6e 73 6d 69 74 2d 73 65 78 70 20 70 72 ).......(async--transmit-sexp.pr
14060 6f 63 65 73 73 2d 6f 72 2d 6b 65 79 20 28 6c 69 73 74 20 27 71 75 6f 74 65 20 61 72 67 73 29 29 ocess-or-key.(list.'quote.args))
14080 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 72 65 63 65 69 76 65 20 28 29 0a 20 20 22 )))..(defun.async-receive.()..."
140a0 52 65 63 65 69 76 65 20 6d 65 73 73 61 67 65 20 66 72 6f 6d 20 70 61 72 65 6e 74 20 45 6d 61 63 Receive.message.from.parent.Emac
140c0 73 2e 0a 0a 54 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 20 62 6c 6f 63 6b 73 20 75 6e 74 s...The.child.process.blocks.unt
140e0 69 6c 20 61 20 6d 65 73 73 61 67 65 20 69 73 20 72 65 63 65 69 76 65 64 2e 0a 0a 4d 65 73 73 61 il.a.message.is.received...Messa
14100 67 65 20 69 73 20 61 20 70 6c 69 73 74 20 77 69 74 68 20 6f 6e 65 20 6b 65 79 20 3a 61 73 79 6e ge.is.a.plist.with.one.key.:asyn
14120 63 2d 6d 65 73 73 61 67 65 20 73 65 74 20 74 6f 20 74 20 61 6c 77 61 79 73 0a 61 75 74 6f 6d 61 c-message.set.to.t.always.automa
14140 74 69 63 61 6c 6c 79 20 61 64 64 65 64 20 74 6f 20 73 69 67 6e 69 66 79 20 74 68 69 73 20 70 6c tically.added.to.signify.this.pl
14160 69 73 74 20 69 73 20 61 6e 20 61 73 79 6e 63 20 6d 65 73 73 61 67 65 2e 0a 0a 59 6f 75 20 63 61 ist.is.an.async.message...You.ca
14180 6e 20 75 73 65 20 60 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 70 27 20 74 6f 20 74 65 73 74 20 n.use.`async-message-p'.to.test.
141a0 69 66 20 74 68 65 20 70 61 79 6c 6f 61 64 20 77 61 73 20 61 0a 6d 65 73 73 61 67 65 2e 0a 0a 55 if.the.payload.was.a.message...U
141c0 73 65 0a 0a 20 20 20 28 6c 65 74 20 28 28 6d 73 67 20 28 61 73 79 6e 63 2d 72 65 63 65 69 76 65 se.....(let.((msg.(async-receive
141e0 29 29 29 20 2e 2e 2e 29 0a 0a 74 6f 20 72 65 61 64 20 61 6e 64 20 70 72 6f 63 65 73 73 20 61 20 )))....)..to.read.and.process.a.
14200 6d 65 73 73 61 67 65 2e 22 0a 20 20 28 61 73 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 70 message."...(async--receive-sexp
14220 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d ))..;;;###autoload.(defun.async-
14240 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 28 6e 61 6d 65 20 70 72 6f 67 72 61 6d 20 66 69 6e 69 start-process.(name.program.fini
14260 73 68 2d 66 75 6e 63 20 26 72 65 73 74 20 70 72 6f 67 72 61 6d 2d 61 72 67 73 29 0a 20 20 22 53 sh-func.&rest.program-args)..."S
14280 74 61 72 74 20 74 68 65 20 65 78 65 63 75 74 61 62 6c 65 20 50 52 4f 47 52 41 4d 20 61 73 79 6e tart.the.executable.PROGRAM.asyn
142a0 63 68 72 6f 6e 6f 75 73 6c 79 20 6e 61 6d 65 64 20 4e 41 4d 45 2e 20 20 53 65 65 20 60 61 73 79 chronously.named.NAME...See.`asy
142c0 6e 63 2d 73 74 61 72 74 27 2e 0a 50 52 4f 47 52 41 4d 20 69 73 20 70 61 73 73 65 64 20 50 52 4f nc-start'..PROGRAM.is.passed.PRO
142e0 47 52 41 4d 2d 41 52 47 53 2c 20 63 61 6c 6c 69 6e 67 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 77 GRAM-ARGS,.calling.FINISH-FUNC.w
14300 69 74 68 20 74 68 65 0a 70 72 6f 63 65 73 73 20 6f 62 6a 65 63 74 20 77 68 65 6e 20 64 6f 6e 65 ith.the.process.object.when.done
14320 2e 20 20 49 66 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 6e 69 6c 2c 20 74 68 65 20 66 75 ...If.FINISH-FUNC.is.nil,.the.fu
14340 74 75 72 65 0a 6f 62 6a 65 63 74 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 68 65 20 70 72 6f 63 ture.object.will.return.the.proc
14360 65 73 73 20 6f 62 6a 65 63 74 20 77 68 65 6e 20 74 68 65 20 70 72 6f 67 72 61 6d 20 69 73 0a 66 ess.object.when.the.program.is.f
14380 69 6e 69 73 68 65 64 2e 20 20 53 65 74 20 44 45 46 41 55 4c 54 2d 44 49 52 45 43 54 4f 52 59 20 inished...Set.DEFAULT-DIRECTORY.
143a0 74 6f 20 63 68 61 6e 67 65 20 50 52 4f 47 52 41 4d 27 73 20 63 75 72 72 65 6e 74 0a 77 6f 72 6b to.change.PROGRAM's.current.work
143c0 69 6e 67 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 62 75 66 20 28 67 ing.directory."...(let*.((buf.(g
143e0 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 28 63 6f 6e 63 61 74 20 22 2a 22 20 6e enerate-new-buffer.(concat."*".n
14400 61 6d 65 20 22 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 2d 65 72 72 20 28 67 65 ame."*")))..........(buf-err.(ge
14420 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 28 63 6f 6e 63 61 74 20 22 2a 22 20 6e 61 nerate-new-buffer.(concat."*".na
14440 6d 65 20 22 3a 65 72 72 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 20 28 6c 65 me.":err*")))..........(proc.(le
14460 74 20 28 28 70 72 6f 63 65 73 73 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 74 79 70 65 20 6e 69 6c 29 t.((process-connection-type.nil)
14480 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 70 72 6f 63 65 73 73 )..................(make-process
144a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 61 6d 65 20 6e 61 6d 65 0a 20 20 ...................:name.name...
144c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 ................:buffer.buf.....
144e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 64 65 72 72 20 62 75 66 2d 65 72 72 0a 20 20 ..............:stderr.buf-err...
14500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 61 6e 64 20 28 63 6f 6e 73 20 70 ................:command.(cons.p
14520 72 6f 67 72 61 6d 20 70 72 6f 67 72 61 6d 2d 61 72 67 73 29 29 29 29 29 0a 20 20 20 20 28 73 65 rogram.program-args))))).....(se
14540 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 0a 20 20 20 20 20 28 67 65 74 2d 62 75 66 t-process-sentinel......(get-buf
14560 66 65 72 2d 70 72 6f 63 65 73 73 20 62 75 66 2d 65 72 72 29 0a 20 20 20 20 20 28 6c 61 6d 62 64 fer-process.buf-err)......(lambd
14580 61 20 28 70 72 6f 63 20 5f 63 68 61 6e 67 65 29 0a 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 a.(proc._change)........(unless.
145a0 28 6f 72 20 61 73 79 6e 63 2d 64 65 62 75 67 20 28 70 72 6f 63 65 73 73 2d 6c 69 76 65 2d 70 20 (or.async-debug.(process-live-p.
145c0 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 70 72 proc))..........(kill-buffer.(pr
145e0 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 29 29 29 29 0a 20 20 20 20 28 77 69 74 68 ocess-buffer.proc))))).....(with
14600 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 28 73 65 74 20 28 -current-buffer.buf.......(set.(
14620 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 make-local-variable.'async-callb
14640 61 63 6b 29 20 66 69 6e 69 73 68 2d 66 75 6e 63 29 0a 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 ack).finish-func).......(set.(ma
14660 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 72 65 61 64 2d 6d 61 ke-local-variable.'async-read-ma
14680 72 6b 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 6d 61 72 6b 65 72 20 28 6d 61 rker)............(set-marker.(ma
146a0 6b 65 2d 6d 61 72 6b 65 72 29 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 62 75 66 29 29 0a 20 20 20 ke-marker).(point-min).buf))....
146c0 20 20 20 28 73 65 74 2d 6d 61 72 6b 65 72 2d 69 6e 73 65 72 74 69 6f 6e 2d 74 79 70 65 20 61 73 ...(set-marker-insertion-type.as
146e0 79 6e 63 2d 72 65 61 64 2d 6d 61 72 6b 65 72 20 6e 69 6c 29 0a 0a 20 20 20 20 20 20 28 73 65 74 ync-read-marker.nil)........(set
14700 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 20 70 72 6f 63 20 23 27 61 73 79 6e 63 2d 77 -process-sentinel.proc.#'async-w
14720 68 65 6e 2d 64 6f 6e 65 29 0a 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 66 69 6c hen-done).......(set-process-fil
14740 74 65 72 20 70 72 6f 63 20 23 27 61 73 79 6e 63 2d 72 65 61 64 2d 66 72 6f 6d 2d 63 6c 69 65 6e ter.proc.#'async-read-from-clien
14760 74 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 6e 61 6d 65 20 22 t).......(unless.(string=.name."
14780 65 6d 61 63 73 22 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 2d 6c 6f 63 61 6c emacs").........(set.(make-local
147a0 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 66 6f 72 2d 70 72 -variable.'async-callback-for-pr
147c0 6f 63 65 73 73 29 20 74 29 29 0a 20 20 20 20 20 20 70 72 6f 63 29 29 29 0a 0a 28 64 65 66 76 61 ocess).t)).......proc)))..(defva
147e0 72 20 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 68 20 22 2d 51 22 0a 20 20 22 54 68 65 r.async-quiet-switch."-Q"..."The
14800 20 45 6d 61 63 73 20 70 61 72 61 6d 65 74 65 72 20 74 6f 20 75 73 65 20 74 6f 20 63 61 6c 6c 20 .Emacs.parameter.to.use.to.call.
14820 65 6d 61 63 73 20 77 69 74 68 6f 75 74 20 63 6f 6e 66 69 67 2e 0a 43 61 6e 20 62 65 20 6f 6e 65 emacs.without.config..Can.be.one
14840 20 6f 66 20 5c 22 2d 51 5c 22 20 6f 72 20 5c 22 2d 71 5c 22 2e 0a 44 65 66 61 75 6c 74 20 69 73 .of.\"-Q\".or.\"-q\"..Default.is
14860 20 5c 22 2d 51 5c 22 20 62 75 74 20 69 74 20 69 73 20 73 6f 6d 65 74 69 6d 65 73 20 75 73 65 66 .\"-Q\".but.it.is.sometimes.usef
14880 75 6c 20 74 6f 20 75 73 65 20 5c 22 2d 71 5c 22 20 74 6f 20 68 61 76 65 20 61 0a 65 6e 68 61 6e ul.to.use.\"-q\".to.have.a.enhan
148a0 63 65 64 20 63 6f 6e 66 69 67 20 6f 72 20 73 6f 6d 65 20 6d 6f 72 65 20 76 61 72 69 61 62 6c 65 ced.config.or.some.more.variable
148c0 73 20 6c 6f 61 64 65 64 2e 22 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 2d 65 6d 61 63 73 s.loaded.")..(defun.async--emacs
148e0 2d 70 72 6f 67 72 61 6d 2d 61 72 67 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 65 78 70 29 0a 20 -program-args.(&optional.sexp)..
14900 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 66 6f 72 ."Return.a.list.of.arguments.for
14920 20 69 6e 76 6f 6b 69 6e 67 20 74 68 65 20 63 68 69 6c 64 20 45 6d 61 63 73 2e 22 0a 20 20 3b 3b .invoking.the.child.Emacs."...;;
14940 20 55 73 69 6e 67 20 60 6c 6f 63 61 74 65 2d 6c 69 62 72 61 72 79 27 20 65 6e 73 75 72 65 20 77 .Using.`locate-library'.ensure.w
14960 65 20 75 73 65 20 74 68 65 20 72 69 67 68 74 20 66 69 6c 65 0a 20 20 3b 3b 20 77 68 65 6e 20 74 e.use.the.right.file...;;.when.t
14980 68 65 20 2e 65 6c 63 20 68 61 76 65 20 62 65 65 6e 20 64 65 6c 65 74 65 64 2e 0a 20 20 28 6c 65 he..elc.have.been.deleted....(le
149a0 74 20 28 28 61 72 67 73 20 28 6c 69 73 74 20 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 t.((args.(list.async-quiet-switc
149c0 68 20 22 2d 6c 22 20 28 6c 6f 63 61 74 65 2d 6c 69 62 72 61 72 79 20 22 61 73 79 6e 63 22 29 29 h."-l".(locate-library."async"))
149e0 29 29 0a 20 20 20 20 28 77 68 65 6e 20 61 73 79 6e 63 2d 63 68 69 6c 64 2d 69 6e 69 74 0a 20 20 )).....(when.async-child-init...
14a00 20 20 20 20 28 73 65 74 71 20 61 72 67 73 20 28 61 70 70 65 6e 64 20 61 72 67 73 20 28 6c 69 73 ....(setq.args.(append.args.(lis
14a20 74 20 22 2d 6c 22 20 61 73 79 6e 63 2d 63 68 69 6c 64 2d 69 6e 69 74 29 29 29 29 0a 20 20 20 20 t."-l".async-child-init)))).....
14a40 28 61 70 70 65 6e 64 20 61 72 67 73 20 28 6c 69 73 74 20 22 2d 62 61 74 63 68 22 20 22 2d 66 22 (append.args.(list."-batch"."-f"
14a60 20 22 61 73 79 6e 63 2d 62 61 74 63 68 2d 69 6e 76 6f 6b 65 22 0a 20 20 20 20 20 20 20 20 20 20 ."async-batch-invoke"...........
14a80 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 65 78 70 0a 20 20 20 20 20 20 20 20 20 20 .............(if.sexp...........
14aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 .................(with-temp-buff
14ac0 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 er..............................
14ae0 28 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 28 6c 69 73 74 20 27 71 75 6f 74 65 (async--insert-sexp.(list.'quote
14b00 20 73 65 78 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .sexp)).........................
14b20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 .....(buffer-string))...........
14b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3c 6e 6f 6e 65 3e 22 29 29 29 29 29 0a 0a ................."<none>")))))..
14b60 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 73 74 61 72 ;;;###autoload.(defun.async-star
14b80 74 20 28 73 74 61 72 74 2d 66 75 6e 63 20 26 6f 70 74 69 6f 6e 61 6c 20 66 69 6e 69 73 68 2d 66 t.(start-func.&optional.finish-f
14ba0 75 6e 63 29 0a 20 20 22 45 78 65 63 75 74 65 20 53 54 41 52 54 2d 46 55 4e 43 20 28 6f 66 74 65 unc)..."Execute.START-FUNC.(ofte
14bc0 6e 20 61 20 6c 61 6d 62 64 61 29 20 69 6e 20 61 20 73 75 62 6f 72 64 69 6e 61 74 65 20 45 6d 61 n.a.lambda).in.a.subordinate.Ema
14be0 63 73 20 70 72 6f 63 65 73 73 2e 0a 57 68 65 6e 20 64 6f 6e 65 2c 20 74 68 65 20 72 65 74 75 72 cs.process..When.done,.the.retur
14c00 6e 20 76 61 6c 75 65 20 69 73 20 70 61 73 73 65 64 20 74 6f 20 46 49 4e 49 53 48 2d 46 55 4e 43 n.value.is.passed.to.FINISH-FUNC
14c20 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 0a 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 ...Example:......(async-start...
14c40 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 .....;;.What.to.do.in.the.child.
14c60 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 process........(lambda.().......
14c80 20 20 20 28 6d 65 73 73 61 67 65 20 5c 22 54 68 69 73 20 69 73 20 61 20 74 65 73 74 5c 22 29 0a ...(message.\"This.is.a.test\").
14ca0 20 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 33 29 0a 20 20 20 20 20 20 20 20 20 .........(sleep-for.3)..........
14cc0 32 32 32 29 0a 0a 20 20 20 20 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e 20 222).........;;.What.to.do.when.
14ce0 69 74 20 66 69 6e 69 73 68 65 73 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 it.finishes........(lambda.(resu
14d00 6c 74 29 0a 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 5c 22 41 73 79 6e 63 20 70 72 lt)..........(message.\"Async.pr
14d20 6f 63 65 73 73 20 64 6f 6e 65 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 ocess.done,.result.should.be.222
14d40 3a 20 25 73 5c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 29 :.%s\"...................result)
14d60 29 29 0a 0a 49 66 20 79 6f 75 20 63 61 6c 6c 20 60 61 73 79 6e 63 2d 73 65 6e 64 27 20 66 72 6f ))..If.you.call.`async-send'.fro
14d80 6d 20 61 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 2c 20 74 68 65 20 6d 65 73 73 61 67 65 20 77 m.a.child.process,.the.message.w
14da0 69 6c 6c 0a 62 65 20 61 6c 73 6f 20 70 61 73 73 65 64 20 74 6f 20 74 68 65 20 46 49 4e 49 53 48 ill.be.also.passed.to.the.FINISH
14dc0 2d 46 55 4e 43 2e 20 20 59 6f 75 20 63 61 6e 20 74 65 73 74 20 52 45 53 55 4c 54 20 74 6f 20 73 -FUNC...You.can.test.RESULT.to.s
14de0 65 65 20 69 66 0a 69 74 20 69 73 20 61 20 6d 65 73 73 61 67 65 20 62 79 20 75 73 69 6e 67 20 60 ee.if.it.is.a.message.by.using.`
14e00 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 70 27 2e 20 20 49 66 20 6e 69 6c 2c 20 69 74 20 6d 65 async-message-p'...If.nil,.it.me
14e20 61 6e 73 0a 74 68 69 73 20 69 73 20 74 68 65 20 66 69 6e 61 6c 20 72 65 73 75 6c 74 2e 20 20 45 ans.this.is.the.final.result...E
14e40 78 61 6d 70 6c 65 20 6f 66 20 74 68 65 20 46 49 4e 49 53 48 2d 46 55 4e 43 3a 0a 0a 20 20 20 20 xample.of.the.FINISH-FUNC:......
14e60 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 28 69 66 20 28 61 73 79 6e (lambda.(result).......(if.(asyn
14e80 63 2d 6d 65 73 73 61 67 65 2d 70 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d c-message-p.result)...........(m
14ea0 65 73 73 61 67 65 20 5c 22 52 65 63 65 69 76 65 64 20 61 20 6d 65 73 73 61 67 65 20 66 72 6f 6d essage.\"Received.a.message.from
14ec0 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 3a 20 25 73 5c 22 20 72 65 73 75 6c 74 29 0a 20 20 20 .child.process:.%s\".result)....
14ee0 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 5c 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 64 6f .....(message.\"Async.process.do
14f00 6e 65 2c 20 72 65 73 75 6c 74 3a 20 25 73 5c 22 20 72 65 73 75 6c 74 29 29 29 0a 0a 49 66 20 46 ne,.result:.%s\".result)))..If.F
14f20 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 6e 69 6c 20 6f 72 20 6d 69 73 73 69 6e 67 2c 20 61 20 INISH-FUNC.is.nil.or.missing,.a.
14f40 66 75 74 75 72 65 20 69 73 20 72 65 74 75 72 6e 65 64 20 74 68 61 74 20 63 61 6e 0a 62 65 20 69 future.is.returned.that.can.be.i
14f60 6e 73 70 65 63 74 65 64 20 75 73 69 6e 67 20 60 61 73 79 6e 63 2d 67 65 74 27 2c 20 62 6c 6f 63 nspected.using.`async-get',.bloc
14f80 6b 69 6e 67 20 75 6e 74 69 6c 20 74 68 65 20 76 61 6c 75 65 20 69 73 0a 72 65 61 64 79 2e 20 20 king.until.the.value.is.ready...
14fa0 45 78 61 6d 70 6c 65 3a 0a 0a 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 63 20 28 61 73 79 6e 63 Example:......(let.((proc.(async
14fc0 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 61 -start....................;;.Wha
14fe0 74 20 74 6f 20 64 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 0a 20 20 20 t.to.do.in.the.child.process....
15000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 ................(lambda.()......
15020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 5c 22 54 68 69 73 20 ................(message.\"This.
15040 69 73 20 61 20 74 65 73 74 5c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 is.a.test\")....................
15060 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(sleep-for.3).................
15080 20 20 20 20 20 32 32 32 29 29 29 29 0a 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 5c .....222))))..........(message.\
150a0 22 49 27 6d 20 67 6f 69 6e 67 20 74 6f 20 64 6f 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 5c "I'm.going.to.do.some.work.here\
150c0 22 29 20 3b 3b 20 2e 2e 2e 2e 0a 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 5c 22 57 ").;;...............(message.\"W
150e0 61 69 74 69 6e 67 20 6f 6e 20 61 73 79 6e 63 20 70 72 6f 63 65 73 73 2c 20 72 65 73 75 6c 74 20 aiting.on.async.process,.result.
15100 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 5c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 should.be.222:.%s\".............
15120 20 20 20 20 20 28 61 73 79 6e 63 2d 67 65 74 20 70 72 6f 63 29 29 29 0a 0a 49 66 20 79 6f 75 20 .....(async-get.proc)))..If.you.
15140 64 6f 6e 27 74 20 77 61 6e 74 20 74 6f 20 75 73 65 20 61 20 63 61 6c 6c 62 61 63 6b 2c 20 61 6e don't.want.to.use.a.callback,.an
15160 64 20 79 6f 75 20 64 6f 6e 27 74 20 63 61 72 65 20 61 62 6f 75 74 20 61 6e 79 0a 72 65 74 75 72 d.you.don't.care.about.any.retur
15180 6e 20 76 61 6c 75 65 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 2c 20 n.value.from.the.child.process,.
151a0 70 61 73 73 20 74 68 65 20 60 69 67 6e 6f 72 65 27 20 73 79 6d 62 6f 6c 20 61 73 0a 74 68 65 20 pass.the.`ignore'.symbol.as.the.
151c0 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 28 69 66 20 79 6f 75 20 64 6f 6e 27 74 2c 20 61 second.argument.(if.you.don't,.a
151e0 6e 64 20 6e 65 76 65 72 20 63 61 6c 6c 20 60 61 73 79 6e 63 2d 67 65 74 27 2c 20 69 74 0a 77 69 nd.never.call.`async-get',.it.wi
15200 6c 6c 20 6c 65 61 76 65 20 2a 65 6d 61 63 73 2a 20 70 72 6f 63 65 73 73 20 62 75 66 66 65 72 73 ll.leave.*emacs*.process.buffers
15220 20 68 61 6e 67 69 6e 67 20 61 72 6f 75 6e 64 29 3a 0a 0a 20 20 20 20 28 61 73 79 6e 63 2d 73 74 .hanging.around):......(async-st
15240 61 72 74 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 28 64 65 6c 65 art......(lambda.()........(dele
15260 74 65 2d 66 69 6c 65 20 5c 22 61 20 72 65 6d 6f 74 65 20 66 69 6c 65 20 6f 6e 20 61 20 73 6c 6f te-file.\"a.remote.file.on.a.slo
15280 77 20 6c 69 6e 6b 5c 22 20 6e 69 6c 29 29 0a 20 20 20 20 20 5c 5c 3d 27 69 67 6e 6f 72 65 29 0a w.link\".nil))......\\='ignore).
152a0 0a 53 70 65 63 69 61 6c 20 63 61 73 65 3a 0a 49 66 20 74 68 65 20 6f 75 74 70 75 74 20 6f 66 20 .Special.case:.If.the.output.of.
152c0 53 54 41 52 54 2d 46 55 4e 43 20 69 73 20 61 20 73 74 72 69 6e 67 20 77 69 74 68 20 70 72 6f 70 START-FUNC.is.a.string.with.prop
152e0 65 72 74 69 65 73 0a 65 2e 67 2e 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 20 52 45 53 55 erties.e.g..(buffer-string).RESU
15300 4c 54 20 77 69 6c 6c 20 62 65 20 74 72 61 6e 73 66 6f 72 6d 65 64 20 69 6e 20 61 20 6c 69 73 74 LT.will.be.transformed.in.a.list
15320 20 77 68 65 72 65 20 74 68 65 0a 63 61 72 20 69 73 20 74 68 65 20 73 74 72 69 6e 67 20 69 74 73 .where.the.car.is.the.string.its
15340 65 6c 66 20 28 77 69 74 68 6f 75 74 20 70 72 6f 70 73 29 20 61 6e 64 20 74 68 65 20 63 64 72 20 elf.(without.props).and.the.cdr.
15360 74 68 65 20 72 65 73 74 20 6f 66 0a 70 72 6f 70 65 72 74 69 65 73 2c 20 74 68 69 73 20 61 6c 6c the.rest.of.properties,.this.all
15380 6f 77 73 20 75 73 69 6e 67 20 69 6e 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 74 68 65 20 73 74 72 ows.using.in.FINISH-FUNC.the.str
153a0 69 6e 67 20 77 69 74 68 6f 75 74 0a 70 72 6f 70 65 72 74 69 65 73 20 61 6e 64 20 74 68 65 6e 20 ing.without.properties.and.then.
153c0 61 70 70 6c 79 20 74 68 65 20 70 72 6f 70 65 72 74 69 65 73 20 69 6e 20 63 64 72 20 74 6f 20 74 apply.the.properties.in.cdr.to.t
153e0 68 69 73 20 73 74 72 69 6e 67 20 28 69 66 0a 6e 65 65 64 65 64 29 2e 0a 50 72 6f 70 65 72 74 69 his.string.(if.needed)..Properti
15400 65 73 20 68 61 6e 64 6c 69 6e 67 20 73 70 65 63 69 61 6c 20 6f 62 6a 65 63 74 73 20 6c 69 6b 65 es.handling.special.objects.like
15420 20 6d 61 72 6b 65 72 73 20 61 72 65 20 72 65 74 75 72 6e 65 64 20 61 73 0a 6c 69 73 74 20 74 6f .markers.are.returned.as.list.to
15440 20 61 6c 6c 6f 77 20 72 65 73 74 6f 72 69 6e 67 20 74 68 65 6d 20 6c 61 74 65 72 2e 0a 53 65 65 .allow.restoring.them.later..See
15460 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 65 6d .<https://github.com/jwiegley/em
15480 61 63 73 2d 61 73 79 6e 63 2f 69 73 73 75 65 73 2f 31 34 35 3e 20 66 6f 72 20 6d 6f 72 65 20 69 acs-async/issues/145>.for.more.i
154a0 6e 66 6f 73 2e 0a 0a 4e 6f 74 65 3a 20 45 76 65 6e 20 77 68 65 6e 20 46 49 4e 49 53 48 2d 46 55 nfos...Note:.Even.when.FINISH-FU
154c0 4e 43 20 69 73 20 70 72 65 73 65 6e 74 2c 20 61 20 66 75 74 75 72 65 20 69 73 20 73 74 69 6c 6c NC.is.present,.a.future.is.still
154e0 0a 72 65 74 75 72 6e 65 64 20 65 78 63 65 70 74 20 74 68 61 74 20 69 74 20 79 69 65 6c 64 73 20 .returned.except.that.it.yields.
15500 6e 6f 20 76 61 6c 75 65 20 28 73 69 6e 63 65 20 74 68 65 20 76 61 6c 75 65 20 69 73 0a 70 61 73 no.value.(since.the.value.is.pas
15520 73 65 64 20 74 6f 20 46 49 4e 49 53 48 2d 46 55 4e 43 29 2e 20 20 43 61 6c 6c 20 60 61 73 79 6e sed.to.FINISH-FUNC)...Call.`asyn
15540 63 2d 67 65 74 27 20 6f 6e 20 73 75 63 68 20 61 20 66 75 74 75 72 65 20 61 6c 77 61 79 73 0a 72 c-get'.on.such.a.future.always.r
15560 65 74 75 72 6e 73 20 6e 69 6c 2e 20 20 49 74 20 63 61 6e 20 73 74 69 6c 6c 20 62 65 20 75 73 65 eturns.nil...It.can.still.be.use
15580 66 75 6c 2c 20 68 6f 77 65 76 65 72 2c 20 61 73 20 61 6e 20 61 72 67 75 6d 65 6e 74 20 74 6f 0a ful,.however,.as.an.argument.to.
155a0 60 61 73 79 6e 63 2d 72 65 61 64 79 27 20 6f 72 20 60 61 73 79 6e 63 2d 77 61 69 74 27 2e 22 0a `async-ready'.or.`async-wait'.".
155c0 20 20 28 6c 65 74 20 28 28 73 65 78 70 20 73 74 61 72 74 2d 66 75 6e 63 29 0a 20 20 20 20 20 20 ..(let.((sexp.start-func).......
155e0 20 20 3b 3b 20 53 75 62 6f 72 64 69 6e 61 74 65 20 45 6d 61 63 73 20 77 69 6c 6c 20 73 65 6e 64 ..;;.Subordinate.Emacs.will.send
15600 20 74 65 78 74 20 65 6e 63 6f 64 65 64 20 69 6e 20 55 54 46 2d 38 2e 0a 20 20 20 20 20 20 20 20 .text.encoded.in.UTF-8..........
15620 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 2d 66 6f 72 2d 72 65 61 64 20 27 75 74 66 2d 38 2d 65 (coding-system-for-read.'utf-8-e
15640 6d 61 63 73 2d 75 6e 69 78 29 29 0a 20 20 20 20 28 73 65 74 71 20 61 73 79 6e 63 2d 2d 70 72 6f macs-unix)).....(setq.async--pro
15660 63 76 61 72 0a 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 27 61 73 79 6e 63 2d 73 74 61 cvar...........(apply.'async-sta
15680 72 74 2d 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 65 6d 61 rt-process.................."ema
156a0 63 73 22 20 28 66 69 6c 65 2d 74 72 75 65 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 cs".(file-truename..............
156c0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 69 .............(expand-file-name.i
156e0 6e 76 6f 63 61 74 69 6f 6e 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nvocation-name..................
15700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 76 6f 63 ...........................invoc
15720 61 74 69 6f 6e 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ation-directory))...............
15740 20 20 20 66 69 6e 69 73 68 2d 66 75 6e 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...finish-func..................
15760 28 61 73 79 6e 63 2d 2d 65 6d 61 63 73 2d 70 72 6f 67 72 61 6d 2d 61 72 67 73 20 28 69 66 20 28 (async--emacs-program-args.(if.(
15780 6e 6f 74 20 61 73 79 6e 63 2d 73 65 6e 64 2d 6f 76 65 72 2d 70 69 70 65 29 20 73 65 78 70 29 29 not.async-send-over-pipe).sexp))
157a0 29 29 0a 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 73 65 6e 64 2d 6f 76 65 72 2d 70 69 70 65 ))......(if.async-send-over-pipe
157c0 0a 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 2d 74 72 61 6e 73 6d 69 74 2d 73 65 78 70 20 61 .........(async--transmit-sexp.a
157e0 73 79 6e 63 2d 2d 70 72 6f 63 76 61 72 20 28 6c 69 73 74 20 27 71 75 6f 74 65 20 73 65 78 70 29 sync--procvar.(list.'quote.sexp)
15800 29 29 0a 20 20 20 20 61 73 79 6e 63 2d 2d 70 72 6f 63 76 61 72 29 29 0a 0a 28 64 65 66 6d 61 63 )).....async--procvar))..(defmac
15820 72 6f 20 61 73 79 6e 63 2d 73 61 6e 64 62 6f 78 28 66 75 6e 63 29 0a 20 20 22 45 76 61 6c 75 61 ro.async-sandbox(func)..."Evalua
15840 74 65 20 46 55 4e 43 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 45 6d 61 63 73 20 70 72 6f 63 te.FUNC.in.a.separate.Emacs.proc
15860 65 73 73 2c 20 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 60 28 61 73 79 6e 63 2d 67 ess,.synchronously."...`(async-g
15880 65 74 20 28 61 73 79 6e 63 2d 73 74 61 72 74 20 2c 66 75 6e 63 29 29 29 0a 0a 28 64 65 66 75 6e et.(async-start.,func)))..(defun
158a0 20 61 73 79 6e 63 2d 2d 66 6f 6c 64 2d 6c 65 66 74 20 28 66 6e 20 66 6f 72 6d 73 20 62 69 6e 64 .async--fold-left.(fn.forms.bind
158c0 69 6e 67 73 29 0a 20 20 28 6c 65 74 20 28 28 72 65 73 20 66 6f 72 6d 73 29 29 0a 20 20 20 20 28 ings)...(let.((res.forms)).....(
158e0 64 6f 6c 69 73 74 20 28 62 69 6e 64 69 6e 67 20 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 dolist.(binding.bindings).......
15900 28 73 65 74 71 20 72 65 73 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 72 65 73 0a 20 20 20 20 20 20 (setq.res.(funcall.fn.res.......
15920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6c 69 73 74 70 20 62 69 ...................(if.(listp.bi
15940 6e 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nding)..........................
15960 20 20 20 20 62 69 6e 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....binding.....................
15980 20 20 20 20 20 20 20 28 6c 69 73 74 20 62 69 6e 64 69 6e 67 29 29 29 29 29 0a 20 20 20 20 72 65 .......(list.binding))))).....re
159a0 73 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 61 73 79 6e 63 2d 6c 65 74 20 28 62 69 6e 64 69 6e s))..(defmacro.async-let.(bindin
159c0 67 73 20 26 72 65 73 74 20 66 6f 72 6d 73 29 0a 20 20 22 49 6d 70 6c 65 6d 65 6e 74 73 20 60 6c gs.&rest.forms)..."Implements.`l
159e0 65 74 27 2c 20 62 75 74 20 65 61 63 68 20 62 69 6e 64 69 6e 67 20 69 73 20 65 73 74 61 62 6c 69 et',.but.each.binding.is.establi
15a00 73 68 65 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 46 6f 72 20 65 78 61 6d 70 6c 65 shed.asynchronously..For.example
15a20 3a 0a 0a 20 20 28 61 73 79 6e 63 2d 6c 65 74 20 28 28 78 20 28 66 6f 6f 29 29 0a 20 20 20 20 20 :....(async-let.((x.(foo))......
15a40 20 20 20 20 20 20 20 20 20 28 79 20 28 62 61 72 29 29 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 .........(y.(bar)))......(messag
15a60 65 20 5c 22 25 73 20 25 73 5c 22 20 78 20 79 29 29 0a 0a 20 20 20 20 65 78 70 61 6e 64 73 20 74 e.\"%s.%s\".x.y))......expands.t
15a80 6f 20 3d 3d 3e 0a 0a 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 20 28 66 6f 6f 29 0a 20 20 20 28 o.==>....(async-start.(foo)....(
15aa0 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 20 28 62 61 lambda.(x)......(async-start.(ba
15ac0 72 29 0a 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 79 29 0a 20 20 20 20 20 20 20 20 28 6d 65 r).......(lambda.(y).........(me
15ae0 73 73 61 67 65 20 5c 22 25 73 20 25 73 5c 22 20 78 20 79 29 29 29 29 29 22 0a 20 20 28 64 65 63 ssage.\"%s.%s\".x.y)))))"...(dec
15b00 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 31 29 29 0a 20 20 28 61 73 79 6e 63 2d 2d 66 6f 6c 64 2d lare.(indent.1))...(async--fold-
15b20 6c 65 66 74 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 61 63 63 20 62 69 6e 64 69 6e 67 29 0a 20 20 left....(lambda.(acc.binding)...
15b40 20 20 20 28 6c 65 74 20 28 28 66 75 6e 20 28 70 63 61 73 65 20 28 63 61 64 72 20 62 69 6e 64 69 ...(let.((fun.(pcase.(cadr.bindi
15b60 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 70 72 65 ng)...................((and.(pre
15b80 64 20 66 75 6e 63 74 69 6f 6e 70 29 20 66 29 20 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 d.functionp).f).f)..............
15ba0 20 20 20 20 20 28 66 20 60 28 6c 61 6d 62 64 61 20 28 29 20 2c 66 29 29 29 29 29 0a 20 20 20 20 .....(f.`(lambda.().,f))))).....
15bc0 20 20 20 60 28 61 73 79 6e 63 2d 73 74 61 72 74 20 2c 66 75 6e 0a 20 20 20 20 20 20 20 20 20 20 ...`(async-start.,fun...........
15be0 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 2c 28 63 61 72 20 62 69 6e 64 69 6e ...........(lambda.(,(car.bindin
15c00 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 61 63 63 29 g))........................,acc)
15c20 29 29 29 0a 20 20 20 60 28 70 72 6f 67 6e 20 2c 40 66 6f 72 6d 73 29 0a 20 20 20 28 72 65 76 65 )))....`(progn.,@forms)....(reve
15c40 72 73 65 20 62 69 6e 64 69 6e 67 73 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 61 73 79 6e 63 rse.bindings)))..(provide.'async
15c60 29 0a 0a 3b 3b 3b 20 61 73 79 6e 63 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 )..;;;.async.el.ends.here.......
15c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15e00 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 73 6d 74 70 6d 61 69 6c 2d 61 73 79 6e 63 2e 65 6c 00 00 00 async-1.9.8/smtpmail-async.el...
15e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15e60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
15e80 30 30 30 34 36 36 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 30 34 00 20 30 00 00 00 0004666.00000000000.014604..0...
15ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15f00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
15f20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
15f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
15fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16000 3b 3b 3b 20 73 6d 74 70 6d 61 69 6c 2d 61 73 79 6e 63 2e 65 6c 20 2d 2d 2d 20 53 65 6e 64 20 65 ;;;.smtpmail-async.el.---.Send.e
16020 2d 6d 61 69 6c 20 77 69 74 68 20 73 6d 74 70 6d 61 69 6c 2e 65 6c 20 61 73 79 6e 63 68 72 6f 6e -mail.with.smtpmail.el.asynchron
16040 6f 75 73 6c 79 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d ously.-*-.lexical-binding:.t.-*-
16060 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 32 2d 32 30 32 32 20 46 72 65 ..;;.Copyright.(C).2012-2022.Fre
16080 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 0a 0a 3b 3b 20 e.Software.Foundation,.Inc...;;.
160a0 41 75 74 68 6f 72 3a 20 4a 6f 68 6e 20 57 69 65 67 6c 65 79 20 3c 6a 77 69 65 67 6c 65 79 40 67 Author:.John.Wiegley.<jwiegley@g
160c0 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 31 38 20 4a 75 6e 20 32 30 31 mail.com>.;;.Created:.18.Jun.201
160e0 32 0a 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 65 6d 61 69 6c 20 61 73 79 6e 63 0a 3b 3b 20 58 2..;;.Keywords:.email.async.;;.X
16100 2d 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 -URL:.https://github.com/jwiegle
16120 79 2f 65 6d 61 63 73 2d 61 73 79 6e 63 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 y/emacs-async..;;.This.program.i
16140 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 s.free.software;.you.can.redistr
16160 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 ibute.it.and/or.modify.;;.it.und
16180 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 er.the.terms.of.the.GNU.General.
161a0 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b Public.License.as.published.by.;
161c0 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 ;.the.Free.Software.Foundation,.
161e0 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c either.version.3.of.the.License,
16200 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 .or.;;.(at.your.option).any.late
16220 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 r.version...;;.This.program.is.d
16240 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 istributed.in.the.hope.that.it.w
16260 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e ill.be.useful,.;;.but.WITHOUT.AN
16280 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 Y.WARRANTY;.without.even.the.imp
162a0 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c lied.warranty.of.;;.MERCHANTABIL
162c0 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 ITY.or.FITNESS.FOR.A.PARTICULAR.
162e0 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c PURPOSE...See.the.;;.GNU.General
16300 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 .Public.License.for.more.details
16320 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 ...;;.You.should.have.received.a
16340 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 .copy.of.the.GNU.General.Public.
16360 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 License.;;.along.with.this.progr
16380 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e am...If.not,.see.<https://www.gn
163a0 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0c 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 u.org/licenses/>....;;;.Commenta
163c0 72 79 3a 0a 0a 3b 3b 20 53 65 6e 64 20 65 2d 6d 61 69 6c 20 77 69 74 68 20 73 6d 74 70 6d 61 69 ry:..;;.Send.e-mail.with.smtpmai
163e0 6c 2e 65 6c 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 20 20 54 6f 20 75 73 65 3a 0a 3b 3b l.el.asynchronously...To.use:.;;
16400 0a 3b 3b 20 20 20 28 72 65 71 75 69 72 65 20 27 73 6d 74 70 6d 61 69 6c 2d 61 73 79 6e 63 29 0a .;;...(require.'smtpmail-async).
16420 3b 3b 0a 3b 3b 20 20 20 28 73 65 74 71 20 73 65 6e 64 2d 6d 61 69 6c 2d 66 75 6e 63 74 69 6f 6e ;;.;;...(setq.send-mail-function
16440 20 27 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 0a 3b 3b 20 20 20 20 20 .'async-smtpmail-send-it.;;.....
16460 20 20 20 20 6d 65 73 73 61 67 65 2d 73 65 6e 64 2d 6d 61 69 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 ....message-send-mail-function.'
16480 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 29 0a 3b 3b 0a 3b 3b 20 54 68 async-smtpmail-send-it).;;.;;.Th
164a0 69 73 20 61 73 73 75 6d 65 73 20 79 6f 75 20 61 6c 72 65 61 64 79 20 68 61 76 65 20 73 6d 74 70 is.assumes.you.already.have.smtp
164c0 6d 61 69 6c 2e 65 6c 20 77 6f 72 6b 69 6e 67 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 64 65 mail.el.working...;;;.Code:..(de
164e0 66 67 72 6f 75 70 20 73 6d 74 70 6d 61 69 6c 2d 61 73 79 6e 63 20 6e 69 6c 0a 20 20 22 53 65 6e fgroup.smtpmail-async.nil..."Sen
16500 64 20 65 2d 6d 61 69 6c 20 77 69 74 68 20 73 6d 74 70 6d 61 69 6c 2e 65 6c 20 61 73 79 6e 63 68 d.e-mail.with.smtpmail.el.asynch
16520 72 6f 6e 6f 75 73 6c 79 22 0a 20 20 3a 67 72 6f 75 70 20 27 73 6d 70 74 6d 61 69 6c 29 0a 0a 28 ronously"...:group.'smptmail)..(
16540 72 65 71 75 69 72 65 20 27 61 73 79 6e 63 29 0a 28 72 65 71 75 69 72 65 20 27 73 6d 74 70 6d 61 require.'async).(require.'smtpma
16560 69 6c 29 0a 28 72 65 71 75 69 72 65 20 27 6d 65 73 73 61 67 65 29 0a 0a 28 64 65 66 76 61 72 20 il).(require.'message)..(defvar.
16580 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 62 65 66 6f 72 65 2d 73 65 6e 64 2d 68 6f 6f 6b 20 async-smtpmail-before-send-hook.
165a0 6e 69 6c 0a 20 20 22 48 6f 6f 6b 20 72 75 6e 6e 69 6e 67 20 69 6e 20 74 68 65 20 63 68 69 6c 64 nil..."Hook.running.in.the.child
165c0 20 65 6d 61 63 73 20 69 6e 20 60 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 .emacs.in.`async-smtpmail-send-i
165e0 74 27 2e 0a 49 74 20 69 73 20 63 61 6c 6c 65 64 20 6a 75 73 74 20 62 65 66 6f 72 65 20 63 61 6c t'..It.is.called.just.before.cal
16600 6c 69 6e 67 20 60 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 27 2e 22 29 0a 0a 28 64 65 66 ling.`smtpmail-send-it'.")..(def
16620 75 6e 20 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 20 28 29 0a 20 20 28 un.async-smtpmail-send-it.()...(
16640 6c 65 74 20 28 28 74 6f 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 2d 66 69 65 6c 64 let.((to..........(message-field
16660 2d 76 61 6c 75 65 20 22 54 6f 22 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 66 2d 63 6f 6e 74 65 -value."To")).........(buf-conte
16680 6e 74 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 nt.(buffer-substring-no-properti
166a0 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 2d es.......................(point-
166c0 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 min).(point-max)))).....(message
166e0 20 22 44 65 6c 69 76 65 72 69 6e 67 20 6d 65 73 73 61 67 65 20 74 6f 20 25 73 2e 2e 2e 22 20 74 ."Delivering.message.to.%s...".t
16700 6f 29 0a 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 60 28 6c 61 6d 62 64 o).....(async-start......`(lambd
16720 61 20 28 29 0a 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 73 6d 74 70 6d 61 69 6c 29 a.().........(require.'smtpmail)
16740 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 .........(with-temp-buffer......
16760 20 20 20 20 20 28 69 6e 73 65 72 74 20 2c 62 75 66 2d 63 6f 6e 74 65 6e 74 29 0a 20 20 20 20 20 .....(insert.,buf-content)......
16780 20 20 20 20 20 28 73 65 74 2d 62 75 66 66 65 72 2d 6d 75 6c 74 69 62 79 74 65 20 6e 69 6c 29 0a .....(set-buffer-multibyte.nil).
167a0 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 61 73 73 20 69 6e 20 74 68 65 20 76 61 72 69 61 62 6c ..........;;.Pass.in.the.variabl
167c0 65 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 66 6f 72 20 73 6d 74 70 6d 61 69 6c 0a 20 20 20 20 20 e.environment.for.smtpmail......
167e0 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 0a 20 20 .....,(async-inject-variables...
16800 20 20 20 20 20 20 20 20 20 20 22 5c 5c 60 5c 5c 28 73 6d 74 70 6d 61 69 6c 5c 5c 7c 61 73 79 6e .........."\\`\\(smtpmail\\|asyn
16820 63 2d 73 6d 74 70 6d 61 69 6c 5c 5c 7c 5c 5c 28 75 73 65 72 2d 5c 5c 29 3f 6d 61 69 6c 5c 5c 29 c-smtpmail\\|\\(user-\\)?mail\\)
16840 2d 5c 5c 7c 61 75 74 68 2d 73 6f 75 72 63 65 73 5c 5c 7c 65 70 67 5c 5c 7c 6e 73 6d 22 0a 20 20 -\\|auth-sources\\|epg\\|nsm"...
16860 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 22 5c 5c 60 5c 5c 28 6d 61 69 6c 2d 68 65 61 64 65 72 ..........nil."\\`\\(mail-header
16880 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 5c 5c 7c 73 6d 74 70 6d 61 69 6c 2d 61 64 64 72 -format-function\\|smtpmail-addr
168a0 65 73 73 2d 62 75 66 66 65 72 5c 5c 7c 6d 61 69 6c 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 ess-buffer\\|mail-mode-abbrev-ta
168c0 62 6c 65 5c 5c 29 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 61 ble\\)")...........(run-hooks.'a
168e0 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 62 65 66 6f 72 65 2d 73 65 6e 64 2d 68 6f 6f 6b 29 0a sync-smtpmail-before-send-hook).
16900 20 20 20 20 20 20 20 20 20 20 28 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 29 29 29 0a 20 ..........(smtpmail-send-it)))..
16920 20 20 20 20 28 6c 61 6d 62 64 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 67 6e 6f 72 65 29 0a ....(lambda.(&optional._ignore).
16940 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 65 6c 69 76 65 72 69 6e 67 20 6d 65 73 73 .......(message."Delivering.mess
16960 61 67 65 20 74 6f 20 25 73 2e 2e 2e 64 6f 6e 65 22 20 74 6f 29 29 29 29 29 0a 0a 28 70 72 6f 76 age.to.%s...done".to)))))..(prov
16980 69 64 65 20 27 73 6d 74 70 6d 61 69 6c 2d 61 73 79 6e 63 29 0a 0a 3b 3b 3b 20 73 6d 74 70 6d 61 ide.'smtpmail-async)..;;;.smtpma
169a0 69 6c 2d 61 73 79 6e 63 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 il-async.el.ends.here...........
169c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
169e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16a00 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 async-1.9.8/async-pkg.el........
16a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16a60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
16a80 30 30 30 30 36 30 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 35 32 35 00 20 30 00 00 00 0000606.00000000000.013525..0...
16aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16b00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
16b20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
16b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16c00 3b 3b 20 47 65 6e 65 72 61 74 65 64 20 70 61 63 6b 61 67 65 20 64 65 73 63 72 69 70 74 69 6f 6e ;;.Generated.package.description
16c20 20 66 72 6f 6d 20 61 73 79 6e 63 2e 65 6c 20 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 .from.async.el..-*-.no-byte-comp
16c40 69 6c 65 3a 20 74 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 61 73 79 6e ile:.t.-*-.(define-package."asyn
16c60 63 22 20 22 31 2e 39 2e 38 22 20 22 41 73 79 6e 63 68 72 6f 6e 6f 75 73 20 70 72 6f 63 65 73 73 c"."1.9.8"."Asynchronous.process
16c80 69 6e 67 20 69 6e 20 45 6d 61 63 73 22 20 27 28 28 65 6d 61 63 73 20 22 32 34 2e 34 22 29 29 20 ing.in.Emacs".'((emacs."24.4")).
16ca0 3a 63 6f 6d 6d 69 74 20 22 30 30 65 30 37 65 30 36 30 32 31 38 66 62 64 31 65 31 36 66 61 61 66 :commit."00e07e060218fbd1e16faaf
16cc0 31 30 31 31 36 63 30 33 62 31 32 65 36 32 35 38 30 22 20 3a 61 75 74 68 6f 72 73 20 27 28 28 22 10116c03b12e62580".:authors.'(("
16ce0 4a 6f 68 6e 20 57 69 65 67 6c 65 79 22 20 2e 20 22 6a 77 69 65 67 6c 65 79 40 67 6d 61 69 6c 2e John.Wiegley"..."jwiegley@gmail.
16d00 63 6f 6d 22 29 29 20 3a 6d 61 69 6e 74 61 69 6e 65 72 20 27 28 22 54 68 69 65 72 72 79 20 56 6f com")).:maintainer.'("Thierry.Vo
16d20 6c 70 69 61 74 74 6f 22 20 2e 20 22 74 68 69 65 76 6f 6c 40 70 6f 73 74 65 6f 2e 6e 65 74 22 29 lpiatto"..."thievol@posteo.net")
16d40 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22 61 73 79 6e 63 22 29 20 3a 75 72 6c 20 22 68 74 74 70 .:keywords.'("async").:url."http
16d60 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 65 6d 61 63 73 2d 61 73 s://github.com/jwiegley/emacs-as
16d80 79 6e 63 22 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ync")...........................
16da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16e00 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 00 00 00 00 00 00 async-1.9.8/.dir-locals.el......
16e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16e60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
16e80 30 30 30 30 36 36 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 37 34 34 00 20 30 00 00 00 0000664.00000000000.013744..0...
16ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16f00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
16f20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
16f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17000 3b 3b 3b 20 44 69 72 65 63 74 6f 72 79 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 0a 3b 3b ;;;.Directory.Local.Variables.;;
17020 3b 20 46 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 73 65 65 20 28 69 6e 66 6f ;.For.more.information.see.(info
17040 20 22 28 65 6d 61 63 73 29 20 44 69 72 65 63 74 6f 72 79 20 56 61 72 69 61 62 6c 65 73 22 29 0a ."(emacs).Directory.Variables").
17060 0a 28 28 6e 69 6c 20 2e 20 28 28 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 62 75 67 2d 72 65 67 .((nil...((bug-reference-bug-reg
17080 65 78 70 20 2e 20 22 5c 5c 28 5c 5c 62 5c 5c 28 3f 3a 5b 49 69 5d 73 73 75 65 20 3f 23 3f 5c 5c exp..."\\(\\b\\(?:[Ii]ssue.?#?\\
170a0 7c 5b 42 62 5d 75 67 20 3f 23 3f 5c 5c 7c 5b 50 70 5d 61 74 63 68 20 3f 23 5c 5c 7c 52 46 45 20 |[Bb]ug.?#?\\|[Pp]atch.?#\\|RFE.
170c0 3f 23 5c 5c 7c 50 52 20 5b 61 2d 7a 2b 2d 5d 2b 2f 5c 5c 29 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 28 ?#\\|PR.[a-z+-]+/\\)\\([0-9]+\\(
170e0 3f 3a 23 5b 30 2d 39 5d 2b 5c 5c 29 3f 5c 5c 29 5c 5c 29 22 29 0a 20 20 20 20 20 20 20 20 20 28 ?:#[0-9]+\\)?\\)\\)")..........(
17100 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 2e 20 22 68 74 74 70 bug-reference-url-format..."http
17120 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 65 6d 61 63 73 2d 61 73 s://github.com/jwiegley/emacs-as
17140 79 6e 63 2f 69 73 73 75 65 73 2f 25 73 22 29 29 29 0a 20 28 65 6d 61 63 73 2d 6c 69 73 70 2d 6d ync/issues/%s")))..(emacs-lisp-m
17160 6f 64 65 20 2e 20 28 28 6d 6f 64 65 20 2e 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 70 72 6f ode...((mode...bug-reference-pro
17180 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 64 65 6e 74 2d g)......................(indent-
171a0 74 61 62 73 2d 6d 6f 64 65 20 2e 20 6e 69 6c 29 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 tabs-mode...nil)))).............
171c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
171e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17200 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 65 6c 70 61 69 67 6e 6f 72 65 00 00 00 00 00 00 00 00 00 async-1.9.8/.elpaignore.........
17220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
17280 30 30 30 30 30 31 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 34 32 32 00 20 30 00 00 00 0000010.00000000000.013422..0...
172a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
172c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
172e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
17320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
17340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
173a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
173c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
173e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17400 43 4f 50 59 49 4e 47 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 COPYING.........................
17420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
174a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
174c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
174e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
175a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
175c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
175e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
176a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
176c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
176e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
177a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
177c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
177e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
178a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
178c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
178e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
179a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
179c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
179e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
180a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
180c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
180e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
181a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
181c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
181e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
182a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
182c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
182e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
183a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
183c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
183e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
184a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
184c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
184e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
185a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
185c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
185e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
186a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
186c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
186e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
187a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
187c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
187e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
188a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
188c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
188e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
189a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
189c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
189e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
18fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................