summaryrefslogtreecommitdiff
path: root/.localrepo/async-1.9.9.tar
blob: 8c213413e625f96de6bcef75f90a7038927df126 (plain)
ofshex dumpascii
0000 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.9/....................
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 36 00 20 35 00 00 00 0000000.00000000000.011306..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 39 2f 2e 67 69 74 68 75 62 2f 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.9/.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 36 00 20 35 00 00 00 0000000.00000000000.012646..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 39 2f 2e 67 69 74 68 75 62 2f 77 6f 72 6b 66 6c 6f 77 73 2f 00 00 async-1.9.9/.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 33 00 20 35 00 00 00 0000000.00000000000.014703..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 39 2f 2e 67 69 74 68 75 62 2f 77 6f 72 6b 66 6c 6f 77 73 2f 74 65 async-1.9.9/.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 33 35 34 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 34 31 33 00 20 30 00 00 00 0003544.00000000000.016413..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 27 32 39 2e 33 27 0a 20 20 20 20 -.'28.2'...........-.'29.3'.....
0a00 20 20 20 20 20 20 2d 20 73 6e 61 70 73 68 6f 74 0a 20 20 20 20 20 20 20 20 23 20 53 6b 69 70 20 ......-.snapshot.........#.Skip.
0a20 6f 6c 64 65 72 20 65 6d 61 63 73 20 76 65 72 73 69 6f 6e 73 20 74 68 61 74 20 61 72 65 20 6e 6f older.emacs.versions.that.are.no
0a40 74 20 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20 41 52 4d 20 4d 61 63 4f 53 0a 20 20 20 20 20 20 20 t.available.on.ARM.MacOS........
0a60 20 65 78 63 6c 75 64 65 3a 0a 20 20 20 20 20 20 20 20 20 20 2d 20 6f 73 3a 20 6d 61 63 6f 73 2d .exclude:...........-.os:.macos-
0a80 6c 61 74 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e latest.............emacs-version
0aa0 3a 20 27 32 36 2e 31 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 6f 73 3a 20 6d 61 63 6f 73 2d 6c :.'26.1'...........-.os:.macos-l
0ac0 61 74 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 3a atest.............emacs-version:
0ae0 20 27 32 36 2e 32 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 6f 73 3a 20 6d 61 63 6f 73 2d 6c 61 .'26.2'...........-.os:.macos-la
0b00 74 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 3a 20 test.............emacs-version:.
0b20 27 32 36 2e 33 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 6f 73 3a 20 6d 61 63 6f 73 2d 6c 61 74 '26.3'...........-.os:.macos-lat
0b40 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 3a 20 27 est.............emacs-version:.'
0b60 32 37 2e 31 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 6f 73 3a 20 6d 61 63 6f 73 2d 6c 61 74 65 27.1'...........-.os:.macos-late
0b80 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 3a 20 27 32 st.............emacs-version:.'2
0ba0 37 2e 32 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 6f 73 3a 20 6d 61 63 6f 73 2d 6c 61 74 65 73 7.2'...........-.os:.macos-lates
0bc0 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 3a 20 27 32 38 t.............emacs-version:.'28
0be0 2e 31 27 0a 0a 20 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 .1'......steps:.....-.uses:.acti
0c00 6f 6e 73 2f 63 68 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 ons/checkout@v3......-.uses:.jcs
0c20 30 39 30 32 31 38 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 090218/setup-emacs@master.......
0c40 77 69 74 68 3a 0a 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 with:.........version:.${{.matri
0c60 78 2e 65 6d 61 63 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 x.emacs-version.}}......-.uses:.
0c80 65 6d 61 63 73 2d 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 emacs-eask/setup-eask@master....
0ca0 20 20 20 77 69 74 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 ...with:.........version:.'snaps
0cc0 68 6f 74 27 0a 0a 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 hot'......-.name:.Workaround.for
0ce0 20 45 6d 61 63 73 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 .Emacs.27.2's.Windows.build.from
0d00 20 47 4e 55 20 46 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 .GNU.FTP.......if:.${{.runner.os
0d20 20 3d 3d 20 27 57 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 .==.'Windows'.&&.contains(fromJs
0d40 6f 6e 28 27 5b 22 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 on('["26.1",."26.2",."26.3",."27
0d60 2e 31 22 2c 20 22 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 .1",."27.2"]'),.matrix.emacs-ver
0d80 73 69 6f 6e 29 20 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 sion).}}.......run:.|.........gc
0da0 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 5c 44 41 43 39 30 32 i.cert:\LocalMachine\Root\DAC902
0dc0 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 41 36 41 44 37 37 43 4F54D8F6DF94935FB1732638CA6AD77C
0de0 31 33 0a 20 20 20 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 13.........gci.cert:\LocalMachin
0e00 65 5c 52 6f 6f 74 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 e\Root\DAC9024F54D8F6DF94935FB17
0e20 33 32 36 33 38 43 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 32638CA6AD77C13.|.Remove-Item...
0e40 20 20 20 2d 20 6e 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 ...-.name:.Install.dependencies.
0e60 20 20 20 20 20 20 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 ......run:.|.........eask.instal
0e80 6c 2d 64 65 70 73 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 l-deps.--dev......-.name:.Run.bu
0ea0 74 74 65 72 63 75 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 ttercup.......timeout-minutes:.1
0ec0 0a 20 20 20 20 20 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 .......run:.|.........eask.test.
0ee0 62 75 74 74 65 72 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 buttercup......-.name:.Run.tests
0f00 0a 20 20 20 20 20 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 .......run:.|.........eask.clean
0f20 20 61 6c 6c 0a 20 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 .all.........eask.package.......
0f40 20 20 65 61 73 6b 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 ..eask.install.........eask.comp
0f60 69 6c 65 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 00 ile.............................
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 64 69 72 65 64 2d 61 73 79 6e 63 2e 65 6c 00 00 00 00 00 00 async-1.9.9/dired-async.el......
1020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1060 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
1080 30 30 35 31 34 36 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 30 34 34 00 20 30 00 00 00 0051464.00000000000.014044..0...
10a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
10e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1100 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...................
1120 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...................
1140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1200 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
1220 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
1240 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
1260 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
1280 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
12a0 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>.;;.......
12c0 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
12e0 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
1300 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
1320 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..;
1340 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;
1360 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.
1380 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.
13a0 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
13c0 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
13e0 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
1400 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.
1420 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
1440 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
1460 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,.;
1480 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
14a0 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
14c0 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
14e0 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
1500 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.
1520 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
1540 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
1560 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
1580 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
15a0 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/>
15c0 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
15e0 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
1600 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
1620 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
1640 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
1660 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.
1680 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
16a0 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
16c0 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:.
16e0 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)..;;
1700 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
1720 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.
1740 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).
1760 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
1780 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
17a0 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.
17c0 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
17e0 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."
1800 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
1820 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..
1840 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
1860 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\\)-
1880 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
18a0 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
18c0 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
18e0 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
1900 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.
1920 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
1940 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
1960 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'.".
1980 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.
19a0 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
19c0 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
19e0 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
1a00 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).
1a20 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
1a40 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....................
1a60 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
1a80 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)............
1aa0 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
1ac0 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
1ae0 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
1b00 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
1b20 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
1b40 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
1b60 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
1b80 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
1ba0 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
1bc0 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."...:
1be0 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
1c00 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
1c20 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
1c40 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
1c60 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
1c80 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
1ca0 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d ype.'integer)..(defcustom.dired-
1cc0 61 73 79 6e 63 2d 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 async-large-file-warning-thresho
1ce0 6c 64 20 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 0a ld.large-file-warning-threshold.
1d00 20 20 22 53 61 6d 65 20 61 73 20 60 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 .."Same.as.`large-file-warning-t
1d20 68 72 65 73 68 6f 6c 64 27 20 62 75 74 20 66 6f 72 20 64 69 72 65 64 2d 61 73 79 6e 63 2e 22 0a hreshold'.but.for.dired-async.".
1d40 20 20 3a 74 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 ..:type.'integer)..(defface.dire
1d60 64 2d 61 73 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 d-async-message.....'((t.(:foreg
1d80 72 6f 75 6e 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 round."yellow")))..."Face.used.f
1da0 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
1dc0 65 20 64 69 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 e.dired-async-failures.....'((t.
1de0 28 3a 66 6f 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 (:foreground."red")))..."Face.us
1e00 65 64 20 66 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 ed.for.mode-line.message.")..(de
1e20 66 66 61 63 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 fface.dired-async-mode-message..
1e40 20 20 20 27 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 ...'((t.(:foreground."Gold")))..
1e60 20 22 46 61 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 ."Face.used.for.`dired-async--mo
1e80 64 65 6c 69 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 deline-mode'.lighter.")..(define
1ea0 2d 6d 69 6e 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 -minor-mode.dired-async--modelin
1ec0 65 2d 6d 6f 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 e-mode....."Notify.mode-line.tha
1ee0 74 20 61 6e 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 t.an.async.process.run."...:glob
1f00 61 6c 20 74 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 al.t...:lighter.(:eval.(properti
1f20 7a 65 20 28 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 ze.(format.".[%s.Async.job(s).ru
1f40 6e 6e 69 6e 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 nning]".........................
1f60 20 20 20 20 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 ..............(length.(dired-asy
1f80 6e 63 2d 70 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 nc-processes))).................
1fa0 20 20 20 20 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 ..............'face.'dired-async
1fc0 2d 6d 6f 64 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 -mode-message))...(unless.dired-
1fe0 61 73 79 6e 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 async--modeline-mode.....(let.((
2000 76 69 73 69 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 visible-bell.t)).(ding))))..(def
2020 75 6e 20 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 un.dired-async-mode-line-message
2040 20 28 74 65 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 .(text.face.&rest.args)..."Notif
2060 79 20 65 6e 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 y.end.of.operation.in.`mode-line
2080 27 2e 22 0a 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 '."...(message.nil)...(let.((mod
20a0 65 2d 6c 69 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 e-line-format.(concat...........
20c0 20 20 20 20 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 .................".".(propertize
20e0 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 20 ................................
2100 20 28 69 66 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 .(if.args.......................
2120 20 20 20 20 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 ..............(apply.#'format.te
2140 78 74 20 61 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 xt.args)........................
2160 20 20 20 20 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 ...........text)................
2180 20 20 20 20 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 .................'face.face)))).
21a0 20 20 20 20 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 ....(force-mode-line-update)....
21c0 20 28 73 69 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 .(sit-for.3).....(force-mode-lin
21e0 65 2d 75 70 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 e-update)))..(defun.dired-async-
2200 70 72 6f 63 65 73 73 65 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 72 6f 70 6e 61 6d 65 29 0a 20 processes.(&optional.propname)..
2220 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 70 20 69 6e 20 28 70 72 6f 63 65 73 73 2d 6c 69 73 74 .(cl-loop.for.p.in.(process-list
2240 29 0a 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 70 72 6f 63 65 73 73 2d 67 65 74 20 70 )............when.(process-get.p
2260 20 28 6f 72 20 70 72 6f 70 6e 61 6d 65 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f 63 65 .(or.propname.'dired-async-proce
2280 73 73 29 29 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 ss))............collect.p))..(de
22a0 66 75 6e 20 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 fun.dired-async-kill-process.().
22c0 20 20 28 69 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 ..(interactive)...(let*.((proces
22e0 73 65 73 20 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 ses.(dired-async-processes))....
2300 20 20 20 20 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 ......(proc.(car.(last.processes
2320 29 29 29 29 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 )))).....(and.proc.(delete-proce
2340 73 73 20 70 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 ss.proc)).....(unless.(>.(length
2360 20 70 72 6f 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 .processes).1).......(dired-asyn
2380 63 2d 2d 6d 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 c--modeline-mode.-1))))..(defun.
23a0 64 69 72 65 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 dired-async-after-file-create.(t
23c0 6f 74 61 6c 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 otal.operation.failures.skipped)
23e0 0a 20 20 22 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 ..."Callback.function.used.for.o
2400 70 65 72 61 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 peration.handled.by.`dired-creat
2420 65 2d 66 69 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 e-file'."...(unless.(dired-async
2440 2d 70 72 6f 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 -processes).....;;.Turn.off.mode
2460 2d 6c 69 6e 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 -line.notification.....;;.only.w
2480 68 65 6e 20 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 hen.last.process.end......(dired
24a0 2d 61 73 79 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 -async--modeline-mode.-1))...(wh
24c0 65 6e 20 6f 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 en.operation.....(if.(file-exist
24e0 73 2d 70 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 20 20 20 20 s-p.dired-async-log-file).......
2500 20 20 28 70 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 ..(progn...........(pop-to-buffe
2520 72 20 28 67 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 r.(get-buffer-create.dired-log-b
2540 75 66 66 65 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 uffer))...........(goto-char.(po
2560 69 6e 74 2d 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 int-max))...........(setq.inhibi
2580 74 2d 72 65 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 t-read-only.t)...........(insert
25a0 20 22 45 72 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 ."Error:.")...........(insert-fi
25c0 6c 65 2d 63 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 le-contents.dired-async-log-file
25e0 29 0a 20 20 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 )...........(special-mode)......
2600 20 20 20 20 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 .....(shrink-window-if-larger-th
2620 61 6e 2d 62 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 an-buffer)...........(delete-fil
2640 65 20 64 69 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 e.dired-async-log-file)).......(
2660 72 75 6e 2d 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 run-with-timer........0.1.nil...
2680 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 3b 3b 20 46 69 72 73 .....(lambda.()..........;;.Firs
26a0 74 20 73 65 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 t.send.error.messages...........
26c0 28 63 6f 6e 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 (cond.(failures.................
26e0 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 65 2d 66 75 6e (funcall.dired-async-message-fun
2700 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 20 20 20 20 20 20 22 ction.........................."
2720 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 65 25 73 20 2d 2d %s.failed.for.%d.of.%d.file%s.--
2740 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 20 20 20 20 20 20 .See.*Dired.log*.buffer"........
2760 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 79 6e 63 2d 66 ..................'dired-async-f
2780 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 20 20 20 20 20 ailures.........................
27a0 20 28 63 61 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 .(car.operation).(length.failure
27c0 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 74 6f 74 61 s)..........................tota
27e0 6c 20 28 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 l.(dired-plural-s.total)))......
2800 20 20 20 20 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 ..........(skipped..............
2820 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 65 2d ...(funcall.dired-async-message-
2840 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 20 20 20 20 function........................
2860 20 20 22 25 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 .."%s:.%d.of.%d.file%s.skipped.-
2880 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 20 20 20 20 20 -.See.*Dired.log*.buffer".......
28a0 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 79 6e 63 2d ...................'dired-async-
28c0 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 20 20 20 20 failures........................
28e0 20 20 28 63 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 ..(car.operation).(length.skippe
2900 64 29 20 74 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 d).total........................
2920 20 20 28 64 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 ..(dired-plural-s.total)))).....
2940 20 20 20 20 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 .....(when.dired-buffers........
2960 20 20 20 20 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 ....(cl-loop.for.(_f...b).in.dir
2980 65 64 2d 62 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 ed-buffers.....................w
29a0 68 65 6e 20 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 hen.(buffer-live-p.b)...........
29c0 20 20 20 20 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 ..........do.(with-current-buffe
29e0 72 20 62 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 77 68 r.b..........................(wh
2a00 65 6e 20 28 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 en.(and.(not.(file-remote-p.defa
2a20 75 6c 74 2d 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 ult-directory.nil.t))...........
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 28 66 69 6c 65 2d ..........................(file-
2a60 65 78 69 73 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 exists-p.default-directory))....
2a80 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 72 65 76 65 72 74 2d ........................(revert-
2aa0 62 75 66 66 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 buffer.nil.t)))))..........;;.Fi
2ac0 6e 61 6c 6c 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 nally.send.the.success.message..
2ae0 20 20 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 .........(funcall.dired-async-me
2b00 73 73 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 ssage-function..................
2b20 20 22 41 73 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 ."Asynchronous.%s.of.%s.on.%s.fi
2b40 6c 65 25 73 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 le%s.done"...................'di
2b60 72 65 64 2d 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 red-async-message...............
2b80 20 20 20 20 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 ....(car.operation).(cadr.operat
2ba0 69 6f 6e 29 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 ion)...................total.(di
2bc0 72 65 64 2d 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 red-plural-s.total)))))))..(defu
2be0 6e 20 64 69 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 n.dired-async-maybe-kill-ftp.().
2c00 20 20 22 52 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 .."Return.a.form.to.kill.ftp.pro
2c20 63 65 73 73 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 cess.in.child.emacs."...(quote..
2c40 20 20 28 70 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 ..(progn......(require.'cl-lib).
2c60 20 20 20 20 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 .....(let.((buf.(cl-loop.for.b.i
2c80 6e 20 28 62 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 n.(buffer-list).................
2ca0 20 20 20 20 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 .........thereis.(and.(string-ma
2cc0 74 63 68 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 tch.............................
2ce0 20 20 20 20 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 ..........."\\`\\*ftp.*"........
2d00 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 ................................
2d20 28 62 75 66 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 (buffer-name.b)).b))))........(w
2d40 68 65 6e 20 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 hen.buf.(kill-buffer.buf))))))..
2d60 28 64 65 66 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 (defsubst.dired-async--directory
2d80 2d 70 20 28 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 -p.(attributes)..."Return.non-ni
2da0 6c 20 69 66 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 l.if.ATTRIBUTES.is.for.a.directo
2dc0 72 79 2e 0a 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 ry..See.`file-attributes'."...;;
2de0 20 43 61 6e 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 .Can.also.be.a.string.for.symlin
2e00 6b 73 2c 20 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 ks,.so.check.for.t.explicitly...
2e20 20 28 65 71 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 .(eq.(file-attribute-type.attrib
2e40 75 74 65 73 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 utes).t))..(defsubst.dired-async
2e60 2d 2d 73 61 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 --same-device-p.(f1.f2)..."Retur
2e80 6e 20 6e 6f 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 n.non-nil.if.F1.and.F2.have.the.
2ea0 73 61 6d 65 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 same.device.number."...;;.file-a
2ec0 74 74 72 69 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 ttribute-device-number.may.be.a.
2ee0 63 6f 6e 73 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 cons.cell,.so.use.equal.for...;;
2f00 20 74 65 73 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 .testing.(See.Emacs.bug/58446)..
2f20 20 20 28 65 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 ..(equal.(file-attribute-device-
2f40 6e 75 6d 62 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 number.(file-attributes.f1))....
2f60 20 20 20 20 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 ......(file-attribute-device-num
2f80 62 65 72 20 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 ber.(file-attributes.f2))))..(de
2fa0 66 75 6e 20 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 fun.dired-async--small-file-p.(f
2fc0 69 6c 65 29 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 ile)..."Return.non-nil.if.FILE.i
2fe0 73 20 63 6f 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 s.considered.small...File.is.con
3000 73 69 64 65 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 sidered.small.if.it.size.is.smal
3020 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 65 ler.than.`dired-async-small-file
3040 2d 6d 61 78 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 -max'."...(let.((a.(file-attribu
3060 74 65 73 20 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 tes.file))).....;;.Directories.a
3080 72 65 20 61 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 re.always.large.since.we.can't.e
30a0 61 73 69 6c 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 asily.figure.out.....;;.their.to
30c0 74 61 6c 20 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 tal.size......(and.(not.(dired-a
30e0 73 79 6e 63 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 sync--directory-p.a))..........(
3100 3c 20 28 66 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 <.(file-attribute-size.a).dired-
3120 61 73 79 6e 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 async-small-file-max))))..(defun
3140 20 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 28 66 69 6c 65 .dired-async--skip-async-p.(file
3160 2d 63 72 65 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 -creator.file.name-constructor).
3180 20 20 22 52 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 .."Return.non-nil.if.we.should.s
31a0 6b 69 70 20 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 kip.async.for.FILE..See.`dired-c
31c0 72 65 61 74 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 reate-files'.for.FILE-CREATOR.an
31e0 64 20 4e 41 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 d.NAME-CONSTRUCTOR."...;;.Skip.a
3200 73 79 6e 63 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 sync.for.small.files....(or.(dir
3220 65 64 2d 61 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 ed-async--small-file-p.file)....
3240 20 20 20 3b 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 ...;;.Also.skip.async.for.same.d
3260 65 76 69 63 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 evice.renames........(and.(eq.fi
3280 6c 65 2d 63 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 le-creator.'dired-rename-file)..
32a0 20 20 20 20 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 ..........(let.((new.(funcall.na
32c0 6d 65 2d 63 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 me-constructor.file)))..........
32e0 20 20 20 20 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 ....(dired-async--same-device-p.
3300 66 69 6c 65 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 file.(file-name-directory.new)))
3320 29 29 29 0a 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 )))..(defun.dired-async--smart-c
3340 72 65 61 74 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 reate-files.(old-func.file-creat
3360 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 20 20 20 20 or..............................
3380 20 20 20 20 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 ...........operation.fn-list.nam
33a0 65 2d 63 6f 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 e-constructor...................
33c0 20 20 20 20 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 ......................&optional.
33e0 6d 61 72 6b 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 marker-char)..."Around.advice.fo
3400 72 20 60 64 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 r.`dired-create-files'..Uses.asy
3420 6e 63 20 6c 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 nc.like.`dired-async-create-file
3440 73 27 20 62 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 s'.but.skips.certain.fast.cases.
3460 69 66 20 60 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 if.`dired-async-skip-fast'.is.no
3480 6e 2d 6e 69 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 n-nil."...(let.(async-list.quick
34a0 2d 6c 69 73 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 -list).....(if.(or.(eq.file-crea
34c0 74 6f 72 20 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 tor.'backup-file).............(n
34e0 75 6c 6c 20 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 ull.dired-async-skip-fast)).....
3500 20 20 20 20 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 ....(setq.async-list.fn-list)...
3520 20 20 20 20 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 ....(dolist.(old.fn-list).......
3540 20 20 28 69 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 ..(if.(dired-async--skip-async-p
3560 20 66 69 6c 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 .file-creator.old.name-construct
3580 6f 72 29 0a 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 or).............(push.old.quick-
35a0 6c 69 73 74 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 list)...........(push.old.async-
35c0 6c 69 73 74 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 list)))).....(when.async-list...
35e0 20 20 20 20 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 ....(dired-async-create-files...
3600 20 20 20 20 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 .....file-creator.operation.(nre
3620 76 65 72 73 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 verse.async-list)........name-co
3640 6e 73 74 72 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 nstructor.marker-char)).....(whe
3660 6e 20 71 75 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 n.quick-list.......(funcall.old-
3680 66 75 6e 63 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 func.file-creator.operation.....
36a0 20 20 20 20 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 ...........(nreverse.quick-list)
36c0 20 6e 61 6d 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 .name-constructor.marker-char)))
36e0 29 0a 0a 28 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 )..(defun.dired-async--abort-if-
3700 66 69 6c 65 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 file-too-large.(size.op-type.fil
3720 65 6e 61 6d 65 29 0a 20 20 22 57 61 72 6e 20 77 68 65 6e 20 46 49 4c 45 4e 41 4d 45 20 6c 61 72 ename)..."Warn.when.FILENAME.lar
3740 67 65 72 20 74 68 61 6e 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 6c 61 72 67 65 2d 66 69 6c 65 ger.than.`dired-async-large-file
3760 2d 77 61 72 6e 69 6e 67 2d 74 68 72 65 73 68 6f 6c 64 27 2e 0a 53 61 6d 65 20 61 73 20 60 61 62 -warning-threshold'..Same.as.`ab
3780 6f 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 ort-if-file-too-large'.but.witho
37a0 75 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 64 69 72 ut.user-error."...(when.(and.dir
37c0 65 64 2d 61 73 79 6e 63 2d 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 68 72 65 ed-async-large-file-warning-thre
37e0 73 68 6f 6c 64 20 73 69 7a 65 0a 09 20 20 20 20 20 28 3e 20 73 69 7a 65 20 64 69 72 65 64 2d 61 shold.size.......(>.size.dired-a
3800 73 79 6e 63 2d 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 sync-large-file-warning-threshol
3820 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 61 62 6f 75 74 2d 6c d)).....(files--ask-user-about-l
3840 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 70 65 20 66 69 6c 65 arge-file......size.op-type.file
3860 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 77 72 69 74 65 2d 71 name.nil)))..(defvar.overwrite-q
3880 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 63 72 65 61 74 65 2d uery).(defun.dired-async-create-
38a0 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 74 69 6f 6e 20 66 6e files.(file-creator.operation.fn
38c0 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 20 20 20 20 20 20 20 -list.name-constructor..........
38e0 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 ................................
3900 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 61 72 29 0a 20 20 22 .....&optional._marker-char)..."
3920 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 65 73 27 20 62 75 74 Same.as.`dired-create-files'.but
3940 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 64 2d 63 72 65 61 74 .asynchronous...See.`dired-creat
3960 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 20 6f 66 20 61 72 67 e-files'.for.the.behavior.of.arg
3980 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 65 2d 71 75 65 72 79 uments."...(setq.overwrite-query
39a0 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 67 74 68 20 66 6e 2d .nil)...(let.((total.(length.fn-
39c0 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 73 79 6e 63 2d 66 6e list)).........failures.async-fn
39e0 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 20 20 20 20 20 20 61 -list.skipped.callback.........a
3a00 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 64 69 72 29 0a 20 20 sync-quiet-switch.create-dir)...
3a20 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 20 28 66 72 6f 6d 20 ..(let.(to).......(dolist.(from.
3a40 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 20 28 66 75 6e 63 61 fn-list).........(setq.to.(funca
3a60 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 29 0a 20 20 20 20 20 ll.name-constructor.from))......
3a80 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 6d 29 0a 20 20 20 20 ...(if.(and.(equal.to.from).....
3aa0 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 6c 65 2d 63 72 65 61 .............(null.(eq.file-crea
3ac0 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 20 20 20 20 20 20 20 tor.'backup-file))).............
3ae0 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 71 20 74 6f 20 6e 69 (progn...............(setq.to.ni
3b00 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 6f 67 20 22 43 61 6e l)...............(dired-log."Can
3b20 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 22 0a 20 20 20 20 20 not.%s.to.same.file:.%s\n"......
3b40 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 63 61 73 65 20 6f 70 ....................(downcase.op
3b60 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 28 69 66 20 28 6e 6f eration).from))).........(if.(no
3b80 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 6b 69 70 70 65 64 20 t.to).............(setq.skipped.
3ba0 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 65 20 66 72 6f 6d 29 (cons.(dired-make-relative.from)
3bc0 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 2a 20 28 28 6f 76 65 .skipped))...........(let*.((ove
3be0 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 65 2d 63 72 65 61 74 rwrite.(and.(null.(eq.file-creat
3c00 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 20 20 20 20 20 20 20 or.'backup-file))...............
3c20 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 74 73 2d ...................(file-exists-
3c40 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 28 64 69 72 65 64 2d p.to)))..................(dired-
3c60 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 20 64 69 72 65 64 2d overwrite-confirmed.;.for.dired-
3c80 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 20 20 20 20 20 20 20 handle-overwrite................
3ca0 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 20 20 20 20 20 20 20 ...(and.overwrite...............
3cc0 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 20 60 28 66 6f 72 6d .........(let.((help-form.`(form
3ce0 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 6f 76 65 72 77 72 69 at."\.Type.SPC.or.`y'.to.overwri
3d00 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 74 6f 20 73 6b 69 70 te.file.`%s',.DEL.or.`n'.to.skip
3d20 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 6f 74 20 6f 76 65 72 .to.next,.ESC.or.`q'.to.not.over
3d40 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 67 20 66 69 6c 65 73 write.any.of.the.remaining.files
3d60 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 6d 61 69 6e 69 6e 67 ,.`!'.to.overwrite.all.remaining
3d80 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 69 6f 6e 73 2e 22 20 .files.with.no.more.questions.".
3da0 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 20 20 20 20 20 20 20 ,to)))..........................
3dc0 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 75 65 72 79 20 22 4f (dired-query.'overwrite-query."O
3de0 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 20 20 20 20 20 20 20 verwrite.`%s'?".to))))).........
3e00 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 63 6f 70 79 2d 66 69 ....;;.Handle.the.`dired-copy-fi
3e20 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 79 0a 20 20 20 20 20 le'.file-creator.specially......
3e40 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 64 69 72 65 63 74 6f .......;;.When.copying.a.directo
3e60 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 72 0a 20 20 20 20 20 ry.to.another.directory.or......
3e80 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 65 6c 66 20 6f 72 20 .......;;.possibly.to.itself.or.
3ea0 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 2e 0a 20 20 20 20 20 one.of.its.subdirectories.......
3ec0 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 20 22 7e 2f 74 65 73 .......;;.e.g."~/foo/".=>."~/tes
3ee0 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 66 6f 6f 2f 22 20 3d t/".............;;.or."~/foo/".=
3f00 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 6f 72 20 22 7e 2f 66 >"~/foo/".............;;.or."~/f
3f20 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 20 20 20 20 20 20 20 oo/.=>.~/foo/bar/").............
3f40 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 2d 63 6f 6e 73 74 72 ;;.In.this.case.the.'name-constr
3f60 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 6e 61 74 69 6f 6e 0a uctor'.have.set.the.destination.
3f80 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 65 73 74 2f 66 6f 6f ............;;.TO.to."~/test/foo
3fa0 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 20 62 65 68 61 76 69 ".because.the.old.emacs23.behavi
3fc0 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 79 2d 64 69 72 65 63 or.............;;.of.`copy-direc
3fe0 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 68 65 20 73 75 62 64 tory'.was.to.not.create.the.subd
4000 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 6e 64 20 69 6e 73 74 irectory.............;;.and.inst
4020 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 20 20 20 20 20 20 20 ead.copy.the.contents...........
4040 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 6f 72 20 6f 66 20 60 ...;;.With.the.new.behavior.of.`
4060 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 20 20 20 3b 3b 20 28 copy-directory'.............;;.(
4080 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 20 63 6f 6d 6d 61 6e similar.to.the.`cp'.shell.comman
40a0 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 3b 20 6e 65 65 64 20 d).we.don't.............;;.need.
40c0 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 65 20 74 61 72 67 65 such.a.construction.of.the.targe
40e0 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 3b 3b 20 73 6f 20 6d t.directory,.............;;.so.m
4100 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 74 6f 20 22 7e 2f 74 odify.the.destination.TO.to."~/t
4120 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 66 6f 6f 2f 22 2e 0a est/".instead.of."~/test/foo/"..
4140 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 6d 65 20 28 66 69 6c ............(let.((destname.(fil
4160 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 20 20 20 20 20 20 20 e-name-directory.to)))..........
4180 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 65 63 74 6f 72 79 2d .....(when.(and.(file-directory-
41a0 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 20 20 20 20 20 20 20 p.from).........................
41c0 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 20 20 20 20 20 20 20 .(file-directory-p.to)..........
41e0 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 63 72 65 61 74 6f 72 ................(eq.file-creator
4200 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 20 20 20 20 20 20 20 .'dired-copy-file)).............
4220 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 20 20 20 20 20 20 20 ....(setq.to.destname)).........
4240 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 20 73 75 62 64 69 72 ......;;.If.DESTNAME.is.a.subdir
4260 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 6c 69 6e 6b 2c 0a 20 ectory.of.FROM,.not.a.symlink,..
4280 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 65 74 68 6f 64 20 69 .............;;.and.the.method.i
42a0 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 61 6e 20 65 72 72 6f n.use.is.copying,.signal.an.erro
42c0 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 20 74 20 28 63 61 72 r................(and.(eq.t.(car
42e0 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 65 29 29 29 0a 20 20 .(file-attributes.destname)))...
4300 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 63 72 65 61 74 6f .................(eq.file-creato
4320 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 20 20 20 20 20 20 20 r.'dired-copy-file).............
4340 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 2d 70 20 64 65 73 74 .......(file-in-directory-p.dest
4360 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 20 20 20 20 20 28 65 name.from)....................(e
4380 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 74 6f 20 69 74 73 20 rror."Cannot.copy.`%s'.into.its.
43a0 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 20 20 20 20 20 20 20 subdirectory.`%s'"..............
43c0 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 20 20 20 20 20 20 20 .............from.to))).........
43e0 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 20 74 6f 6f 20 6c 61 ....;;.Skip.file.if.it.is.too.la
4400 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 20 28 6d 65 6d 62 65 rge..............(if.(and.(membe
4420 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 61 6d 65 22 29 29 0a r.operation.'("Copy"."Rename")).
4440 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 28 64 69 72 65 64 2d .....................(eq.(dired-
4460 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 6c 61 72 67 65 0a 20 async--abort-if-file-too-large..
4480 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 61 .........................(file-a
44a0 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 20 20 20 20 20 20 20 ttribute-size...................
44c0 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 20 28 66 69 6c 65 2d .........(file-attributes.(file-
44e0 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 20 20 20 20 20 20 20 truename.from)))................
4500 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 61 74 69 6f 6e 29 20 ...........(downcase.operation).
4520 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 20 20 20 20 20 20 27 from)..........................'
4540 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 70 75 73 68 20 66 72 abort)).................(push.fr
4560 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 20 28 69 66 20 6f 76 om.skipped)...............(if.ov
4580 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 20 28 6f 72 20 28 61 erwrite...................(or.(a
45a0 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 6d 65 64 0a 20 20 20 nd.dired-overwrite-confirmed....
45c0 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 63 ........................(push.(c
45e0 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 74 29 29 0a 20 20 20 ons.from.to).async-fn-list))....
4600 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 0a 20 20 20 20 20 20 ...................(progn.......
4620 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 64 69 72 65 64 2d 6d ..................(push.(dired-m
4640 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 65 73 29 0a 20 20 20 ake-relative.from).failures)....
4660 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 6c 6f 67 20 .....................(dired-log.
4680 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 22 0a 20 20 20 20 20 "%s.`%s'.to.`%s'.failed\n"......
46a0 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 6f 70 ..............................op
46c0 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 20 20 20 20 20 20 20 eration.from.to)))..............
46e0 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 73 79 6e 63 2d 66 6e ...(push.(cons.from.to).async-fn
4700 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 74 72 61 6d 70 20 69 -list)))))).......;;.Fix.tramp.i
4720 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 73 65 20 22 2d 71 22 ssue.#80.with.emacs-26,.use."-q"
4740 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 28 73 65 74 71 20 61 .only.when.needed........(setq.a
4760 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 20 20 20 20 20 28 69 sync-quiet-switch.............(i
4780 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 68 65 2d 72 65 61 64 f.(and.(boundp.'tramp-cache-read
47a0 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 20 20 20 20 20 20 20 -persistent-data)...............
47c0 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 20 20 20 20 20 20 20 .......async-fn-list............
47e0 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 66 72 6f 6d 20 2e 20 ..........(cl-loop.for.(_from...
4800 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 20 to).in.async-fn-list............
4820 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 73 20 28 66 69 6c 65 ...................thereis.(file
4840 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 20 20 20 20 20 20 20 -remote-p.to))).................
4860 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 20 66 61 69 6c 75 72 "-q"."-Q")).......;;.When.failur
4880 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 69 72 65 64 20 6c 6f es.have.been.printed.to.dired.lo
48a0 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 20 20 20 20 28 77 68 g.add.the.date.at.bob........(wh
48c0 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 28 64 69 72 65 64 2d en.(or.failures.skipped).(dired-
48e0 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 6e 63 2d 66 6e 2d 6c log.t)).......;;.When.async-fn-l
4900 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 6f 6e 6c 79 20 6f 6e ist.is.empty.that's.mean.only.on
4920 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 20 63 6f 70 69 65 64 e.file.......;;.had.to.be.copied
4940 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 4e 4f 2e 0a 20 20 20 .and.user.finally.answer.NO.....
4960 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 70 72 6f 63 65 73 73 ...;;.In.this.case.async.process
4980 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 6c 62 61 63 6b 0a 20 .will.never.start.and.callback..
49a0 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 63 65 20 74 6f 20 72 .....;;.will.have.no.chance.to.r
49c0 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 72 65 2e 0a 20 20 20 un,.so.notify.failures.here.....
49e0 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 20 20 20 20 20 20 20 ...(unless.async-fn-list........
4a00 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 20 20 20 20 20 20 20 .(cond.(failures................
4a20 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 65 2d 66 75 6e (funcall.dired-async-message-fun
4a40 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 20 20 20 20 20 22 25 ction........................."%
4a60 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 65 25 73 20 2d 2d 20 s.failed.for.%d.of.%d.file%s.--.
4a80 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 20 20 20 20 20 20 20 See.*Dired.log*.buffer".........
4aa0 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 79 6e 63 2d 66 61 69 ................'dired-async-fai
4ac0 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 20 20 20 20 20 6f 70 lures.........................op
4ae0 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 0a 20 20 20 20 20 20 eration.(length.failures).......
4b00 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 70 ..................total.(dired-p
4b20 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 20 20 20 20 20 28 lural-s.total)))...............(
4b40 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 75 6e 63 61 6c 6c 20 skipped................(funcall.
4b60 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 0a 20 20 20 dired-async-message-function....
4b80 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 20 25 64 20 6f 66 20 ....................."%s:.%d.of.
4ba0 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 2a 44 69 72 65 64 20 %d.file%s.skipped.--.See.*Dired.
4bc0 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 20 20 20 20 20 20 20 log*.buffer"....................
4be0 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 73 0a 20 20 20 20 20 .....'dired-async-failures......
4c00 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 69 6f 6e 20 28 6c 65 ...................operation.(le
4c20 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 20 20 20 20 20 20 20 ngth.skipped).total.............
4c40 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 2d 73 20 74 6f 74 61 ............(dired-plural-s.tota
4c60 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 6c 62 61 63 6b 2e 0a l))))).......;;.Setup.callback..
4c80 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 20 20 20 20 20 20 20 ......(setq.callback............
4ca0 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 20 20 20 .(lambda.(&optional._ignore)....
4cc0 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 66 74 65 72 2d 66 69 ...........(dired-async-after-fi
4ce0 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 74 6f 74 61 6c 20 28 le-create................total.(
4d00 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 79 6e 63 2d 66 6e 2d list.operation.(length.async-fn-
4d20 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 20 20 20 20 20 20 20 list)).failures.skipped)........
4d40 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 77 6e 63 61 73 65 20 .......(when.(string=.(downcase.
4d60 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 20 20 20 20 20 20 20 operation)."rename")............
4d80 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 20 74 6f 29 20 69 6e .....(cl-loop.for.(file...to).in
4da0 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 20 20 20 20 20 20 20 .async-fn-list..................
4dc0 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 65 2d 62 75 66 66 65 ........for.bf.=.(get-file-buffe
4de0 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 20 20 20 20 20 20 20 r.file).........................
4e00 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 2d 70 20 74 6f 29 0a .for.destp.=.(file-exists-p.to).
4e20 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 61 6e 64 .........................do.(and
4e40 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 20 20 20 20 20 20 20 .bf.destp.......................
4e60 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 62 75 66 66 65 72 20 ...........(with-current-buffer.
4e80 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 20 20 20 20 20 20 20 bf..............................
4ea0 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 61 6d 65 20 74 6f 20 ......(set-visited-file-name.to.
4ec0 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 69 72 70 20 28 66 69 t.t))))))).......(let.((dirp.(fi
4ee0 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 20 20 20 20 20 20 20 le-directory-p.to)).............
4f00 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 79 20 74 6f 29 29 29 (dest.(file-name-directory.to)))
4f20 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 69 72 65 64 2d 63 72 .........(when.(boundp.'dired-cr
4f40 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 20 20 20 20 20 20 20 eate-destination-dirs)..........
4f60 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 20 20 20 20 20 20 20 .(setq.create-dir...............
4f80 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 65 73 74 69 6e 61 74 ..(cl-case.dired-create-destinat
4fa0 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 20 20 28 61 6c 77 61 ion-dirs...................(alwa
4fc0 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 20 20 20 20 20 28 61 ys.'always)...................(a
4fe0 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 20 20 20 20 20 20 20 sk.(and.(null.dirp).............
5000 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 6c 65 2d 64 69 72 65 ................(null.(file-dire
5020 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 20 20 20 20 20 20 20 ctory-p.dest))..................
5040 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 6d 61 74 20 22 43 72 ...........(y-or-n-p.(format."Cr
5060 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 73 74 29 29 29 0a 20 eate.directory.`%s'?.".dest)))..
5080 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 77 61 79 73 29 29 29 ......................'always)))
50a0 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 6f 63 65 73 73 2e 0a ))).....;;.Start.async.process..
50c0 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 20 20 20 20 20 28 70 ....(when.async-fn-list.......(p
50e0 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 73 74 61 72 74 20 60 rocess-put........(async-start.`
5100 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 20 20 20 20 (lambda.()......................
5120 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 69 72 65 20 27 64 69 ..(require.'cl-lib).(require.'di
5140 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 78 29 0a 20 20 20 20 red-aux).(require.'dired-x).....
5160 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 63 2d 69 6e 6a 65 63 ...................,(async-injec
5180 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 6e 76 2d 76 61 72 69 t-variables.dired-async-env-vari
51a0 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 20 20 20 20 20 20 20 ables-regexp)...................
51c0 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 2d 61 73 6b 2d 75 73 .....(advice-add.#'files--ask-us
51e0 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 20 20 20 20 20 20 20 er-about-large-file.............
5200 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 76 65 72 72 69 64 65 .......................:override
5220 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 29 29 0a 20 20 20 20 .(lambda.(&rest.args).nil)).....
5240 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 28 64 69 72 65 64 2d ...................(let.((dired-
5260 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 6c 77 61 79 73 29 29 recursive-copies.(quote.always))
5280 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 28 64 ..............................(d
52a0 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 20 20 20 20 20 20 20 ired-copy-preserve-time.........
52c0 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 72 65 64 2d 63 6f 70 ......................,dired-cop
52e0 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 20 20 20 20 20 20 20 y-preserve-time)................
5300 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 74 65 2d 64 65 73 74 ..............(dired-create-dest
5320 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 29 0a 20 20 20 20 20 ination-dirs.',create-dir)......
5340 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 65 64 2d 76 ........................(dired-v
5360 63 2d 72 65 6e 61 6d 65 2d 66 69 6c 65 20 2c 64 69 72 65 64 2d 76 63 2d 72 65 6e 61 6d 65 2d 66 c-rename-file.,dired-vc-rename-f
5380 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 20 20 20 20 20 20 ile)............................
53a0 20 20 61 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 ..auth-source-save-behavior)....
53c0 20 20 20 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 ......................(setq.over
53e0 77 72 69 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 write-backup-query.nil).........
5400 20 20 20 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 .................;;.Inline.`back
5420 75 70 2d 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 up-file'.as.long.as.it.is.not...
5440 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 61 76 61 69 6c 61 .......................;;.availa
5460 62 6c 65 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 ble.in.emacs....................
5480 20 20 20 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 .......(defalias.'backup-file...
54a0 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 53 61 6d 65 .........................;;.Same
54c0 20 66 65 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 .feature.as."cp.-f.--backup=numb
54e0 65 72 65 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 ered.from.to"...................
5500 20 20 20 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 .........;;.Symlinks.are.copied.
5520 61 73 20 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 as.file.from.source.unlike......
5540 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 60 64 69 72 65 64 2d ......................;;.`dired-
5560 63 6f 70 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 copy-file'.which.is.same.as.cp.-
5580 64 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 20 20 20 20 3b 3b d.............................;;
55a0 20 44 69 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 .Directories.are.omitted........
55c0 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 66 72 .....................(lambda.(fr
55e0 6f 6d 20 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 om.to.ok).......................
5600 20 20 20 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 .......(cond.((file-directory-p.
5620 66 72 6f 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 from).(ignore)).................
5640 20 20 20 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 ...................(t.(let.((cou
5660 6e 74 20 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 nt.0))..........................
5680 20 20 20 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 ...............(while.(let.((att
56a0 72 73 20 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 rs.(file-attributes.to))).......
56c0 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 ................................
56e0 20 20 20 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 ...........(and.attrs.(null.(nth
5700 20 30 20 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 .0.attrs))))....................
5720 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 6c 2d 69 6e 63 66 20 .......................(cl-incf.
5740 63 6f 75 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 count)..........................
5760 20 20 20 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 .................(setq.to.(conca
5780 74 20 28 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 t.(file-name-sans-versions.to)..
57a0 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 ................................
57c0 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 6f 72 6d 61 ..........................(forma
57e0 74 20 22 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 t.".~%s~".count)))))............
5800 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 63 6f 6e 64 ...........................(cond
5820 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 20 20 20 ition-case.err..................
5840 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 6f 70 79 2d 66 .........................(copy-f
5860 69 6c 65 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 ile.from.to.ok.dired-copy-preser
5880 76 65 2d 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 ve-time)........................
58a0 20 20 20 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 .................(file-date-erro
58c0 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 20 r...............................
58e0 20 20 20 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 ...........(dired-log."Can't.set
5900 20 64 61 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 .date.on.%s:\n%s\n".from.err))))
5920 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 20 3b 3b 20 )))..........................;;.
5940 4e 6f 77 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 Now.run.the.FILE-CREATOR.functio
5960 6e 20 6f 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 n.on.files......................
5980 20 20 20 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 .....(cl-loop.with.fn.=.(quote.,
59a0 66 69 6c 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 file-creator)...................
59c0 20 20 20 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 ................for.(from...dest
59e0 29 20 69 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 ).in.(quote.,async-fn-list).....
5a00 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 64 6f ..............................do
5a20 20 28 63 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 .(condition-case.err............
5a40 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 28 66 ..............................(f
5a60 75 6e 63 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 uncall.fn.from.dest.t)..........
5a80 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 28 66 ..............................(f
5aa0 69 6c 65 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 ile-error.......................
5ac0 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 6c 6f 67 20 22 25 73 ..................(dired-log."%s
5ae0 3a 20 25 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 :.%s\n".(car.err).(cdr.err))....
5b00 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 ................................
5b20 20 20 20 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 .....nil))).....................
5b40 20 20 20 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 .....(when.(get-buffer.dired-log
5b60 2d 62 75 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 -buffer)........................
5b80 20 20 20 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 ....(dired-log.t)...............
5ba0 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 62 75 66 66 65 .............(with-current-buffe
5bc0 72 20 64 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 r.dired-log-buffer..............
5be0 20 20 20 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 ................(write-region.(p
5c00 6f 69 6e 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 oint-min).(point-max)...........
5c20 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 ................................
5c40 20 2c 64 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 .,dired-async-log-file))))......
5c60 20 20 20 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 ..................,(dired-async-
5c80 6d 61 79 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 maybe-kill-ftp))................
5ca0 20 20 20 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 .....callback)........'dired-asy
5cc0 6e 63 2d 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 nc-process.t).......;;.Run.mode-
5ce0 6c 69 6e 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 line.notifications.while.process
5d00 20 72 75 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 .running........(dired-async--mo
5d20 64 65 6c 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 deline-mode.1).......(message."%
5d40 73 20 70 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 s.proceeding.asynchronously...".
5d60 6f 70 65 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 operation))))..(defvar.wdired-us
5d80 65 2d 69 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 e-interactive-rename).(defun.dir
5da0 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 20 28 6f 6c 64 2d ed-async-wdired-do-renames.(old-
5dc0 66 6e 20 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 fn.&rest.args)...;;.Perhaps.a.be
5de0 74 74 65 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 tter.fix.would.be.to.ask.for.ren
5e00 61 6d 69 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 aming.BEFORE.starting...;;.OLD-F
5e20 4e 20 77 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 N.when.`wdired-use-interactive-r
5e40 65 6e 61 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 ename'.is.non-nil...For.now...;;
5e60 20 6a 75 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 .just.bind.it.to.nil.to.ensure.n
5e80 6f 20 71 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 o.questions.will.be.asked.betwee
5ea0 6e 0a 20 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 n...;;.each.rename....(let.(wdir
5ec0 65 64 2d 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 ed-use-interactive-rename).....(
5ee0 61 70 70 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 apply.old-fn.args)))..;;;###auto
5f00 6c 6f 61 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 load.(define-minor-mode.dired-as
5f20 79 6e 63 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 ync-mode..."Do.dired.actions.asy
5f40 6e 63 68 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 nchronously."...:lighter.dired-a
5f60 73 79 6e 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 sync-mode-lighter...:global.t...
5f80 28 69 66 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 (if.dired-async-mode.......(prog
5fa0 6e 0a 20 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 n.........(advice-add.'dired-cre
5fc0 61 74 65 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 ate-files.:around.#'dired-async-
5fe0 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 20 20 28 61 64 -smart-create-files).........(ad
6000 76 69 63 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 vice-add.'wdired-do-renames.:aro
6020 75 6e 64 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 und.#'dired-async-wdired-do-rena
6040 6d 65 73 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 mes)).....(progn.......(advice-r
6060 65 6d 6f 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 emove.'dired-create-files.#'dire
6080 64 2d 61 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 d-async--smart-create-files)....
60a0 20 20 20 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 ...(advice-remove.'wdired-do-ren
60c0 61 6d 65 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 ames.#'dired-async-wdired-do-ren
60e0 61 6d 65 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 ames))))..(defmacro.dired-async-
6100 2d 77 69 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 -with-async-create-files.(&rest.
6120 62 6f 64 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 body)..."Evaluate.BODY.with....d
6140 69 72 65 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 ired-create-files....set.to....d
6160 69 72 65 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 ired-async-create-files...."...(
6180 64 65 63 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 declare.(indent.0))...`(cl-letf.
61a0 28 28 28 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 (((symbol-function.'dired-create
61c0 2d 66 69 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 -files).#'dired-async-create-fil
61e0 65 73 29 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 es))......,@body))..;;;###autolo
6200 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 63 6f 70 79 20 28 26 ad.(defun.dired-async-do-copy.(&
6220 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 64 6f optional.arg)..."Run....dired-do
6240 2d 63 6f 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 -copy....asynchronously."...(int
6260 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 6e 63 2d 2d 77 69 eractive."P")...(dired-async--wi
6280 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 64 69 72 65 64 2d th-async-create-files....(dired-
62a0 64 6f 2d 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 do-copy.arg)))..;;;###autoload.(
62c0 64 65 66 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 defun.dired-async-do-symlink.(&o
62e0 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 64 6f 2d ptional.arg)..."Run....dired-do-
6300 73 79 6d 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 symlink....asynchronously."...(i
6320 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 6e 63 2d 2d nteractive."P")...(dired-async--
6340 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 64 69 72 65 with-async-create-files....(dire
6360 64 2d 64 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 d-do-symlink.arg)))..;;;###autol
6380 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 68 61 72 64 6c 69 oad.(defun.dired-async-do-hardli
63a0 6e 6b 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 64 69 72 nk.(&optional.arg)..."Run....dir
63c0 65 64 2d 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 ed-do-hardlink....asynchronously
63e0 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 2d ."...(interactive."P")...(dired-
6400 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 20 async--with-async-create-files..
6420 20 20 28 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 ..(dired-do-hardlink.arg)))..;;;
6440 23 23 23 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 ###autoload.(defun.dired-async-d
6460 6f 2d 72 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 o-rename.(&optional.arg)..."Run.
6480 e2 80 98 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 ...dired-do-rename....asynchrono
64a0 75 73 6c 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 usly."...(interactive."P")...(di
64c0 72 65 64 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 red-async--with-async-create-fil
64e0 65 73 0a 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 es....(dired-do-rename.arg)))..(
6500 70 72 6f 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 provide.'dired-async)..;;;.dired
6520 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 00 00 -async.el.ends.here.............
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 45 61 73 6b 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.9/Eask................
6620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6660 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
6680 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 34 00 20 30 00 00 00 0000622.00000000000.012114..0...
66a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6700 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...................
6720 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...................
6740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
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 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
6820 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
6840 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
6860 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-
6880 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
68a0 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
68c0 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"."*-
68e0 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
6900 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\".&&
6920 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
6940 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"
6960 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
6980 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"))...............
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 61 73 79 6e 63 2d 74 65 73 74 2e 65 6c 00 00 00 00 00 00 00 async-1.9.9/async-test.el.......
6a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a60 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
6a80 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 31 00 20 30 00 00 00 0007622.00000000000.013731..0...
6aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b00 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...................
6b20 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...................
6b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c00 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
6c20 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
6c40 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
6c60 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
6c80 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
6ca0 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.
6cc0 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
6ce0 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
6d00 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
6d20 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
6d40 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
6d60 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.
6d80 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.;
6da0 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,.
6dc0 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,
6de0 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
6e00 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
6e20 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
6e40 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
6e60 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
6e80 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
6ea0 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.
6ec0 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
6ee0 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
6f00 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
6f20 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.
6f40 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
6f60 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
6f80 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
6fa0 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
6fc0 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:..(
6fe0 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
7000 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
7020 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...").
7040 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.
7060 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.
7080 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
70a0 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).
70c0 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
70e0 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
7100 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
7120 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)))...
7140 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.
7160 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.(
7180 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
71a0 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.
71c0 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.............
71e0 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
7200 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.().
7220 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.
7240 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
7260 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)
7280 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
72a0 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").....;;.......
72c0 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,
72e0 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"......
7300 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
7320 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
7340 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
7360 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....;;.
7380 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.
73a0 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
73c0 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)
73e0 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
7400 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.
7420 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.(
7440 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
7460 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:
7480 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
74a0 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
74c0 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
74e0 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
7500 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
7520 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"................
7540 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
7560 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
7580 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)....................
75a0 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
75c0 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"...................
75e0 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
7600 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)))....................
7620 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
7640 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
7660 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
7680 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
76a0 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
76c0 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...").
76e0 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
7700 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
7720 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
7740 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
7760 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
7780 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").............
77a0 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
77c0 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-
77e0 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-
7800 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.
7820 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
7840 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........
7860 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).............
7880 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)....
78a0 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
78c0 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"........
78e0 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
7900 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
7920 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.
7940 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"..............
7960 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
7980 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.....
79a0 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"))
79c0 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
79e0 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-
7a00 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.
7a20 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
7a40 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
7a60 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.().
7a80 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."
7aa0 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\\'").......
7ac0 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"
7ae0 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
7b00 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
7b20 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
7b40 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))))..(
7b60 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-
7b80 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...............
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 4d 61 6b 65 66 69 6c 65 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.9/Makefile............
7c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7c60 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
7c80 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 32 00 20 30 00 00 00 0003605.00000000000.012752..0...
7ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7d00 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...................
7d20 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...................
7d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7e00 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:
7e20 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.
7e40 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
7e60 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.
7e80 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.##
7ea0 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
7ec0 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
7ee0 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
7f00 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.
7f20 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.#
7f40 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;.
7f60 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
7f80 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..##.#
7fa0 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
7fc0 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
7fe0 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
8000 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
8020 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
8040 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
8060 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
8080 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
80a0 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
80c0 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.##.
80e0 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
8100 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.##.<
8120 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/>..
8140 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
8160 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_
8180 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
81a0 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
81c0 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.:
81e0 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...
8200 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)
8220 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
8240 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
8260 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
8280 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
82a0 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..
82c0 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
82e0 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.
8300 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
8320 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
8340 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
8360 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
8380 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.
83a0 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
83c0 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.
83e0 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-
8400 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\"
8420 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-
8440 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
8460 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
8480 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
84a0 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
84c0 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}.|
84e0 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.
8500 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
8520 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.$
8540 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.${
8560 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}
8580 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............................
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 39 2f 74 65 73 74 73 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.9/tests/..............
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 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
8680 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 34 35 30 00 20 35 00 00 00 0000000.00000000000.012450..5...
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 74 65 73 74 73 2f 74 65 73 74 2d 61 73 79 6e 63 2e 65 6c 00 async-1.9.9/tests/test-async.el.
8820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8860 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
8880 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 31 00 20 30 00 00 00 0025215.00000000000.015071..0...
88a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
88c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
88e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8900 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...................
8920 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...................
8940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
89a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
89c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
89e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
8a00 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
8a20 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
8a40 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
8a60 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
8a80 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"
8aa0 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
8ac0 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
8ae0 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
8b00 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))
8b20 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
8b40 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
8b60 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
8b80 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..........(
8ba0 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
8bc0 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
8be0 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)......
8c00 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
8c20 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)...
8c40 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
8c60 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
8c80 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))).......
8ca0 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.
8cc0 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
8ce0 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
8d00 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").
8d20 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
8d40 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
8d60 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
8d80 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
8da0 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
8dc0 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
8de0 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"..
8e00 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)).....
8e20 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
8e40 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
8e60 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.................
8e80 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.
8ea0 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
8ec0 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.()........................(
8ee0 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").......
8f00 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)
8f20 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)))).
8f40 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
8f60 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)......
8f80 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
8fa0 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
8fc0 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
8fe0 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
9000 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
9020 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
9040 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'
9060 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
9080 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.
90a0 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
90c0 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
90e0 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"......
9100 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)).........(
9120 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
9140 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
9160 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......................;;
9180 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
91a0 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.()
91c0 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
91e0 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
9200 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
9220 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)......................
9240 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
9260 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.
9280 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
92a0 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."
92c0 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))
92e0 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
9300 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)."\
9320 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
9340 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
9360 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
9380 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.
93a0 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
93c0 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.......
93e0 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)).
9400 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
9420 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)....
9440 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.....
9460 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.
9480 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...............
94a0 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.().................
94c0 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").
94e0 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.
9500 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
9520 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")......
9540 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)............
9560 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
9580 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
95a0 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).....................
95c0 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
95e0 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
9600 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)))...............
9620 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
9640 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)..............
9660 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
9680 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")............
96a0 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
96c0 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
96e0 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")).............
9700 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)).............
9720 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
9740 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
9760 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.(
9780 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
97a0 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................
97c0 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
97e0 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
9800 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.()........................
9820 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")......
9840 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
9860 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
9880 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))......................
98a0 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.
98c0 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
98e0 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
9900 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,.
9920 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
9940 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
9960 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.(
9980 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).
99a0 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
99c0 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
99e0 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*)"
9a00 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
9a20 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
9a40 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
9a60 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
9a80 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
9aa0 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)...
9ac0 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
9ae0 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"......................
9b00 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
9b20 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..........................
9b40 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)..............
9b60 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.
9b80 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"..
9ba0 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 ................................
9bc0 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
9be0 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)).........................
9c00 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)).........
9c20 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").......
9c40 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..
9c60 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
9c80 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
9ca0 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"
9cc0 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
9ce0 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.
9d00 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,
9d20 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
9d40 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".
9d60 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.
9d80 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
9da0 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.
9dc0 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."
9de0 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
9e00 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.........
9e20 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.............
9e40 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
9e60 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.(
9e80 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
9ea0 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").
9ec0 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
9ee0 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")...................
9f00 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...........
9f20 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
9f40 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
9f60 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".......
9f80 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
9fa0 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)))...............
9fc0 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).............
9fe0 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
a000 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......
a020 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).....
a040 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
a060 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)......................
a080 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
a0a0 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
a0c0 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))....................
a0e0 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)..............
a100 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
a120 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:.
a140 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).....................
a160 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))))))...........(
a180 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
a1a0 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
a1c0 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)....
a1e0 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
a200 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
a220 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-
a240 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...\
a260 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
a280 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
a2a0 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
a2c0 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."
a2e0 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
a300 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.
a320 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
a340 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-
a360 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
a380 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...
a3a0 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.()...
a3c0 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
a3e0 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)
a400 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).....
a420 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.
a440 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................
a460 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)..........
a480 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
a4a0 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)......................
a4c0 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
a4e0 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).................
a500 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))
a520 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
a540 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)...
a560 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.
a580 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).........(
a5a0 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
a5c0 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))))....
a5e0 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
a600 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.
a620 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
a640 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
a660 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)............
a680 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
a6a0 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.
a6c0 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
a6e0 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)"........
a700 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)).........
a720 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......
a740 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.
a760 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............
a780 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.()..........
a7a0 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
a7c0 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))...
a7e0 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).......
a800 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.
a820 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................
a840 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)........
a860 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
a880 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)..................
a8a0 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
a8c0 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)...........
a8e0 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
a900 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-
a920 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.(
a940 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)......
a960 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
a980 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)
a9a0 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
a9c0 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
a9e0 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
aa00 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".
aa20 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))....
aa40 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
aa60 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.
aa80 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
aaa0 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)..........
aac0 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
aae0 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,.
ab00 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
ab20 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
ab40 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
ab60 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")....
ab80 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
aba0 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
abc0 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
abe0 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.
ac00 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
ac20 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)))...............
ac40 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
ac60 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
ac80 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.#'
aca0 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))).....
acc0 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)))......(
ace0 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
ad00 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
ad20 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
ad40 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
ad60 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
ad80 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.
ada0 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.().........
adc0 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"
ade0 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)
ae00 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)............
ae20 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).............
ae40 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.
ae60 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".
ae80 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))).............
aea0 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
aec0 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
aee0 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").....................:
af00 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
af20 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").......
af40 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
af60 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)
af80 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-
afa0 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-
afc0 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.(
afe0 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
b000 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.#
b020 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)))....
b040 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))
b060 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
b080 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
b0a0 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
b0c0 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*")))))...
b0e0 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
b100 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.
b120 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
b140 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
b160 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
b180 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")......
b1a0 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)).......
b1c0 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
b1e0 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.((
b200 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...............
b220 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
b240 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.....................
b260 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.()..................
b280 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
b2a0 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\\'")....
b2c0 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."
b2e0 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
b300 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)).....................
b320 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
b340 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
b360 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)......................
b380 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
b3a0 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)))))
b3c0 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))..
b3e0 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.(
b400 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")........
b420 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
b440 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
b460 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
b480 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"))))))....................
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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2e 65 6c 00 00 00 async-1.9.9/async-bytecomp.el...
b620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b660 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
b680 30 30 32 30 32 35 36 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 0020256.00000000000.014572..0...
b6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b700 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...................
b720 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...................
b740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
b800 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
b820 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.-*-
b840 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
b860 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
b880 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:.
b8a0 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
b8c0 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.
b8e0 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
b900 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
b920 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
b940 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
b960 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
b980 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
b9a0 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.
b9c0 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.;
b9e0 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,.
ba00 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,
ba20 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
ba40 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
ba60 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
ba80 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
baa0 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
bac0 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
bae0 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.
bb00 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
bb20 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
bb40 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
bb60 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.
bb80 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
bba0 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
bbc0 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
bbe0 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
bc00 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
bc20 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
bc40 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
bc60 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
bc80 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
bca0 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.
bcc0 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
bce0 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
bd00 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.
bd20 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.;;
bd40 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
bd60 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
bd80 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
bda0 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..;;.;;
bdc0 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 73 69 6e 67 20 74 ..NB:.This.package.is.advising.t
bde0 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'..
be00 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
be20 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
be40 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
be60 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
be80 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
bea0 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
bec0 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
bee0 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
bf00 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
bf20 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.
bf40 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.
bf60 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
bf80 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
bfa0 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
bfc0 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
bfe0 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.
c000 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
c020 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......
c040 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".
c060 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)))
c080 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
c0a0 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
c0c0 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
c0e0 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
c100 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
c120 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
c140 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
c160 73 79 6e 63 2e 22 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 2d sync.")..(defun.async-bytecomp--
c180 66 69 6c 65 2d 74 6f 2d 63 6f 6d 70 2d 62 75 66 66 65 72 20 28 66 69 6c 65 2d 6f 72 2d 64 69 72 file-to-comp-buffer.(file-or-dir
c1a0 20 26 6f 70 74 69 6f 6e 61 6c 20 71 75 69 65 74 20 74 79 70 65 29 0a 20 20 28 6c 65 74 20 28 28 .&optional.quiet.type)...(let.((
c1c0 62 6e 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 2d bn.(file-name-nondirectory.file-
c1e0 6f 72 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 28 61 63 74 69 6f 6e 2d 6e 61 6d 65 20 28 70 or-dir)).........(action-name.(p
c200 63 61 73 65 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 case.type.......................
c220 20 28 27 66 69 6c 65 20 22 46 69 6c 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .('file."File").................
c240 20 20 20 20 20 20 20 28 27 64 69 72 65 63 74 6f 72 79 20 22 44 69 72 65 63 74 6f 72 79 22 29 29 .......('directory."Directory"))
c260 29 29 0a 20 20 20 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 )).....(if.(file-exists-p.async-
c280 62 79 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 28 byte-compile-log-file).........(
c2a0 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 74 let.((buf.(get-buffer-create.byt
c2c0 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 20 e-compile-log-buffer))..........
c2e0 20 20 20 20 20 28 6e 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 .....(n.0))...........(with-curr
c300 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f ent-buffer.buf.............(goto
c320 2d 63 68 61 72 20 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 28 -char.(point-max)).............(
c340 6c 65 74 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 let.((inhibit-read-only.t)).....
c360 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 6e 74 73 20 ..........(insert-file-contents.
c380 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 0a 20 20 20 async-byte-compile-log-file)....
c3a0 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 20 ...........(compilation-mode))..
c3c0 20 20 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 20 62 75 66 29 0a ...........(display-buffer.buf).
c3e0 20 20 20 20 20 20 20 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 ............(delete-file.async-b
c400 79 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 yte-compile-log-file)...........
c420 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 28 73 ..(unless.quiet...............(s
c440 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 28 67 ave-excursion.................(g
c460 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))...........
c480 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 ......(while.(re-search-forward.
c4a0 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 20 20 20 20 20 "^.*:Error:".nil.t).............
c4c0 20 20 20 20 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 ......(cl-incf.n))).............
c4e0 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 20 20 20 ..(if.(>.n.0)...................
c500 28 6d 65 73 73 61 67 65 20 22 46 61 69 6c 65 64 20 74 6f 20 63 6f 6d 70 69 6c 65 20 25 64 20 66 (message."Failed.to.compile.%d.f
c520 69 6c 65 73 20 69 6e 20 64 69 72 65 63 74 6f 72 79 20 60 25 73 27 22 20 6e 20 62 6e 29 0a 20 20 iles.in.directory.`%s'".n.bn)...
c540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 60 25 73 27 20 ..............(message."%s.`%s'.
c560 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 61 72 compiled.asynchronously.with.war
c580 6e 69 6e 67 73 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 nings"..........................
c5a0 61 63 74 69 6f 6e 2d 6e 61 6d 65 20 62 6e 29 29 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 action-name.bn))))).......(unles
c5c0 73 20 71 75 69 65 74 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 60 25 73 s.quiet.........(message."%s.`%s
c5e0 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 73 '.compiled.asynchronously.with.s
c600 75 63 63 65 73 73 22 20 61 63 74 69 6f 6e 2d 6e 61 6d 65 20 62 6e 29 29 29 29 29 0a 0a 3b 3b 3b uccess".action-name.bn)))))..;;;
c620 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 62 79 74 65 2d 72 65 ###autoload.(defun.async-byte-re
c640 63 6f 6d 70 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 28 64 69 72 65 63 74 6f 72 79 20 26 6f 70 compile-directory.(directory.&op
c660 74 69 6f 6e 61 6c 20 71 75 69 65 74 29 0a 20 20 22 43 6f 6d 70 69 6c 65 20 61 6c 6c 20 2a 2e 65 tional.quiet)..."Compile.all.*.e
c680 6c 20 66 69 6c 65 73 20 69 6e 20 44 49 52 45 43 54 4f 52 59 20 61 73 79 6e 63 68 72 6f 6e 6f 75 l.files.in.DIRECTORY.asynchronou
c6a0 73 6c 79 2e 0a 41 6c 6c 20 2a 2e 65 6c 63 20 66 69 6c 65 73 20 61 72 65 20 73 79 73 74 65 6d 61 sly..All.*.elc.files.are.systema
c6c0 74 69 63 61 6c 6c 79 20 64 65 6c 65 74 65 64 20 62 65 66 6f 72 65 20 70 72 6f 63 65 65 64 69 6e tically.deleted.before.proceedin
c6e0 67 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 64 69 72 20 3d 20 28 64 69 72 65 63 g."...(cl-loop.with.dir.=.(direc
c700 74 6f 72 79 2d 66 69 6c 65 73 20 64 69 72 65 63 74 6f 72 79 20 74 20 22 5c 5c 2e 65 6c 63 5c 5c tory-files.directory.t."\\.elc\\
c720 27 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 75 6e 6c 65 73 73 20 64 69 72 20 72 65 74 75 72 6e '")............unless.dir.return
c740 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 66 20 69 6e 20 64 69 72 0a 20 20 20 .nil............for.f.in.dir....
c760 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 29 20 64 ........when.(file-exists-p.f).d
c780 6f 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 66 29 29 0a 20 20 3b 3b 20 45 6e 73 75 72 65 20 61 o.(delete-file.f))...;;.Ensure.a
c7a0 73 79 6e 63 20 69 73 20 72 65 6c 6f 61 64 65 64 20 77 68 65 6e 20 61 73 79 6e 63 2e 65 6c 63 20 sync.is.reloaded.when.async.elc.
c7c0 69 73 20 64 65 6c 65 74 65 64 2e 0a 20 20 3b 3b 20 54 68 69 73 20 68 61 70 70 65 6e 20 77 68 65 is.deleted....;;.This.happen.whe
c7e0 6e 20 72 65 63 6f 6d 70 69 6c 69 6e 67 20 69 74 73 20 6f 77 6e 20 64 69 72 65 63 74 6f 72 79 2e n.recompiling.its.own.directory.
c800 0a 20 20 28 6c 6f 61 64 20 22 61 73 79 6e 63 22 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6c 6c 2d ...(load."async")...(let.((call-
c820 62 61 63 6b 0a 20 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 back..........(lambda.(&optional
c840 20 5f 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 62 79 74 65 ._ignore)............(async-byte
c860 63 6f 6d 70 2d 2d 66 69 6c 65 2d 74 6f 2d 63 6f 6d 70 2d 62 75 66 66 65 72 20 64 69 72 65 63 74 comp--file-to-comp-buffer.direct
c880 6f 72 79 20 71 75 69 65 74 20 27 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 20 20 20 20 28 61 73 ory.quiet.'directory)))).....(as
c8a0 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 20 20 20 20 20 ync-start......`(lambda.()......
c8c0 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 20 20 20 20 2c ...(require.'bytecomp).........,
c8e0 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 6e 63 2d 62 79 (async-inject-variables.async-by
c900 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 29 0a 20 20 20 tecomp-load-variable-regexp)....
c920 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 72 79 20 28 66 .....(let.((default-directory.(f
c940 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 2c 64 69 72 65 63 74 6f 72 79 ile-name-as-directory.,directory
c960 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 2d 64 61 74 61 29 0a 20 20 20 ))...............error-data)....
c980 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 74 68 20 64 .......(add-to-list.'load-path.d
c9a0 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 28 62 79 74 efault-directory)...........(byt
c9c0 65 2d 72 65 63 6f 6d 70 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 2c 64 69 72 65 63 74 6f 72 79 e-recompile-directory.,directory
c9e0 20 30 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 .0.t)...........(when.(get-buffe
ca00 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 29 0a 20 20 20 20 20 r.byte-compile-log-buffer)......
ca20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 72 72 6f 72 2d 64 61 74 61 20 28 77 69 74 68 2d 63 75 .......(setq.error-data.(with-cu
ca40 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 rrent-buffer.byte-compile-log-bu
ca60 66 66 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 ffer............................
ca80 20 20 20 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 ....(buffer-substring-no-propert
caa0 69 65 73 20 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 20 ies.(point-min).(point-max))))..
cac0 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 65 72 72 6f ...........(unless.(string=.erro
cae0 72 2d 64 61 74 61 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 r-data."")...............(with-t
cb00 65 6d 70 2d 66 69 6c 65 20 2c 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 emp-file.,async-byte-compile-log
cb20 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 -file.................(erase-buf
cb40 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 65 72 72 fer).................(insert.err
cb60 6f 72 2d 64 61 74 61 29 29 29 29 29 29 0a 20 20 20 20 20 63 61 6c 6c 2d 62 61 63 6b 29 0a 20 20 or-data))))))......call-back)...
cb80 20 20 28 75 6e 6c 65 73 73 20 71 75 69 65 74 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 65 ..(unless.quiet.(message."Starte
cba0 64 20 63 6f 6d 70 69 6c 69 6e 67 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 64 69 72 65 63 d.compiling.asynchronously.direc
cbc0 74 6f 72 79 20 25 73 22 20 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 tory.%s".directory))))..(defvar.
cbe0 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 28 64 65 66 76 61 package-archive-contents).(defva
cc00 72 20 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 r.package-alist).(declare-functi
cc20 6f 6e 20 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 72 65 71 73 20 22 70 61 63 6b 61 67 65 2e 65 6c on.package-desc-reqs."package.el
cc40 22 20 28 63 6c 2d 78 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 ".(cl-x))..(defun.async-bytecomp
cc60 2d 2d 67 65 74 2d 70 61 63 6b 61 67 65 2d 64 65 70 73 20 28 70 6b 67 73 29 0a 20 20 3b 3b 20 53 --get-package-deps.(pkgs)...;;.S
cc80 61 6d 65 20 61 73 20 60 70 61 63 6b 61 67 65 2d 2d 67 65 74 2d 64 65 70 73 27 20 62 75 74 20 70 ame.as.`package--get-deps'.but.p
cca0 61 72 73 65 20 69 6e 73 74 65 61 64 20 60 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f arse.instead.`package-archive-co
ccc0 6e 74 65 6e 74 73 27 0a 20 20 3b 3b 20 62 65 63 61 75 73 65 20 50 4b 47 20 69 73 20 6e 6f 74 20 ntents'...;;.because.PKG.is.not.
cce0 61 6c 72 65 61 64 79 20 69 6e 73 74 61 6c 6c 65 64 20 61 6e 64 20 6e 6f 74 20 70 72 65 73 65 6e already.installed.and.not.presen
cd00 74 20 69 6e 20 60 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 27 2e 0a 20 20 3b 3b 20 48 6f 77 65 76 t.in.`package-alist'....;;.Howev
cd20 65 72 20 66 61 6c 6c 62 61 63 6b 20 74 6f 20 60 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 27 20 69 er.fallback.to.`package-alist'.i
cd40 6e 20 63 61 73 65 20 50 4b 47 20 6e 6f 20 6d 6f 72 65 20 70 72 65 73 65 6e 74 0a 20 20 3b 3b 20 n.case.PKG.no.more.present...;;.
cd60 69 6e 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 20 64 75 in.`package-archive-contents'.du
cd80 65 20 74 6f 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 6f 20 60 70 61 63 6b 61 67 65 2d 61 72 e.to.modification.to.`package-ar
cda0 63 68 69 76 65 73 27 2e 0a 20 20 3b 3b 20 53 65 65 20 69 73 73 75 65 20 23 35 38 2e 0a 20 20 28 chives'....;;.See.issue.#58....(
cdc0 6c 65 74 20 28 28 73 65 65 6e 20 27 28 29 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 70 6b 67 73 let.((seen.'())).....(while.pkgs
cde0 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6b 67 20 28 70 6f 70 20 70 6b 67 73 29 29 29 0a 20 .......(let.((pkg.(pop.pkgs)))..
ce00 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 65 6d 71 20 70 6b 67 20 73 65 65 6e 29 0a 20 .......(unless.(memq.pkg.seen)..
ce20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6b 67 2d 64 65 73 63 20 28 63 61 64 72 20 28 .........(let.((pkg-desc.(cadr.(
ce40 6f 72 20 28 61 73 73 71 20 70 6b 67 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f 6e or.(assq.pkg.package-archive-con
ce60 74 65 6e 74 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 tents)..........................
ce80 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 71 20 70 6b 67 20 70 61 63 6b 61 67 65 2d 61 6c 69 ...........(assq.pkg.package-ali
cea0 73 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 6b 67 2d 64 65 st))))).............(when.pkg-de
cec0 73 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 70 6b 67 20 73 65 65 6e 29 sc...............(push.pkg.seen)
cee0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 6b 67 73 20 28 61 70 70 65 6e ...............(setq.pkgs.(appen
cf00 64 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 72 65 d.(mapcar.#'car.(package-desc-re
cf20 71 73 20 70 6b 67 2d 64 65 73 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 qs.pkg-desc))...................
cf40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 6b 67 73 29 29 29 29 29 29 29 0a 20 20 20 20 73 ...............pkgs))))))).....s
cf60 65 65 6e 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 2d 70 61 63 6b 61 67 65 2d 63 6f 6d een))..(defun.async--package-com
cf80 70 69 6c 65 20 28 6f 72 69 67 2d 66 75 6e 20 70 6b 67 2d 64 65 73 63 20 26 72 65 73 74 20 61 72 pile.(orig-fun.pkg-desc.&rest.ar
cfa0 67 73 29 0a 20 20 28 6c 65 74 20 28 28 63 75 72 2d 70 61 63 6b 61 67 65 20 28 70 61 63 6b 61 67 gs)...(let.((cur-package.(packag
cfc0 65 2d 64 65 73 63 2d 6e 61 6d 65 20 70 6b 67 2d 64 65 73 63 29 29 0a 20 20 20 20 20 20 20 20 28 e-desc-name.pkg-desc)).........(
cfe0 70 6b 67 2d 64 69 72 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 64 69 72 20 70 6b 67 2d 64 65 pkg-dir.(package-desc-dir.pkg-de
d000 73 63 29 29 29 0a 20 20 20 20 28 69 66 20 28 6f 72 20 28 6d 65 6d 62 65 72 20 61 73 79 6e 63 2d sc))).....(if.(or.(member.async-
d020 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 20 27 28 74 20 61 6c bytecomp-allowed-packages.'(t.al
d040 6c 20 28 61 6c 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 63 75 72 2d l.(all))).............(memq.cur-
d060 70 61 63 6b 61 67 65 20 28 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 2d 67 65 74 2d 70 61 63 package.(async-bytecomp--get-pac
d080 6b 61 67 65 2d 64 65 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 kage-deps.......................
d0a0 20 20 20 20 20 20 20 20 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c 6c 6f 77 65 64 2d .........async-bytecomp-allowed-
d0c0 70 61 63 6b 61 67 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 packages))).........(progn......
d0e0 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 63 75 72 2d 70 61 63 6b 61 67 65 20 27 61 73 79 6e .....(when.(eq.cur-package.'asyn
d100 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6d 61 6b 75 6e 62 6f 75 6e 64 20 27 61 73 79 c).............(fmakunbound.'asy
d120 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 29 0a 20 20 20 nc-byte-recompile-directory)....
d140 20 20 20 20 20 20 20 20 20 3b 3b 20 41 64 64 20 74 6f 20 60 6c 6f 61 64 2d 70 61 74 68 27 20 74 .........;;.Add.to.`load-path'.t
d160 68 65 20 6c 61 74 65 73 74 20 76 65 72 73 69 6f 6e 20 6f 66 20 61 73 79 6e 63 20 61 6e 64 0a 20 he.latest.version.of.async.and..
d180 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 6c 6f 61 64 20 69 74 20 77 68 65 6e 20 72 65 69 ...........;;.reload.it.when.rei
d1a0 6e 73 74 61 6c 6c 69 6e 67 20 61 73 79 6e 63 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c nstalling.async..............(cl
d1c0 2d 70 75 73 68 6e 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 -pushnew.pkg-dir.load-path).....
d1e0 20 20 20 20 20 20 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 ........(load."async-bytecomp"))
d200 0a 20 20 20 20 20 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 ...........;;.`async-byte-recomp
d220 69 6c 65 2d 64 69 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 ile-directory'.will.add.director
d240 79 0a 20 20 20 20 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 y...........;;.as.needed.to.`loa
d260 64 2d 70 61 74 68 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 d-path'............(async-byte-r
d280 65 63 6f 6d 70 69 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 ecompile-directory.(package-desc
d2a0 2d 64 69 72 20 70 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 -dir.pkg-desc).t)).......(apply.
d2c0 6f 72 69 67 2d 66 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 orig-fun.pkg-desc.args))))..;;;#
d2e0 23 23 61 75 74 6f 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 ##autoload.(define-minor-mode.as
d300 79 6e 63 2d 62 79 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 ync-bytecomp-package-mode..."Byt
d320 65 20 63 6f 6d 70 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 e.compile.asynchronously.package
d340 73 20 69 6e 73 74 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 s.installed.with.package.el..Asy
d360 6e 63 20 63 6f 6d 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 nc.compilation.of.packages.can.b
d380 65 20 63 6f 6e 74 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 e.controlled.by.`async-bytecomp-
d3a0 61 6c 6c 6f 77 65 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 allowed-packages'."...:group.'as
d3c0 79 6e 63 0a 20 20 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 ync...:global.t...(if.async-byte
d3e0 63 6f 6d 70 2d 70 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 comp-package-mode.......(advice-
d400 61 64 64 20 27 70 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 add.'package--compile.:around.#'
d420 61 73 79 6e 63 2d 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 async--package-compile).....(adv
d440 69 63 65 2d 72 65 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 ice-remove.'package--compile.#'a
d460 73 79 6e 63 2d 2d 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 sync--package-compile)))..;;;###
d480 61 75 74 6f 6c 6f 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 autoload.(defun.async-byte-compi
d4a0 6c 65 2d 66 69 6c 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 le-file.(file)..."Byte.compile.L
d4c0 69 73 70 20 63 6f 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 isp.code.FILE.asynchronously...S
d4e0 61 6d 65 20 61 73 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 ame.as.`byte-compile-file'.but.a
d500 73 79 6e 63 68 72 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 synchronous."...(interactive."fF
d520 69 6c 65 3a 20 22 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 ile:.")...(let.((call-back......
d540 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).
d560 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 2d 66 69 6c 65 ...........(async-bytecomp--file
d580 2d 74 6f 2d 63 6f 6d 70 2d 62 75 66 66 65 72 20 66 69 6c 65 20 6e 69 6c 20 27 66 69 6c 65 29 29 -to-comp-buffer.file.nil.'file))
d5a0 29 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 )).....(async-start......`(lambd
d5c0 61 20 28 29 0a 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 a.().........(require.'bytecomp)
d5e0 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 61 72 69 61 62 6c 65 .........,(async-inject-variable
d600 73 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 65 2d 72 s.async-bytecomp-load-variable-r
d620 65 67 65 78 70 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 egexp).........(let.((default-di
d640 72 65 63 74 6f 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 rectory.,(file-name-directory.fi
d660 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 2d 64 61 74 61 29 0a 20 le))...............error-data)..
d680 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 74 68 .........(add-to-list.'load-path
d6a0 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 28 62 .default-directory)...........(b
d6c0 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 20 20 yte-compile-file.,file).........
d6e0 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 6c 65 ..(when.(get-buffer.byte-compile
d700 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 20 65 -log-buffer).............(setq.e
d720 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 20 62 rror-data.(with-current-buffer.b
d740 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 20 20 yte-compile-log-buffer..........
d760 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 73 75 ......................(buffer-su
d780 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 69 6e bstring-no-properties.(point-min
d7a0 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 75 6e ).(point-max)))).............(un
d7c0 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 20 20 less.(string=.error-data."")....
d7e0 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 79 6e ...........(with-temp-file.,asyn
d800 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 20 20 c-byte-compile-log-file.........
d820 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 20 20 ........(erase-buffer)..........
d840 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 29 0a .......(insert.error-data)))))).
d860 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 73 79 .....call-back)))..(provide.'asy
d880 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 6d 70 nc-bytecomp)..;;;.async-bytecomp
d8a0 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 00 00 .el.ends.here...................
d8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da00 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 52 45 41 44 4d 45 2e 6d 64 00 00 00 00 00 00 00 00 00 00 00 async-1.9.9/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 35 31 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 35 37 34 00 20 30 00 00 00 0022517.00000000000.012574..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 2a 20 61 73 mail-async.*.async-bytecomp.*.as
dee0 79 6e 63 2d 70 61 63 6b 61 67 65 0a 0a 23 20 49 6e 73 74 61 6c 6c 0a 0a 59 6f 75 20 63 61 6e 20 ync-package..#.Install..You.can.
df00 69 6e 73 74 61 6c 6c 20 65 6d 61 63 73 2d 61 73 79 6e 63 20 70 61 63 6b 61 67 65 20 66 72 6f 6d install.emacs-async.package.from
df20 20 4d 45 4c 50 41 20 75 73 69 6e 67 20 70 61 63 6b 61 67 65 2e 65 6c 2e 0a 0a 59 6f 75 20 63 61 .MELPA.using.package.el...You.ca
df40 6e 20 61 6c 73 6f 20 69 6e 73 74 61 6c 6c 20 66 72 6f 6d 20 73 6f 75 72 63 65 73 2c 20 69 6e 20 n.also.install.from.sources,.in.
df60 74 68 69 73 20 63 61 73 65 20 79 6f 75 20 73 68 6f 75 6c 64 20 69 6e 73 74 61 6c 6c 0a 75 73 69 this.case.you.should.install.usi
df80 6e 67 20 6d 61 6b 65 20 61 6e 64 20 6d 61 6b 65 20 69 6e 73 74 61 6c 6c 20 74 6f 20 65 6e 73 75 ng.make.and.make.install.to.ensu
dfa0 72 65 20 65 6d 61 63 73 2d 61 73 79 6e 63 20 69 73 20 69 6e 73 74 61 6c 6c 65 64 20 69 6e 20 61 re.emacs-async.is.installed.in.a
dfc0 0a 73 74 61 6e 64 61 72 64 20 6c 6f 61 64 2d 70 61 74 68 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 .standard.load-path.destination.
dfe0 77 68 65 72 65 20 6f 74 68 65 72 20 70 61 63 6b 61 67 65 73 20 63 61 6e 20 66 69 6e 64 20 69 74 where.other.packages.can.find.it
e000 0a 65 61 73 69 6c 79 20 77 68 65 6e 20 63 6f 6d 70 69 6c 69 6e 67 2e 0a 0a 23 23 20 49 6e 73 74 .easily.when.compiling...##.Inst
e020 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 0a 0a 41 64 64 20 74 6f 20 79 6f 75 72 20 60 2e 65 all.dired-async..Add.to.your.`.e
e040 6d 61 63 73 2e 65 6c 60 3a 0a 0a 20 20 20 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 65 64 2d macs.el`:......(autoload.'dired-
e060 61 73 79 6e 63 2d 6d 6f 64 65 20 22 64 69 72 65 64 2d 61 73 79 6e 63 2e 65 6c 22 20 6e 69 6c 20 async-mode."dired-async.el".nil.
e080 74 29 0a 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 54 68 69 t).....(dired-async-mode.1)..Thi
e0a0 73 20 77 69 6c 6c 20 61 6c 6c 6f 77 20 79 6f 75 20 74 6f 20 72 75 6e 20 61 73 79 6e 63 68 72 6f s.will.allow.you.to.run.asynchro
e0c0 6e 6f 75 73 6c 79 0a 74 68 65 20 64 69 72 65 64 20 63 6f 6d 6d 61 6e 64 73 20 66 6f 72 20 63 6f nously.the.dired.commands.for.co
e0e0 70 79 69 6e 67 2c 20 72 65 6e 61 6d 69 6e 67 20 61 6e 64 20 73 79 6d 6c 69 6e 6b 69 6e 67 2e 0a pying,.renaming.and.symlinking..
e100 49 66 20 79 6f 75 20 61 72 65 20 61 20 5b 68 65 6c 6d 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 If.you.are.a.[helm](https://gith
e120 75 62 2e 63 6f 6d 2f 65 6d 61 63 73 2d 68 65 6c 6d 2f 68 65 6c 6d 29 20 75 73 65 72 2c 20 74 68 ub.com/emacs-helm/helm).user,.th
e140 69 73 20 77 69 6c 6c 20 61 6c 6c 6f 77 20 79 6f 75 0a 74 6f 20 63 6f 70 79 2c 20 72 65 6e 61 6d is.will.allow.you.to.copy,.renam
e160 65 20 65 74 63 2e 2e 2e 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 66 72 6f 6d 20 5b 68 65 e.etc....asynchronously.from.[he
e180 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
e1a0 6d 2f 68 65 6c 6d 29 2e 0a 4e 6f 74 65 20 74 68 61 74 20 77 69 74 68 20 5b 68 65 6c 6d 5d 28 68 m/helm)..Note.that.with.[helm](h
e1c0 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 6d 2f 68 65 6c ttps://github.com/emacs-helm/hel
e1e0 6d 29 0a 79 6f 75 20 63 61 6e 20 64 69 73 61 62 6c 65 20 74 68 69 73 20 62 79 20 72 75 6e 6e 69 m).you.can.disable.this.by.runni
e200 6e 67 20 74 68 65 20 63 6f 70 79 2c 20 72 65 6e 61 6d 65 20 65 74 63 2e 2e 2e 20 63 6f 6d 6d 61 ng.the.copy,.rename.etc....comma
e220 6e 64 73 20 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 2e 0a 0a 49 66 20 nds.with.a.prefix.argument...If.
e240 79 6f 75 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 6f 20 6d 61 6b 65 20 64 69 72 65 64 2f 68 65 6c you.don't.want.to.make.dired/hel
e260 6d 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 64 69 73 61 62 6c 65 20 69 74 20 77 69 74 68 20 60 m.asynchronous.disable.it.with.`
e280 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 60 2e 0a 0a 23 23 23 20 44 65 62 69 61 6e 20 61 dired-async-mode`...###.Debian.a
e2a0 6e 64 20 55 62 75 6e 74 75 0a 0a 55 73 65 72 73 20 6f 66 20 44 65 62 69 61 6e 20 39 20 6f 72 20 nd.Ubuntu..Users.of.Debian.9.or.
e2c0 6c 61 74 65 72 20 6f 72 20 55 62 75 6e 74 75 20 31 36 2e 30 34 20 6f 72 20 6c 61 74 65 72 20 6d later.or.Ubuntu.16.04.or.later.m
e2e0 61 79 20 73 69 6d 70 6c 79 20 60 61 70 74 2d 67 65 74 20 69 6e 73 74 61 6c 6c 20 65 6c 70 61 2d ay.simply.`apt-get.install.elpa-
e300 61 73 79 6e 63 60 2e 0a 0a 23 23 20 41 75 74 68 65 6e 74 69 63 61 74 69 6f 6e 20 61 6e 64 20 75 async`...##.Authentication.and.u
e320 73 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 0a 0a 53 6f 6d 65 20 61 75 74 68 65 6e 74 69 63 61 ser.interaction..Some.authentica
e340 74 69 6f 6e 73 20 72 65 71 75 69 72 65 20 75 73 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 2c 20 tions.require.user.interaction,.
e360 66 6f 72 20 65 78 61 6d 70 6c 65 20 61 6e 73 77 65 72 69 6e 67 20 74 6f 20 61 0a 70 72 6f 6d 70 for.example.answering.to.a.promp
e380 74 2c 20 65 6e 74 65 72 69 6e 67 20 61 20 70 61 73 73 77 6f 72 64 73 20 65 74 63 2e 20 59 6f 75 t,.entering.a.passwords.etc..You
e3a0 72 20 61 73 79 6e 63 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 73 68 6f 75 6c 64 0a 61 76 r.async.implementation.should.av
e3c0 6f 69 64 20 61 6e 79 20 73 75 63 68 20 75 73 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 2c 20 74 oid.any.such.user.interaction,.t
e3e0 6f 20 61 76 6f 69 64 20 62 65 69 6e 67 20 73 74 75 63 6b 20 77 69 74 68 20 61 20 70 72 6f 6d 70 o.avoid.being.stuck.with.a.promp
e400 74 20 79 6f 75 0a 77 69 6c 6c 20 6e 6f 74 20 62 65 20 61 62 6c 65 20 74 6f 20 61 6e 73 77 65 72 t.you.will.not.be.able.to.answer
e420 20 74 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 20 65 6d 61 63 73 2e 20 20 46 6f 72 20 61 6c 6c .to.in.the.child.emacs...For.all
e440 20 77 68 61 74 20 69 73 20 72 65 6d 6f 74 65 0a 28 6d 61 69 6c 73 2c 20 74 72 61 6d 70 20 65 74 .what.is.remote.(mails,.tramp.et
e460 63 2e 2e 2e 29 20 79 6f 75 20 68 61 76 65 20 74 6f 20 6c 65 74 20 65 6d 61 63 73 20 6d 61 6e 61 c...).you.have.to.let.emacs.mana
e480 67 65 20 79 6f 75 72 20 69 64 65 6e 74 69 66 69 63 61 74 69 6f 6e 0a 77 69 74 68 20 5b 61 75 74 ge.your.identification.with.[aut
e4a0 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 72 67 2f 73 h-sources](https://www.gnu.org/s
e4c0 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 6e 6f 2f 61 oftware/emacs/manual/html_mono/a
e4e0 75 74 68 2e 68 74 6d 6c 29 2c 20 73 6f 20 74 68 61 74 20 79 6f 75 20 64 6f 20 6e 6f 74 20 68 61 uth.html),.so.that.you.do.not.ha
e500 76 65 20 74 6f 20 65 6e 74 65 72 20 61 20 70 61 73 73 77 6f 72 64 2e 0a 0a 42 61 73 69 63 61 6c ve.to.enter.a.password...Basical
e520 6c 79 20 61 6c 6c 20 79 6f 75 20 6e 65 65 64 20 69 73 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b ly.all.you.need.is.something.lik
e540 65 20 74 68 69 73 20 69 6e 20 79 6f 75 72 20 69 6e 69 74 20 66 69 6c 65 3a 0a 0a 20 20 20 20 28 e.this.in.your.init.file:......(
e560 75 73 65 2d 70 61 63 6b 61 67 65 20 61 75 74 68 2d 73 6f 75 72 63 65 0a 20 20 20 20 20 20 3a 6e use-package.auth-source.......:n
e580 6f 2d 72 65 71 75 69 72 65 20 74 0a 20 20 20 20 20 20 3a 63 6f 6e 66 69 67 20 28 73 65 74 71 20 o-require.t.......:config.(setq.
e5a0 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 auth-sources.'("~/.authinfo.gpg"
e5c0 20 22 7e 2f 2e 6e 65 74 72 63 22 29 29 29 0a 0a 41 6e 64 20 61 20 22 7e 2f 2e 61 75 74 68 69 6e ."~/.netrc")))..And.a."~/.authin
e5e0 66 6f 2e 67 70 67 22 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 69 6e 67 20 65 6e 74 72 69 65 73 20 fo.gpg".file.containing.entries.
e600 73 75 63 68 20 61 73 0a 0a 20 20 20 20 64 65 66 61 75 6c 74 20 70 6f 72 74 20 73 75 64 6f 20 6c such.as......default.port.sudo.l
e620 6f 67 69 6e 20 72 6f 6f 74 20 70 61 73 73 77 6f 72 64 20 78 78 78 78 78 78 78 78 0a 20 20 20 20 ogin.root.password.xxxxxxxx.....
e640 0a 6f 72 0a 0a 20 20 20 20 6d 61 63 68 69 6e 65 20 78 78 78 78 78 20 70 6f 72 74 20 78 78 78 20 .or......machine.xxxxx.port.xxx.
e660 6c 6f 67 69 6e 20 78 78 78 20 70 61 73 73 77 6f 72 64 20 78 78 78 78 78 78 78 0a 0a 66 6f 72 20 login.xxx.password.xxxxxxx..for.
e680 6d 6f 72 65 20 73 70 65 63 69 66 69 63 20 68 6f 73 74 73 20 28 73 6d 74 70 2c 20 6d 61 69 6c 73 more.specific.hosts.(smtp,.mails
e6a0 20 65 74 63 2e 2e 2e 29 0a 0a 53 65 65 20 5b 61 75 74 68 2d 73 6f 75 72 63 65 73 20 6d 61 6e 75 .etc...)..See.[auth-sources.manu
e6c0 61 6c 5d 28 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 73 6f 66 74 77 61 72 65 al](https://www.gnu.org/software
e6e0 2f 65 6d 61 63 73 2f 6d 61 6e 75 61 6c 2f 68 74 6d 6c 5f 6d 6f 6e 6f 2f 61 75 74 68 2e 68 74 6d /emacs/manual/html_mono/auth.htm
e700 6c 29 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 73 2e 0a 0a 48 6f 77 65 76 65 72 2c 20 77 68 65 l).for.more.infos...However,.whe
e720 6e 20 63 68 6f 6f 73 69 6e 67 20 74 68 65 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 77 69 74 68 20 n.choosing.the.destination.with.
e740 63 6f 6d 70 6c 65 74 69 6f 6e 20 28 65 2e 67 2e 20 68 65 6c 6d 29 20 61 6e 64 0a 79 6f 75 20 68 completion.(e.g..helm).and.you.h
e760 61 76 65 20 6e 6f 20 22 2e 61 75 74 68 69 6e 66 6f 22 20 66 69 6c 65 20 6f 72 20 6a 75 73 74 20 ave.no.".authinfo".file.or.just.
e780 6e 6f 20 65 6e 74 72 79 20 66 6f 72 20 74 68 69 73 20 68 6f 73 74 2c 20 74 72 61 6d 70 20 77 69 no.entry.for.this.host,.tramp.wi
e7a0 6c 6c 0a 70 72 6f 6d 70 74 20 66 6f 72 20 70 61 73 73 77 6f 72 64 20 61 6e 64 20 6f 66 66 65 72 ll.prompt.for.password.and.offer
e7c0 20 79 6f 75 20 74 6f 20 73 61 76 65 20 69 74 2c 20 69 66 20 79 6f 75 20 61 6e 73 77 65 72 20 27 .you.to.save.it,.if.you.answer.'
e7e0 79 65 73 27 20 79 6f 75 0a 77 69 6c 6c 20 62 65 20 61 62 6c 65 20 74 6f 20 61 63 68 69 65 76 65 yes'.you.will.be.able.to.achieve
e800 20 79 6f 75 20 61 73 79 6e 63 20 6f 70 65 72 61 74 69 6f 6e 20 61 73 20 74 68 65 20 63 68 69 6c .you.async.operation.as.the.chil
e820 64 20 45 6d 61 63 73 20 77 69 6c 6c 0a 75 73 65 20 74 68 69 73 20 6a 75 73 74 20 63 72 65 61 74 d.Emacs.will.use.this.just.creat
e840 65 64 20 22 2e 61 75 74 68 69 6e 66 6f 22 20 66 69 6c 65 2c 20 69 66 20 79 6f 75 20 73 61 79 20 ed.".authinfo".file,.if.you.say.
e860 27 6e 6f 27 2c 20 79 6f 75 72 20 64 69 72 65 64 2d 61 73 79 6e 63 0a 70 72 6f 63 65 73 73 20 77 'no',.your.dired-async.process.w
e880 69 6c 6c 20 68 61 6e 67 20 66 6f 72 65 76 65 72 20 62 65 63 61 75 73 65 20 63 68 69 6c 64 20 65 ill.hang.forever.because.child.e
e8a0 6d 61 63 73 20 69 73 20 77 61 69 74 69 6e 67 20 66 6f 72 20 70 61 73 73 77 6f 72 64 2e 0a 0a 4e macs.is.waiting.for.password...N
e8c0 4f 54 45 3a 20 46 6f 72 20 61 6c 6c 20 79 6f 75 72 20 61 73 79 6e 63 20 69 6d 70 6c 65 6d 65 6e OTE:.For.all.your.async.implemen
e8e0 74 61 74 69 6f 6e 73 20 69 6e 20 65 6d 61 63 73 2d 32 36 2b 20 76 65 72 73 69 6f 6e 73 20 74 68 tations.in.emacs-26+.versions.th
e900 61 74 0a 68 61 6e 64 6c 65 20 72 65 6d 6f 74 65 20 66 69 6c 65 73 20 28 74 72 61 6d 70 29 2c 20 at.handle.remote.files.(tramp),.
e920 79 6f 75 20 77 69 6c 6c 20 68 61 76 65 20 74 6f 20 6c 65 74 2d 62 69 6e 64 0a 60 61 73 79 6e 63 you.will.have.to.let-bind.`async
e940 2d 71 75 69 65 74 2d 73 77 69 74 63 68 60 20 74 6f 20 60 2d 71 60 20 74 6f 20 77 6f 72 6b 61 72 -quiet-switch`.to.`-q`.to.workar
e960 6f 75 6e 64 20 61 20 74 72 61 6d 70 20 62 75 67 20 74 68 61 74 20 70 72 65 76 65 6e 74 20 60 65 ound.a.tramp.bug.that.prevent.`e
e980 6d 61 63 73 20 2d 51 60 20 74 6f 20 75 73 65 20 5b 61 75 74 68 2d 73 6f 75 72 63 65 73 5d 28 68 macs.-Q`.to.use.[auth-sources](h
e9a0 74 74 70 73 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 ttps://www.gnu.org/software/emac
e9c0 73 2f 6d 61 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 20 6d 65 s/manual/html_mono/auth.html).me
e9e0 63 68 61 6e 69 73 6d 2e 0a 0a 23 23 20 45 6e 61 62 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 chanism...##.Enable.asynchronous
ea00 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 20 6f 66 20 79 6f 75 72 20 28 4d 29 65 6c 70 61 20 70 61 63 .compilation.of.your.(M)elpa.pac
ea20 6b 61 67 65 73 0a 0a 42 79 20 64 65 66 61 75 6c 74 20 65 6d 61 63 73 20 70 61 63 6b 61 67 65 2e kages..By.default.emacs.package.
ea40 65 6c 20 63 6f 6d 70 69 6c 65 20 70 61 63 6b 61 67 65 73 20 69 6e 20 69 74 73 20 72 75 6e 6e 69 el.compile.packages.in.its.runni
ea60 6e 67 20 65 6d 61 63 73 20 73 65 73 73 69 6f 6e 2e 0a 54 68 69 73 20 69 73 20 6e 6f 74 20 61 20 ng.emacs.session..This.is.not.a.
ea80 70 72 6f 62 6c 65 6d 20 77 68 65 6e 20 69 6e 73 74 61 6c 6c 69 6e 67 20 61 20 6e 65 77 20 70 61 problem.when.installing.a.new.pa
eaa0 63 6b 61 67 65 20 28 77 68 69 63 68 20 69 73 20 6e 6f 74 20 61 63 74 75 61 6c 6c 79 20 6c 6f 61 ckage.(which.is.not.actually.loa
eac0 64 65 64 20 69 6e 20 63 75 72 72 65 6e 74 20 65 6d 61 63 73 29 0a 62 75 74 20 69 74 20 6d 61 79 ded.in.current.emacs).but.it.may
eae0 20 63 72 65 61 74 65 20 65 72 72 6f 72 73 20 61 6e 64 20 62 61 64 20 63 6f 6d 70 69 6c 61 74 69 .create.errors.and.bad.compilati
eb00 6f 6e 20 77 68 65 6e 20 75 70 67 72 61 64 69 6e 67 20 61 20 70 61 63 6b 61 67 65 20 28 6f 6c 64 on.when.upgrading.a.package.(old
eb20 20 76 65 72 73 69 6f 6e 20 6f 66 20 70 61 63 6b 61 67 65 20 69 73 20 61 6c 72 65 61 64 79 20 6c .version.of.package.is.already.l
eb40 6f 61 64 65 64 0a 61 6e 64 20 72 75 6e 6e 69 6e 67 20 69 6e 20 63 75 72 72 65 6e 74 20 65 6d 61 oaded.and.running.in.current.ema
eb60 63 73 29 2e 0a 59 6f 75 20 63 61 6e 20 72 65 6d 65 64 79 20 74 6f 20 74 68 69 73 20 62 79 20 61 cs)..You.can.remedy.to.this.by.a
eb80 6c 6c 6f 77 69 6e 67 20 61 73 79 6e 63 20 74 6f 20 63 6f 6d 70 69 6c 65 20 79 6f 75 72 20 70 61 llowing.async.to.compile.your.pa
eba0 63 6b 61 67 65 73 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2c 0a 28 68 65 6c 6d 20 61 6e 64 ckages.asynchronously,.(helm.and
ebc0 20 6d 61 67 69 74 20 61 63 74 75 61 6c 6c 79 20 64 6f 20 74 68 69 73 20 62 79 20 64 65 66 61 75 .magit.actually.do.this.by.defau
ebe0 6c 74 2c 0a 73 6f 20 69 66 20 79 6f 75 20 61 72 65 20 75 73 69 6e 67 20 74 68 65 73 65 20 70 61 lt,.so.if.you.are.using.these.pa
ec00 63 6b 61 67 65 73 20 74 68 65 79 20 77 69 6c 6c 20 63 6f 6d 70 69 6c 65 20 61 73 79 6e 63 68 72 ckages.they.will.compile.asynchr
ec20 6f 6e 6f 75 73 6c 79 29 0a 74 6f 20 64 6f 20 74 68 69 73 2c 20 61 64 64 20 74 6f 20 79 6f 75 72 onously).to.do.this,.add.to.your
ec40 20 69 6e 69 74 20 66 69 6c 65 3a 0a 20 20 20 20 0a 20 20 20 20 28 61 73 79 6e 63 2d 62 79 74 65 .init.file:..........(async-byte
ec60 63 6f 6d 70 2d 70 61 63 6b 61 67 65 2d 6d 6f 64 65 20 31 29 0a 0a 0a 59 6f 75 20 63 61 6e 20 63 comp-package-mode.1)...You.can.c
ec80 6f 6e 74 72 6f 6c 20 77 68 69 63 68 20 70 61 63 6b 61 67 65 73 20 77 69 6c 6c 20 63 6f 6d 70 69 ontrol.which.packages.will.compi
eca0 6c 65 20 61 73 79 6e 63 20 77 69 74 68 20 60 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c le.async.with.`async-bytecomp-al
ecc0 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 60 2e 0a 53 65 74 20 69 74 20 74 6f 20 60 27 28 61 6c lowed-packages`..Set.it.to.`'(al
ece0 6c 29 60 20 74 6f 20 62 65 20 73 75 72 65 20 79 6f 75 20 77 69 6c 6c 20 63 6f 6d 70 69 6c 65 20 l)`.to.be.sure.you.will.compile.
ed00 61 6c 6c 20 70 61 63 6b 61 67 65 73 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 0a 23 23 all.packages.asynchronously...##
ed20 20 49 6e 73 74 61 6c 6c 2f 75 70 67 72 61 64 65 20 70 61 63 6b 61 67 65 73 20 61 73 79 6e 63 68 .Install/upgrade.packages.asynch
ed40 72 6f 6e 6f 75 73 6c 79 0a 0a 57 68 65 6e 20 75 73 69 6e 67 20 60 61 73 79 6e 63 2d 62 79 74 65 ronously..When.using.`async-byte
ed60 63 6f 6d 70 2d 70 61 63 6b 61 67 65 2d 6d 6f 64 65 60 20 6f 6e 6c 79 20 63 6f 6d 70 69 6c 61 74 comp-package-mode`.only.compilat
ed80 69 6f 6e 20 69 73 20 64 6f 6e 65 0a 61 73 79 6e 63 2e 20 20 54 6f 20 64 6f 20 61 6c 6c 20 61 73 ion.is.done.async...To.do.all.as
eda0 79 6e 63 20 28 64 6f 77 6e 6c 6f 61 64 20 61 6e 64 20 28 72 65 29 69 6e 73 74 61 6c 6c 29 20 74 ync.(download.and.(re)install).t
edc0 68 65 20 66 75 6e 63 74 69 6f 6e 0a 60 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 64 6f 2d 61 63 he.function.`async-package-do-ac
ede0 74 69 6f 6e 60 20 69 73 20 70 72 6f 76 69 64 65 64 2c 20 69 74 20 69 73 20 75 73 65 64 20 62 79 tion`.is.provided,.it.is.used.by
ee00 20 48 65 6c 6d 20 70 61 63 6b 61 67 65 73 20 55 49 2e 0a 0a 23 23 20 53 65 6e 64 20 6d 61 69 6c .Helm.packages.UI...##.Send.mail
ee20 73 20 61 73 79 6e 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 s.asynchronously.with.smtp.mail.
ee40 61 73 79 6e 63 0a 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 async..To.enable.this.feature,.e
ee60 6e 73 75 72 65 20 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 nsure.smtp-mail-async.el.is.load
ee80 65 64 20 61 6e 64 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 ed.and.use..`(setq.message-send-
eea0 6d 61 69 6c 2d 66 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 mail-function.'async-smtpmail-se
eec0 6e 64 2d 69 74 29 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 nd-it)`...WARNINGS:..-.When.usin
eee0 67 20 72 65 63 65 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 g.recent.emacs.(25+).the.network
ef00 20 73 65 63 75 72 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 .security.manager.maybe.called.i
ef20 6e 74 65 72 61 63 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 nteractively.in.child.emacs.and.
ef40 6d 61 6b 65 20 60 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 make.`async-smtpmail-send-it`.fa
ef60 69 6c 2c 20 73 6f 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 il,.so.be.sure.to.send.email.onc
ef80 65 20 73 79 6e 63 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 e.synchronously.before.using.`as
efa0 79 6e 63 2d 73 6d 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 ync-smtpmail-send-it`.as.your.`m
efc0 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 60 2e 0a 0a 2d 20 59 essage-send-mail-function`...-.Y
efe0 6f 75 20 6d 61 79 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 ou.may.loose.your.sent.mail.if.y
f000 6f 75 72 20 6e 65 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 our.network.is.down,.so.ensure.t
f020 6f 0a 71 75 65 75 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 o.queue.your.mails.if.so...you.c
f040 61 6e 20 64 6f 20 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 an.do.this.automatically,.see.[i
f060 73 73 75 65 20 23 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 ssue.#64](https://github.com/jwi
f080 65 67 6c 65 79 2f 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 egley/emacs-async/issues/64)...#
f0a0 20 41 73 79 6e 63 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 .Async.usage..The.interface.is.i
f0c0 6e 74 65 6e 64 65 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 ntended.to.be.very.easy.to.use:.
f0e0 0a 23 23 20 61 73 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 .##.async-start......async-start
f100 20 53 54 41 52 54 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 .START-FUNC.FINISH-FUNC..Execute
f120 20 53 54 41 52 54 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 .START-FUNC.(often.a.lambda).in.
f140 61 20 73 75 62 6f 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 a.subordinate.Emacs.process...Wh
f160 65 6e 0a 64 6f 6e 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 en.done,.the.return.value.is.pas
f180 73 65 64 20 74 6f 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 sed.to.FINISH-FUNC...Example:..`
f1a0 60 60 65 6c 69 73 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 ``elisp.(async-start....;;.What.
f1c0 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 28 6c to.do.in.the.child.process....(l
f1e0 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 73 20 69 73 20 ambda.()......(message."This.is.
f200 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 0a 20 20 20 20 a.test")......(sleep-for.3).....
f220 20 32 32 32 29 0a 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 .222).....;;.What.to.do.when.it.
f240 66 69 6e 69 73 68 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 finishes....(lambda.(result)....
f260 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 20 ..(message."Async.process.done,.
f280 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
f2a0 29 29 29 0a 60 60 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 ))).```..If.FINISH-FUNC.is.`nil`
f2c0 20 6f 72 20 6d 69 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 .or.missing,.a.future.is.returne
f2e0 64 20 74 68 61 74 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 d.that.can.be.inspected.using.`a
f300 73 79 6e 63 2d 67 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 sync-get`,.blocking.until.the.va
f320 6c 75 65 20 69 73 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 lue.is.ready...Example:..```elis
f340 70 0a 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 p.(let.((proc.(async-start......
f360 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 68 65 20 63 ..........;;.What.to.do.in.the.c
f380 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 20 28 6c 61 6d hild.process................(lam
f3a0 62 64 61 20 28 29 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 bda.()..................(message
f3c0 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 20 20 20 20 20 20 20 ."This.is.a.test")..............
f3e0 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 20 20 20 20 20 ....(sleep-for.3)...............
f400 20 20 20 32 32 32 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 ...222))))......(message."I'm.go
f420 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 29 20 3b 3b 20 2e 2e ing.to.do.some.work.here").;;...
f440 2e 2e 0a 0a 20 20 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 ........(message."Waiting.on.asy
f460 6e 63 20 70 72 6f 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 nc.process,.result.should.be.222
f480 3a 20 25 73 22 0a 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 :.%s"..............(async-get.pr
f4a0 6f 63 29 29 29 0a 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 oc))).```..If.you.don't.want.to.
f4c0 75 73 65 20 61 20 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 use.a.callback,.and.you.don't.ca
f4e0 72 65 20 61 62 6f 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 re.about.any.return.value.from.t
f500 68 65 20 63 68 69 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 he.child.process,.pass.the.`'ign
f520 6f 72 65 60 20 73 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 ore`.symbol.as.the.second.argume
f540 6e 74 20 28 69 66 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 nt.(if.you.don't,.and.never.call
f560 20 60 61 73 79 6e 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 .`async-get`,.it.will.leave.``*e
f580 6d 61 63 73 2a 60 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 macs*``.process.buffers.hanging.
f5a0 61 72 6f 75 6e 64 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 around):..```elisp.(async-start.
f5c0 20 28 6c 61 6d 62 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 .(lambda.()....(delete-file."a.r
f5e0 65 6d 6f 74 65 20 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 emote.file.on.a.slow.link".nil))
f600 0a 20 27 69 67 6e 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 ..'ignore).```..Note:.Even.when.
f620 46 49 4e 49 53 48 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 FINISH-FUNC.is.present,.a.future
f640 20 69 73 20 73 74 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 .is.still.returned.except.that.i
f660 74 20 79 69 65 6c 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 t.yields.no.value.(since.the.val
f680 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 29 2e 20 20 43 ue.is.passed.to.FINISH-FUNC)...C
f6a0 61 6c 6c 69 6e 67 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 alling.`async-get`.on.such.a.fut
f6c0 75 72 65 20 61 6c 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 ure.always.returns.`nil`...It.ca
f6e0 6e 20 73 74 69 6c 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 n.still.be.useful,.however,.as.a
f700 6e 20 61 72 67 75 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 n.argument.to.`async-ready`.or.`
f720 61 73 79 6e 63 2d 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 async-wait`...##.async-start-pro
f740 63 65 73 73 0a 0a 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 cess......async-start-process.NA
f760 4d 45 20 50 52 4f 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 ME.PROGRAM.FINISH-FUNC.&rest.PRO
f780 47 52 41 4d 2d 41 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 GRAM-ARGS..Start.the.executable.
f7a0 50 52 4f 47 52 41 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 PROGRAM.asynchronously...See.`as
f7c0 79 6e 63 2d 73 74 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 ync-start`...PROGRAM.is.passed.P
f7e0 52 4f 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 ROGRAM-ARGS,.calling.FINISH-FUNC
f800 20 77 69 74 68 20 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 .with.the.process.object.when.do
f820 6e 65 2e 0a 49 66 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 ne..If.FINISH-FUNC.is.`nil`,.the
f840 20 66 75 74 75 72 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 .future.object.will.return.the.p
f860 72 6f 63 65 73 73 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 rocess.object.when.the.program.i
f880 73 20 66 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 s.finished...Set.DEFAULT-DIRECTO
f8a0 52 59 20 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 RY.to.change.PROGRAM's.current.w
f8c0 6f 72 6b 69 6e 67 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 orking.directory...##.async-get.
f8e0 0a 20 20 20 20 61 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 .....async-get.FUTURE..Get.the.v
f900 61 6c 75 65 20 66 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 alue.from.an.asynchronously.call
f920 65 64 20 66 75 6e 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 ed.function.when.it.is.ready...F
f940 55 54 55 52 45 20 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 UTURE.is.returned.by.`async-star
f960 74 60 20 6f 72 20 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 t`.or.`async-start-process`.when
f980 20 69 74 73 20 46 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 .its.FINISH-FUNC.is.`nil`...##.a
f9a0 73 79 6e 63 2d 72 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 sync-ready......async-ready.FUTU
f9c0 52 45 0a 0a 51 75 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 RE..Query.a.FUTURE.to.see.if.its
f9e0 20 66 75 6e 63 74 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 .function's.value.is.ready.--.i.
fa00 65 2e 2c 20 69 66 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 e.,.if.no.blocking.would.result.
fa20 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 60 20 6f 6e 20 74 68 from.a.call.to.`async-get`.on.th
fa40 61 74 20 46 55 54 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 at.FUTURE...##.async-wait......a
fa60 73 79 6e 63 2d 77 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 sync-wait.FUTURE..Wait.for.FUTUR
fa80 45 20 74 6f 20 62 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 E.to.become.ready...##.async-inj
faa0 65 63 74 2d 76 61 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 ect-variables......async-inject-
fac0 76 61 72 69 61 62 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 variables.INCLUDE-REGEXP.&option
fae0 61 6c 20 50 52 45 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 al.PREDICATE.EXCLUDE-REGEXP..Ret
fb00 75 72 6e 20 61 20 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 urn.a.`setq`.form.that.replicate
fb20 73 20 70 61 72 74 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 s.part.of.the.calling.environmen
fb40 74 2e 20 20 49 74 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 t...It.sets.the.value.for.every.
fb60 76 61 72 69 61 62 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 variable.matching.INCLUDE-REGEXP
fb80 20 61 6e 64 20 61 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 .and.also.PREDICATE...It.will.no
fba0 74 20 70 65 72 66 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 t.perform.injection.for.any.vari
fbc0 61 62 6c 65 20 6d 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 able.matching.EXCLUDE-REGEXP.(if
fbe0 0a 70 72 65 73 65 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 .present)...It.is.intended.to.be
fc00 20 75 73 65 64 20 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 .used.as.follows:..```elisp.(asy
fc20 6e 63 2d 73 74 61 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 nc-start....`(lambda.().......(r
fc40 65 71 75 69 72 65 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 equire.'smtpmail).......(with-te
fc60 6d 70 2d 62 75 66 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 mp-buffer.........(insert.,(buff
fc80 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 6e er-substring-no-properties.(poin
fca0 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 3b 3b 20 t-min).(point-max))).........;;.
fcc0 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 6e 6d 65 6e 74 Pass.in.the.variable.environment
fce0 20 66 6f 72 20 73 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 .for.smtpmail.........,(async-in
fd00 6a 65 63 74 2d 76 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 ject-variables."\\`\\(smtpmail\\
fd20 7c 5c 5c 28 75 73 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 |\\(user-\\)?mail\\)-").........
fd40 28 73 6d 74 70 6d 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 (smtpmail-send-it)))....'ignore)
fd60 0a 60 60 60 0a 0a 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 .```..##.async-let......async-le
fd80 74 20 42 49 4e 44 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 t.BINDINGS.&rest.FORMS......Allo
fda0 77 20 74 6f 20 65 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 w.to.establish.let.bindings.asyn
fdc0 63 68 72 6f 6e 6f 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 chronously..Each.value.of.bindin
fde0 67 20 63 61 6e 20 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 g.can.refer.to.the.symbols.alrea
fe00 64 79 20 62 6f 75 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 dy.bound.in.BINDINGS.(like.`let*
fe20 60 29 2e 0a 46 4f 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 `)..FORMS.are.executed.once.BIND
fe40 49 4e 47 53 20 68 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 INGS.have.been.evaluated,.but.wi
fe60 74 68 6f 75 74 20 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 thout.blocking.emacs...Examples:
fe80 0a 0a 60 60 60 65 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 ..```elisp.(async-let.((x."hello
fea0 22 29 0a 20 20 20 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 ").............(y."world"))...(m
fec0 65 73 73 61 67 65 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 essage."%s.%s".x.y))....(async-l
fee0 65 74 20 28 28 78 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 et.((x.(*.5.2)).............(y.(
ff00 2b 20 78 20 34 29 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 +.x.4)).............(z.(+.x.y)))
ff20 0a 20 20 28 6d 65 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 ...(message."%d.+.%d.=.%d".x.y.z
ff40 29 29 0a 0a 60 60 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 ))..```..Note.that.if.you.bind.s
ff60 6f 6d 65 74 68 69 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 omething.to.nil.and.set.it.after
ff80 77 61 72 64 20 69 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 ward.in.body,.the.evaluation.of.
ffa0 74 68 69 73 20 62 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 this.binding.will.NOT.be.asynchr
ffc0 6f 6e 6f 75 73 2c 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 onous,.but.will.happen.in.you.cu
ffe0 72 72 65 6e 74 20 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 rrent.emacs,.blocking.it.if.the.
10000 65 76 61 6c 75 61 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 evaluation.of.this.value.is.suff
10020 69 63 69 65 6e 74 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 iciently.important,.e.g:..```eli
10040 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 20 20 sp.(async-let.((x."hello")......
10060 20 20 20 20 20 20 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 .......(y."world").............z
10080 29 0a 20 20 28 73 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 )...(setq.z.(+.1.2)).;;.Huge.cal
100a0 63 75 6c 61 74 69 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 culation.of.Z.will.block.emacs..
100c0 20 20 28 6d 65 73 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 ..(message."%s.%s.%d".x.y.z))..`
100e0 60 60 0a 0a 49 4f 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 ``..IOW.if.the.calculation.of.Z.
10100 69 73 20 68 75 67 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 is.huge.and.you.want.it.asynchro
10120 6e 6f 75 73 20 65 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 nous.evaluate.it.in.BINDINGS.but
10140 20 6e 6f 74 20 69 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 .not.in.FORMS...................
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 39 2f 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2e 65 6c 00 00 00 00 async-1.9.9/async-package.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 31 33 31 30 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 33 33 34 00 20 30 00 00 00 0013103.00000000000.014334..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 2d 70 61 63 6b 61 67 65 2e 65 6c 20 2d 2d 2d 20 46 65 74 63 68 20 70 ;;;.async-package.el.---.Fetch.p
10420 61 63 6b 61 67 65 73 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 2d 2a 2d 20 6c 65 78 69 63 ackages.asynchronously.-*-.lexic
10440 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 72 69 67 68 74 20 al-binding:.t.-*-..;;.Copyright.
10460 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 65 20 46 6f 75 6e (C).2014-2022.Free.Software.Foun
10480 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 54 68 69 65 72 72 79 dation,.Inc...;;.Author:.Thierry
104a0 20 56 6f 6c 70 69 61 74 74 6f 20 3c 74 68 69 65 76 6f 6c 40 70 6f 73 74 65 6f 2e 6e 65 74 3e 0a .Volpiatto.<thievol@posteo.net>.
104c0 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 64 69 72 65 64 20 61 73 79 6e 63 20 62 79 74 65 2d 63 .;;.Keywords:.dired.async.byte-c
104e0 6f 6d 70 69 6c 65 20 70 61 63 6b 61 67 65 0a 3b 3b 20 58 2d 55 52 4c 3a 20 68 74 74 70 73 3a 2f ompile.package.;;.X-URL:.https:/
10500 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 6e 63 /github.com/jwiegley/emacs-async
10520 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 77 61 ..;;.This.program.is.free.softwa
10540 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 64 2f re;.you.can.redistribute.it.and/
10560 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 73 20 or.modify.;;.it.under.the.terms.
10580 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 6e 73 of.the.GNU.General.Public.Licens
105a0 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 53 6f e.as.published.by.;;.the.Free.So
105c0 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 69 6f ftware.Foundation,.either.versio
105e0 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 79 6f n.3.of.the.License,.or.;;.(at.yo
10600 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 0a 3b ur.option).any.later.version...;
10620 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 69 6e ;.This.program.is.distributed.in
10640 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
10660 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 20 77 ,.;;.but.WITHOUT.ANY.WARRANTY;.w
10680 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
106a0 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 45 53 .of.;;.MERCHANTABILITY.or.FITNES
106c0 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
106e0 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 65 6e .the.;;.GNU.General.Public.Licen
10700 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 68 6f se.for.more.details...;;.You.sho
10720 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 65 20 uld.have.received.a.copy.of.the.
10740 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 61 6c GNU.General.Public.License.;;.al
10760 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 2c 20 ong.with.this.program...If.not,.
10780 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 73 65 see.<https://www.gnu.org/license
107a0 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 50 72 6f 76 69 64 s/>...;;;.Commentary:..;;.Provid
107c0 65 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 60 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 64 6f e.the.function.`async-package-do
107e0 2d 61 63 74 69 6f 6e 27 20 74 6f 0a 3b 3b 20 28 72 65 29 69 6e 73 74 61 6c 6c 2f 75 70 67 72 61 -action'.to.;;.(re)install/upgra
10800 64 65 20 70 61 63 6b 61 67 65 73 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 0a 3b 3b 3b de.packages.asynchronously...;;;
10820 20 43 6f 64 65 3a 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 72 65 71 75 .Code:..(eval-when-compile.(requ
10840 69 72 65 20 27 63 6c 2d 6c 69 62 29 29 0a 28 72 65 71 75 69 72 65 20 27 61 73 79 6e 63 2d 62 79 ire.'cl-lib)).(require.'async-by
10860 74 65 63 6f 6d 70 29 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d 61 73 79 6e 63 29 0a 28 tecomp).(require.'dired-async).(
10880 72 65 71 75 69 72 65 20 27 70 61 63 6b 61 67 65 29 0a 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 require.'package)..(define-minor
108a0 2d 6d 6f 64 65 20 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f -mode.async-package--modeline-mo
108c0 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
108e0 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 72 6f 75 70 20 27 61 .async.process.run."...:group.'a
10900 73 79 6e 63 0a 20 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 3a 6c 69 67 68 74 65 72 20 28 3a 65 76 sync...:global.t...:lighter.(:ev
10920 61 6c 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 20 5b 25 73 20 61 73 79 al.(propertize.(format.".[%s.asy
10940 6e 63 20 6a 6f 62 20 49 6e 73 74 61 6c 6c 69 6e 67 20 70 61 63 6b 61 67 65 28 73 29 5d 22 0a 20 nc.job.Installing.package(s)]"..
10960 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 ................................
10980 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 72 6f 63 65 73 .....(length.(dired-async-proces
109a0 73 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 20 20 20 ses.............................
109c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 61 73 79 6e 63 2d 70 6b 67 2d 69 6e ...................'async-pkg-in
109e0 73 74 61 6c 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 stall)))........................
10a00 20 20 20 20 20 20 20 27 66 61 63 65 20 27 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 6d 65 73 73 .......'face.'async-package-mess
10a20 61 67 65 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 2d 6d age))...(unless.async-package--m
10a40 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 62 6c 65 2d odeline-mode.....(let.((visible-
10a60 62 65 6c 6c 20 74 29 29 20 28 64 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 61 73 79 6e bell.t)).(ding))))..(defvar.asyn
10a80 63 2d 70 6b 67 2d 69 6e 73 74 61 6c 6c 2d 61 66 74 65 72 2d 68 6f 6f 6b 20 6e 69 6c 0a 20 20 22 c-pkg-install-after-hook.nil..."
10aa0 48 6f 6f 6b 20 74 68 61 74 20 72 75 6e 20 61 66 74 65 72 20 70 61 63 6b 61 67 65 20 69 6e 73 74 Hook.that.run.after.package.inst
10ac0 61 6c 6c 61 74 69 6f 6e 2e 0a 54 68 65 20 68 6f 6f 6b 20 72 75 6e 73 20 69 6e 20 74 68 65 20 63 allation..The.hook.runs.in.the.c
10ae0 61 6c 6c 2d 62 61 63 6b 20 6f 6e 63 65 20 69 6e 73 74 61 6c 6c 61 74 69 6f 6e 20 69 73 20 64 6f all-back.once.installation.is.do
10b00 6e 65 20 69 6e 20 63 68 69 6c 64 20 65 6d 61 63 73 2e 22 29 0a 0a 28 64 65 66 66 61 63 65 20 61 ne.in.child.emacs.")..(defface.a
10b20 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 27 28 28 74 20 28 3a sync-package-message.....'((t.(:
10b40 66 6f 72 65 67 72 6f 75 6e 64 20 22 79 65 6c 6c 6f 77 22 29 29 29 0a 20 20 22 46 61 63 65 20 75 foreground."yellow")))..."Face.u
10b60 73 65 64 20 66 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 sed.for.mode-line.message.")..(d
10b80 65 66 75 6e 20 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 64 6f 2d 61 63 74 69 6f 6e 20 28 61 63 efun.async-package-do-action.(ac
10ba0 74 69 6f 6e 20 70 61 63 6b 61 67 65 73 20 65 72 72 6f 72 2d 66 69 6c 65 29 0a 20 20 22 45 78 65 tion.packages.error-file)..."Exe
10bc0 63 75 74 65 20 41 43 54 49 4f 4e 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 6f 6e 20 50 41 cute.ACTION.asynchronously.on.PA
10be0 43 4b 41 47 45 53 2e 0a 41 72 67 75 6d 65 6e 74 20 41 43 54 49 4f 4e 20 63 61 6e 20 62 65 20 6f CKAGES..Argument.ACTION.can.be.o
10c00 6e 65 20 6f 66 20 5c 5c 3d 27 69 6e 73 74 61 6c 6c 2c 20 5c 5c 3d 27 75 70 67 72 61 64 65 2c 20 ne.of.\\='install,.\\='upgrade,.
10c20 5c 5c 3d 27 72 65 69 6e 73 74 61 6c 6c 2e 0a 41 72 67 75 6d 65 6e 74 20 50 41 43 4b 41 47 45 53 \\='reinstall..Argument.PACKAGES
10c40 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 70 61 63 6b 61 67 65 73 20 28 73 79 6d 62 6f 6c 73 29 .is.a.list.of.packages.(symbols)
10c60 2e 0a 41 72 67 75 6d 65 6e 74 20 45 52 52 4f 52 2d 46 49 4c 45 20 69 73 20 74 68 65 20 66 69 6c ..Argument.ERROR-FILE.is.the.fil
10c80 65 20 77 68 65 72 65 20 65 72 72 6f 72 73 20 61 72 65 20 6c 6f 67 67 65 64 2c 20 69 66 20 73 6f e.where.errors.are.logged,.if.so
10ca0 6d 65 2e 22 0a 20 20 28 72 65 71 75 69 72 65 20 27 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 29 me."...(require.'async-bytecomp)
10cc0 0a 20 20 28 6c 65 74 20 28 28 66 6e 20 28 70 63 61 73 65 20 61 63 74 69 6f 6e 0a 20 20 20 20 20 ...(let.((fn.(pcase.action......
10ce0 20 20 20 20 20 20 20 20 20 28 27 69 6e 73 74 61 6c 6c 20 27 70 61 63 6b 61 67 65 2d 69 6e 73 74 .........('install.'package-inst
10d00 61 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 75 70 67 72 61 64 65 20 27 70 61 all)...............('upgrade.'pa
10d20 63 6b 61 67 65 2d 75 70 67 72 61 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 72 ckage-upgrade)...............('r
10d40 65 69 6e 73 74 61 6c 6c 20 27 70 61 63 6b 61 67 65 2d 72 65 69 6e 73 74 61 6c 6c 29 29 29 0a 20 einstall.'package-reinstall)))..
10d60 20 20 20 20 20 20 20 28 61 63 74 69 6f 6e 2d 73 74 72 69 6e 67 20 28 70 63 61 73 65 20 61 63 74 .......(action-string.(pcase.act
10d80 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 28 27 69 ion..........................('i
10da0 6e 73 74 61 6c 6c 20 22 49 6e 73 74 61 6c 6c 69 6e 67 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 nstall."Installing")............
10dc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 75 70 67 72 61 64 65 20 22 55 70 67 72 61 64 69 ..............('upgrade."Upgradi
10de0 6e 67 22 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 28 27 ng")..........................('
10e00 72 65 69 6e 73 74 61 6c 6c 20 22 52 65 69 6e 73 74 61 6c 6c 69 6e 67 22 29 29 29 29 0a 20 20 20 reinstall."Reinstalling"))))....
10e20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 25 73 20 70 61 63 6b 61 67 65 28 73 29 2e 2e 2e 22 20 .(message."%s.%s.package(s)...".
10e40 61 63 74 69 6f 6e 2d 73 74 72 69 6e 67 20 28 6c 65 6e 67 74 68 20 70 61 63 6b 61 67 65 73 29 29 action-string.(length.packages))
10e60 0a 20 20 20 20 28 70 72 6f 63 65 73 73 2d 70 75 74 0a 20 20 20 20 20 28 61 73 79 6e 63 2d 73 74 .....(process-put......(async-st
10e80 61 72 74 0a 20 20 20 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 28 art.......`(lambda.()..........(
10ea0 72 65 71 75 69 72 65 20 27 62 79 74 65 63 6f 6d 70 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 require.'bytecomp)..........(set
10ec0 71 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 73 20 27 2c 70 61 63 6b 61 67 65 2d 61 72 63 q.package-archives.',package-arc
10ee0 68 69 76 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 70 69 6e hives................package-pin
10f00 6e 65 64 2d 70 61 63 6b 61 67 65 73 20 27 2c 70 61 63 6b 61 67 65 2d 70 69 6e 6e 65 64 2d 70 61 ned-packages.',package-pinned-pa
10f20 63 6b 61 67 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 61 72 ckages................package-ar
10f40 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 20 27 2c 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 chive-contents.',package-archive
10f60 2d 63 6f 6e 74 65 6e 74 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 -contents................package
10f80 2d 75 73 65 72 2d 64 69 72 20 2c 70 61 63 6b 61 67 65 2d 75 73 65 72 2d 64 69 72 0a 20 20 20 20 -user-dir.,package-user-dir.....
10fa0 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 20 27 2c 70 61 63 6b 61 ...........package-alist.',packa
10fc0 67 65 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 6f 61 64 2d 70 61 74 ge-alist................load-pat
10fe0 68 20 27 2c 6c 6f 61 64 2d 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 31 0a 20 h.',load-path)..........(prog1..
11000 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 65 72 72 0a ............(condition-case.err.
11020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 20 27 2c 66 6e 20 27 2c 70 61 .................(mapc.',fn.',pa
11040 63 6b 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 0a 20 20 ckages)................(error...
11060 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 65 ..............(with-temp-file.,e
11080 72 72 6f 72 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 rror-file...................(ins
110a0 65 72 74 0a 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 0a 20 ert....................(format..
110c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 53 3a 5c 6e 20 50 6c 65 61 73 65 ..................."%S:\n.Please
110e0 20 72 65 66 72 65 73 68 20 70 61 63 6b 61 67 65 20 6c 69 73 74 20 62 65 66 6f 72 65 20 25 73 22 .refresh.package.list.before.%s"
11100 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 72 72 20 2c 61 63 74 69 6f 6e .....................err.,action
11120 2d 73 74 72 69 6e 67 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 65 72 -string)))))............(let.(er
11140 72 6f 72 2d 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 ror-data)..............(when.(ge
11160 74 2d 62 75 66 66 65 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 t-buffer.byte-compile-log-buffer
11180 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 72 72 6f 72 2d 64 61 74 )................(setq.error-dat
111a0 61 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 79 74 65 2d 63 6f 6d 70 a.(with-current-buffer.byte-comp
111c0 69 6c 65 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 20 ile-log-buffer..................
111e0 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 73 75 62 73 74 72 69 .................(buffer-substri
11200 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ng-no-properties................
11220 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 6d 69 6e 29 20 ....................(point-min).
11240 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 20 20 20 28 75 (point-max))))................(u
11260 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 20 nless.(string=.error-data."")...
11280 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 66 69 6c 65 20 2c ...............(with-temp-file.,
112a0 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 0a 20 20 20 20 async-byte-compile-log-file.....
112c0 20 20 20 20 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 ...............(erase-buffer)...
112e0 20 20 20 20 20 20 20 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 .................(insert.error-d
11300 61 74 61 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 73 75 6c 74 ata))))))).......(lambda.(result
11320 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 65 72 72 ).........(if.(file-exists-p.err
11340 6f 72 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 20 or-file).............(let.((buf.
11360 28 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 20 65 72 72 6f 72 2d 66 69 6c 65 29 29 (find-file-noselect.error-file))
11380 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 0a 20 )...............(pop-to-buffer..
113a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 75 66 20 27 28 6e 69 6c 20 2e 20 28 28 77 69 6e 64 ..............buf.'(nil...((wind
113c0 6f 77 2d 68 65 69 67 68 74 20 2e 20 66 69 74 2d 77 69 6e 64 6f 77 2d 74 6f 2d 62 75 66 66 65 72 ow-height...fit-window-to-buffer
113e0 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 65 63 69 61 6c 2d 6d 6f 64 65 ))))...............(special-mode
11400 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 65 72 72 )...............(delete-file.err
11420 6f 72 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 70 61 or-file)...............(async-pa
11440 63 6b 61 67 65 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f 64 65 20 2d 31 29 29 0a 20 20 20 20 20 20 ckage--modeline-mode.-1)).......
11460 20 20 20 20 28 77 68 65 6e 20 72 65 73 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 ....(when.result.............(le
11480 74 20 28 28 70 6b 67 73 20 28 69 66 20 28 6c 69 73 74 70 20 72 65 73 75 6c 74 29 20 72 65 73 75 t.((pkgs.(if.(listp.result).resu
114a0 6c 74 20 28 6c 69 73 74 20 72 65 73 75 6c 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 lt.(list.result)))).............
114c0 20 20 28 77 68 65 6e 20 28 65 71 20 61 63 74 69 6f 6e 20 27 69 6e 73 74 61 6c 6c 29 0a 20 20 20 ..(when.(eq.action.'install)....
114e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 73 74 6f 6d 69 7a 65 2d 73 61 76 65 2d 76 61 72 .............(customize-save-var
11500 69 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 61 63 6b 61 67 65 2d iable..................'package-
11520 73 65 6c 65 63 74 65 64 2d 70 61 63 6b 61 67 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 selected-packages...............
11540 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 28 61 70 70 65 6e 64 20 70 6b 67 73 20 70 61 63 ...(delete-dups.(append.pkgs.pac
11560 6b 61 67 65 2d 73 65 6c 65 63 74 65 64 2d 70 61 63 6b 61 67 65 73 29 29 29 29 0a 20 20 20 20 20 kage-selected-packages))))......
11580 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 6c 6f 61 64 2d 61 6c 6c 2d 64 65 73 63 72 .........(package-load-all-descr
115a0 69 70 74 6f 72 73 29 20 3b 20 72 65 66 72 65 73 68 20 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 2e iptors).;.refresh.package-alist.
115c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 20 23 27 70 61 63 6b 61 67 65 2d 61 ...............(mapc.#'package-a
115e0 63 74 69 76 61 74 65 20 70 6b 67 73 29 20 3b 20 6c 6f 61 64 20 70 61 63 6b 61 67 65 73 2e 0a 20 ctivate.pkgs).;.load.packages...
11600 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 2d 6d 6f 64 .............(async-package--mod
11620 65 6c 69 6e 65 2d 6d 6f 64 65 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 eline-mode.-1)...............(me
11640 73 73 61 67 65 20 22 25 73 20 25 73 20 70 61 63 6b 61 67 65 73 20 64 6f 6e 65 22 20 61 63 74 69 ssage."%s.%s.packages.done".acti
11660 6f 6e 2d 73 74 72 69 6e 67 20 28 6c 65 6e 67 74 68 20 70 61 63 6b 61 67 65 73 29 29 0a 20 20 20 on-string.(length.packages))....
11680 20 20 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d 77 69 74 68 2d 74 69 6d 65 72 0a 20 20 20 20 20 ...........(run-with-timer......
116a0 20 20 20 20 20 20 20 20 20 20 30 2e 31 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..........0.1.nil...............
116c0 20 28 6c 61 6d 62 64 61 20 28 6c 73 74 20 73 74 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(lambda.(lst.str)..............
116e0 20 20 20 20 28 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 ....(dired-async-mode-line-messa
11700 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 73 20 25 64 20 70 61 63 6b ge..................."%s.%d.pack
11720 61 67 65 28 73 29 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 age(s).done"...................'
11740 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 async-package-message...........
11760 20 20 20 20 20 20 20 20 73 74 72 20 28 6c 65 6e 67 74 68 20 6c 73 74 29 29 29 0a 20 20 20 20 20 ........str.(length.lst)))......
11780 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 73 20 61 63 74 69 6f 6e 2d 73 74 72 69 6e 67 ..........packages.action-string
117a0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69 73 )...............(when.(file-exis
117c0 74 73 2d 70 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 ts-p.async-byte-compile-log-file
117e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 67 65 ).................(let.((buf.(ge
11800 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 t-buffer-create.byte-compile-log
11820 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 -buffer)))...................(wi
11840 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 20 20 th-current-buffer.buf...........
11860 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 61 78 29 ..........(goto-char.(point-max)
11880 29 0a 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 28 69 6e 68 ).....................(let.((inh
118a0 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 20 20 20 20 20 20 ibit-read-only.t))..............
118c0 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 6e 74 73 20 61 .........(insert-file-contents.a
118e0 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 0a 20 20 20 20 sync-byte-compile-log-file).....
11900 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 6f 6e 2d 6d ..................(compilation-m
11920 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 20 28 64 69 73 70 6c ode)).....................(displ
11940 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 20 20 20 ay-buffer.buf)..................
11960 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 70 69 ...(delete-file.async-byte-compi
11980 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 72 75 6e 2d le-log-file))))))).........(run-
119a0 68 6f 6f 6b 73 20 27 61 73 79 6e 63 2d 70 6b 67 2d 69 6e 73 74 61 6c 6c 2d 61 66 74 65 72 2d 68 hooks.'async-pkg-install-after-h
119c0 6f 6f 6b 29 29 29 0a 20 20 20 20 20 27 61 73 79 6e 63 2d 70 6b 67 2d 69 6e 73 74 61 6c 6c 20 74 ook)))......'async-pkg-install.t
119e0 29 0a 20 20 20 20 28 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d ).....(async-package--modeline-m
11a00 6f 64 65 20 31 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 61 73 79 6e 63 2d 70 61 63 6b 61 67 ode.1)))..(provide.'async-packag
11a20 65 29 0a 0a 3b 3b 3b 20 61 73 79 6e 63 2d 70 61 63 6b 61 67 65 2e 65 6c 20 65 6e 64 73 20 68 65 e)..;;;.async-package.el.ends.he
11a40 72 65 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 00 00 re..............................
11a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11c00 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 61 73 79 6e 63 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 async-1.9.9/async.el............
11c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11c60 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
11c80 30 30 35 36 37 33 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 37 36 32 00 20 30 00 00 00 0056732.00000000000.012762..0...
11ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11d00 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...................
11d20 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...................
11d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
11e00 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
11e20 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
11e40 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
11e60 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
11e80 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
11ea0 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
11ec0 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@
11ee0 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.
11f00 32 30 31 32 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 31 2e 39 2e 39 0a 3b 3b 20 50 61 63 6b 61 67 2012.;;.Version:.1.9.9.;;.Packag
11f20 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"))..;;
11f40 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
11f60 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
11f80 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
11fa0 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
11fc0 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
11fe0 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
12000 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.
12020 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
12040 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.
12060 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..
12080 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.
120a0 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
120c0 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;
120e0 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
12100 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
12120 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
12140 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
12160 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
12180 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
121a0 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.;;.
121c0 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
121e0 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
12200 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
12220 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
12240 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
12260 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
12280 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
122a0 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
122c0 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))..(
122e0 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
12300 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
12320 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
12340 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
12360 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
12380 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.
123a0 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
123c0 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
123e0 69 6f 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 73 79 6e 63 2d 70 72 6f 6d 70 74 2d 66 6f ion)..(defcustom.async-prompt-fo
12400 72 2d 70 61 73 73 77 6f 72 64 20 74 0a 20 20 22 50 72 6f 6d 70 74 20 66 6f 72 20 70 61 73 73 77 r-password.t..."Prompt.for.passw
12420 6f 72 64 20 69 6e 20 70 61 72 65 6e 74 20 45 6d 61 63 73 20 69 66 20 6e 65 65 64 65 64 20 77 68 ord.in.parent.Emacs.if.needed.wh
12440 65 6e 20 6e 6f 6e 20 6e 69 6c 2e 0a 57 68 65 6e 20 74 68 69 73 20 69 73 20 6e 69 6c 20 63 68 69 en.non.nil..When.this.is.nil.chi
12460 6c 64 20 45 6d 61 63 73 20 77 69 6c 6c 20 68 61 6e 67 20 66 6f 72 65 76 65 72 20 77 68 65 6e 20 ld.Emacs.will.hang.forever.when.
12480 61 20 75 73 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 0a 66 6f 72 20 70 61 73 73 77 6f 72 64 20 a.user.interaction.for.password.
124a0 69 73 20 72 65 71 75 69 72 65 64 20 75 6e 6c 65 73 73 20 61 20 70 61 73 73 77 6f 72 64 20 69 73 is.required.unless.a.password.is
124c0 20 73 74 6f 72 65 64 20 69 6e 20 61 20 5c 22 2e 61 75 74 68 69 6e 66 6f 5c 22 20 66 69 6c 65 2e .stored.in.a.\".authinfo\".file.
124e0 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 76 61 72 20 61 73 79 "...:type.'boolean)..(defvar.asy
12500 6e 63 2d 70 72 6f 63 65 73 73 2d 6e 6f 71 75 65 72 79 2d 6f 6e 2d 65 78 69 74 20 6e 69 6c 0a 20 nc-process-noquery-on-exit.nil..
12520 20 22 55 73 65 64 20 61 73 20 74 68 65 20 3a 6e 6f 71 75 65 72 79 20 61 72 67 75 6d 65 6e 74 20 ."Used.as.the.:noquery.argument.
12540 74 6f 20 60 6d 61 6b 65 2d 70 72 6f 63 65 73 73 27 2e 0a 0a 49 6e 74 65 6e 64 65 64 20 74 6f 20 to.`make-process'...Intended.to.
12560 62 65 20 6c 65 74 2d 62 6f 75 6e 64 20 61 72 6f 75 6e 64 20 61 20 63 61 6c 6c 20 74 6f 20 60 61 be.let-bound.around.a.call.to.`a
12580 73 79 6e 63 2d 73 74 61 72 74 27 20 6f 72 0a 60 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 sync-start'.or.`async-start-proc
125a0 65 73 73 27 2e 20 20 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 20 63 68 69 6c 64 20 45 6d 61 ess'...If.non-nil,.the.child.Ema
125c0 63 73 20 70 72 6f 63 65 73 73 20 77 69 6c 6c 0a 62 65 20 73 69 6c 65 6e 74 6c 79 20 6b 69 6c 6c cs.process.will.be.silently.kill
125e0 65 64 20 69 66 20 74 68 65 20 75 73 65 72 20 65 78 69 74 73 20 74 68 65 20 70 61 72 65 6e 74 20 ed.if.the.user.exits.the.parent.
12600 45 6d 61 63 73 2e 22 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 Emacs.")..(defvar.async-debug.ni
12620 6c 29 0a 28 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 l).(defvar.async-send-over-pipe.
12640 74 29 0a 28 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 t).(defvar.async-in-child-emacs.
12660 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 20 6e 69 6c 29 nil).(defvar.async-callback.nil)
12680 0a 28 64 65 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 .(defvar.async-callback-for-proc
126a0 65 73 73 20 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 ess.nil..."Non-nil.if.the.subpro
126c0 63 65 73 73 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 cess.is.not.Emacs.executing.a.li
126e0 73 70 20 66 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 sp.form.").(defvar.async-callbac
12700 6b 2d 76 61 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 k-value.nil).(defvar.async-callb
12720 61 63 6b 2d 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 ack-value-set.nil).(defvar.async
12740 2d 63 75 72 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 -current-process.nil).(defvar.as
12760 79 6e 63 2d 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 ync--procvar.nil).(defvar.async-
12780 72 65 61 64 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 read-marker.nil..."Position.from
127a0 20 77 68 69 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 .which.we.read.the.last.message.
127c0 70 61 63 6b 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 packet...Message.packets.are.del
127e0 69 76 65 72 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 ivered.from.client.line-by-line.
12800 61 73 20 62 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 as.base64.encoded.strings.").(de
12820 66 76 61 72 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 fvar.async-child-init.nil..."Ini
12840 74 69 61 6c 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 tialisation.file.for.async.child
12860 20 45 6d 61 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 .Emacs...If.defined.this.allows.
12880 66 6f 72 20 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 for.an.init.file.to.setup.the.ch
128a0 69 6c 64 20 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 ild.Emacs..It.should.not.be.your
128c0 20 6e 6f 72 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 .normal.init.el.as.that.would.li
128e0 6b 65 6c 79 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 kely.load.more.things.that.you.r
12900 65 71 75 69 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 equire..It.should.limit.itself.t
12920 6f 20 65 6e 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 o.ensuring.paths.have.been.setup
12940 20 73 6f 20 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 .so.any.async.code.can.load.libr
12960 61 72 69 65 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 aries.you.expect.")..;;.For.emac
12980 73 3c 32 39 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 s<29.(only.exists.in.emacs-29+).
129a0 0a 28 64 65 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 .(defvar.print-symbols-bare)..(d
129c0 65 66 75 6e 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 efun.async--purecopy.(object)...
129e0 22 52 65 6d 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 "Remove.text.properties.in.OBJEC
12a00 54 2e 0a 0a 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 T...Argument.OBJECT.may.be.a.lis
12a20 74 20 6f 72 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 t.or.a.string,.if.anything.else.
12a40 69 74 0a 69 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 it.is.returned.unmodified."...(c
12a60 6f 6e 64 20 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 ond.((stringp.object)..........(
12a80 73 75 62 73 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 substring-no-properties.object))
12aa0 0a 20 20 20 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 .........((consp.object)........
12ac0 20 20 28 63 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 ..(cl-loop.for.elm.in.object....
12ae0 20 20 20 20 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 ...............;;.A.string......
12b00 20 20 20 20 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 ..............if.(stringp.elm)..
12b20 20 20 20 20 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 .................collect.(substr
12b40 69 6e 67 2d 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 ing-no-properties.elm)..........
12b60 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 20 20 20 20 20 .........else...................
12b80 3b 3b 20 50 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 ;;.Proper.lists.................
12ba0 20 20 20 69 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 ...if.(and.(consp.elm).(null.(cd
12bc0 72 20 28 6c 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 r.(last.elm)))).................
12be0 20 20 63 6f 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 ..collect.(async--purecopy.elm).
12c00 20 20 20 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 ..................else..........
12c20 20 20 20 20 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 .........;;.Dotted.lists........
12c40 20 20 20 20 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 ............;;.We.handle.here.on
12c60 6c 79 20 64 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 ly.dotted.list.where.car.and.cdr
12c80 0a 20 20 20 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 ...................;;.are.atoms.
12ca0 69 2e 65 2e 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 i.e..(x...y).and.not.(x...(x...y
12cc0 29 29 20 6f 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 )).or...................;;.(x...
12ce0 28 78 20 79 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 (x.y)).which.should.fit.most.cas
12d00 65 73 2e 0a 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 es....................if.(and.(c
12d20 6f 6e 73 70 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 onsp.elm).(cdr.(last.elm))).....
12d40 20 20 20 20 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 ..............collect.(let.((key
12d60 20 28 63 61 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 .(car.elm)).....................
12d80 20 20 20 20 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 ............(val.(cdr.elm)))....
12da0 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 6f 6e 73 20 28 .........................(cons.(
12dc0 69 66 20 28 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 if.(stringp.key)................
12de0 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 75 62 73 74 72 69 6e .......................(substrin
12e00 67 2d 6e 6f 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 g-no-properties.key)............
12e20 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 6b 65 79 29 0a 20 20 .........................key)...
12e40 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 ................................
12e60 28 69 66 20 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 (if.(stringp.val)...............
12e80 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 73 75 62 73 74 72 69 ........................(substri
12ea0 6e 67 2d 6e 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 ng-no-properties.val)...........
12ec0 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 76 61 6c 29 29 29 ..........................val)))
12ee0 0a 20 20 20 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 ...................else.........
12f00 20 20 20 20 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 ..........collect.elm)).........
12f20 28 74 20 6f 62 6a 65 63 74 29 29 29 0a 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 69 6e 6a 65 (t.object)))..(defvar.async-inje
12f40 63 74 2d 76 61 72 69 61 62 6c 65 73 2d 65 78 63 6c 75 64 65 2d 72 65 67 65 78 70 73 20 27 28 22 ct-variables-exclude-regexps.'("
12f60 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 5c 5c 27 22 29 0a 20 20 22 41 20 6c 69 73 74 20 6f 66 20 -syntax-table\\'")..."A.list.of.
12f80 72 65 67 65 78 70 73 20 74 68 61 74 20 60 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 regexps.that.`async-inject-varia
12fa0 62 6c 65 73 27 20 73 68 6f 75 6c 64 20 69 67 6e 6f 72 65 2e 22 29 0a 0a 28 64 65 66 75 6e 20 61 bles'.should.ignore.")..(defun.a
12fc0 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 0a 20 20 20 20 28 69 6e 63 6c 75 sync-inject-variables.....(inclu
12fe0 64 65 2d 72 65 67 65 78 70 20 26 6f 70 74 69 6f 6e 61 6c 20 70 72 65 64 69 63 61 74 65 20 65 78 de-regexp.&optional.predicate.ex
13000 63 6c 75 64 65 2d 72 65 67 65 78 70 20 6e 6f 70 72 6f 70 73 29 0a 20 20 22 52 65 74 75 72 6e 20 clude-regexp.noprops)..."Return.
13020 61 20 60 73 65 74 71 27 20 66 6f 72 6d 20 74 68 61 74 20 72 65 70 6c 69 63 61 74 65 73 20 70 61 a.`setq'.form.that.replicates.pa
13040 72 74 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 0a 0a rt.of.the.calling.environment...
13060 49 74 20 73 65 74 73 20 74 68 65 20 76 61 6c 75 65 20 66 6f 72 20 65 76 65 72 79 20 76 61 72 69 It.sets.the.value.for.every.vari
13080 61 62 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 able.matching.INCLUDE-REGEXP.and
130a0 0a 61 6c 73 6f 20 50 52 45 44 49 43 41 54 45 2e 20 20 49 74 20 77 69 6c 6c 20 6e 6f 74 20 70 65 .also.PREDICATE...It.will.not.pe
130c0 72 66 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 rform.injection.for.any.variable
130e0 0a 6d 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 20 70 72 65 .matching.EXCLUDE-REGEXP.(if.pre
13100 73 65 6e 74 29 20 61 6e 64 20 76 61 72 69 61 62 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 6f 6e 65 sent).and.variables.matching.one
13120 20 6f 66 0a 60 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 2d 65 78 63 6c .of.`async-inject-variables-excl
13140 75 64 65 2d 72 65 67 65 78 70 73 27 2e 0a 57 68 65 6e 20 4e 4f 50 52 4f 50 53 20 69 73 20 6e 6f ude-regexps'..When.NOPROPS.is.no
13160 6e 20 6e 69 6c 20 69 74 20 74 72 69 65 73 20 74 6f 20 73 74 72 69 70 20 6f 75 74 20 74 65 78 74 n.nil.it.tries.to.strip.out.text
13180 20 70 72 6f 70 65 72 74 69 65 73 20 6f 66 20 65 61 63 68 0a 76 61 72 69 61 62 6c 65 27 73 20 76 .properties.of.each.variable's.v
131a0 61 6c 75 65 20 77 69 74 68 20 60 61 73 79 6e 63 2d 76 61 72 69 61 62 6c 65 73 2d 6e 6f 70 72 6f alue.with.`async-variables-nopro
131c0 70 73 2d 66 75 6e 63 74 69 6f 6e 27 2e 0a 0a 49 74 20 69 73 20 69 6e 74 65 6e 64 65 64 20 74 6f ps-function'...It.is.intended.to
131e0 20 62 65 20 75 73 65 64 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 0a 20 20 20 20 28 61 73 79 6e 63 .be.used.as.follows:......(async
13200 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 5c 5c 3d 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 -start........\\=`(lambda.()....
13220 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 5c 5c 3d 27 73 6d 74 70 6d 61 69 6c 29 0a 20 20 .......(require.\\='smtpmail)...
13240 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 20 ........(with-temp-buffer.......
13260 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 73 74 72 69 6e 67 ......(insert.,(buffer-substring
13280 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 20 28 70 6f 69 6e -no-properties.(point-min).(poin
132a0 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 61 73 73 20 69 6e 20 t-max))).............;;.Pass.in.
132c0 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 6d 74 the.variable.environment.for.smt
132e0 70 6d 61 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 pmail.............,(async-inject
13300 2d 76 61 72 69 61 62 6c 65 73 20 5c 22 5c 5c 5c 5c 3d 60 5c 5c 28 73 6d 74 70 6d 61 69 6c 5c 5c -variables.\"\\\\=`\\(smtpmail\\
13320 7c 5c 5c 28 75 73 65 72 2d 5c 5c 29 3f 6d 61 69 6c 5c 5c 29 2d 5c 22 29 0a 20 20 20 20 20 20 20 |\\(user-\\)?mail\\)-\")........
13340 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 20 20 20 20 20 .....(smtpmail-send-it))).......
13360 20 5c 5c 3d 27 69 67 6e 6f 72 65 29 22 0a 20 20 60 28 73 65 74 71 0a 20 20 20 20 2c 40 28 6c 65 .\\='ignore)"...`(setq.....,@(le
13380 74 20 28 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 20 20 28 6d 61 70 61 74 6f 6d 73 0a 20 t.(bindings).........(mapatoms..
133a0 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 ........(lambda.(sym)...........
133c0 20 28 6c 65 74 20 28 28 73 6e 61 6d 65 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 73 79 6d 29 20 .(let.((sname.(and.(boundp.sym).
133e0 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 73 79 6d 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 (symbol-name.sym))).............
13400 20 20 20 20 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 .....value)..............(when.(
13420 61 6e 64 20 73 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 and.sname.......................
13440 20 20 28 6f 72 20 28 6e 75 6c 6c 20 69 6e 63 6c 75 64 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 ..(or.(null.include-regexp).....
13460 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 73 74 72 69 6e 67 2d ........................(string-
13480 6d 61 74 63 68 20 69 6e 63 6c 75 64 65 2d 72 65 67 65 78 70 20 73 6e 61 6d 65 29 29 0a 20 20 20 match.include-regexp.sname))....
134a0 20 20 20 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 65 .....................(or.(null.e
134c0 78 63 6c 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 xclude-regexp)..................
134e0 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 65 78 ...........(not.(string-match.ex
13500 63 6c 75 64 65 2d 72 65 67 65 78 70 20 73 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 clude-regexp.sname)))...........
13520 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 72 65 20 69 6e ..............(cl-loop.for.re.in
13540 20 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 2d 65 78 63 6c 75 64 65 2d .async-inject-variables-exclude-
13560 72 65 67 65 78 70 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 regexps.........................
13580 20 20 20 20 20 20 20 20 20 6e 65 76 65 72 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 .........never.(string-match-p.r
135a0 65 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 73 65 74 71 20 e.sname)))................(setq.
135c0 76 61 6c 75 65 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 73 79 6d 29 29 0a 20 20 20 20 20 20 value.(symbol-value.sym)).......
135e0 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 28 73 74 72 69 6e 67 70 20 76 61 .........(unless.(or.(stringp.va
13600 6c 75 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 20 lue)............................
13620 28 6d 65 6d 71 20 76 61 6c 75 65 20 27 28 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 (memq.value.'(nil.t))...........
13640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 70 20 76 61 6c 75 65 29 .................(numberp.value)
13660 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 76 65 63 ............................(vec
13680 74 6f 72 70 20 76 61 6c 75 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 torp.value))..................(s
136a0 65 74 71 20 76 61 6c 75 65 20 60 28 71 75 6f 74 65 20 2c 76 61 6c 75 65 29 29 29 0a 20 20 20 20 etq.value.`(quote.,value))).....
136c0 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 6e 6f 70 72 6f 70 73 0a 20 20 20 20 20 20 20 ...........(when.noprops........
136e0 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76 61 6c 75 65 20 28 66 75 6e 63 61 6c 6c 20 61 ..........(setq.value.(funcall.a
13700 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 6f 6e 0a sync-variables-noprops-function.
13720 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 ................................
13740 20 20 20 20 20 20 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 ......value)))................(w
13760 68 65 6e 20 28 6f 72 20 28 6e 75 6c 6c 20 70 72 65 64 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 hen.(or.(null.predicate)........
13780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 70 72 65 64 69 ..................(funcall.predi
137a0 63 61 74 65 20 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 cate.sym))..................(set
137c0 71 20 62 69 6e 64 69 6e 67 73 20 28 63 6f 6e 73 20 76 61 6c 75 65 20 62 69 6e 64 69 6e 67 73 29 q.bindings.(cons.value.bindings)
137e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 6e 64 69 6e 67 73 ........................bindings
13800 20 28 63 6f 6e 73 20 73 79 6d 20 62 69 6e 64 69 6e 67 73 29 29 29 29 29 29 29 0a 20 20 20 20 20 .(cons.sym.bindings)))))))......
13820 20 20 20 62 69 6e 64 69 6e 67 73 29 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 61 73 79 6e 63 ...bindings)))..(defalias.'async
13840 2d 69 6e 6a 65 63 74 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 27 61 73 79 6e 63 2d 69 6e 6a 65 63 -inject-environment.'async-injec
13860 74 2d 76 61 72 69 61 62 6c 65 73 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 68 61 6e 64 6c t-variables)..(defun.async-handl
13880 65 2d 72 65 73 75 6c 74 20 28 66 75 6e 63 20 72 65 73 75 6c 74 20 62 75 66 29 0a 20 20 28 69 66 e-result.(func.result.buf)...(if
138a0 20 28 6e 75 6c 6c 20 66 75 6e 63 29 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 .(null.func).......(progn.......
138c0 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
138e0 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 29 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 nc-callback-value).result)......
13900 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 6c 65 20 27 61 73 ...(set.(make-local-variable.'as
13920 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 29 0a 20 20 20 20 ync-callback-value-set).t)).....
13940 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 (unwind-protect.........(if.(and
13960 20 28 6c 69 73 74 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 .(listp.result).................
13980 20 28 65 71 20 27 61 73 79 6e 63 2d 73 69 67 6e 61 6c 20 28 6e 74 68 20 30 20 72 65 73 75 6c 74 .(eq.'async-signal.(nth.0.result
139a0 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 69 67 6e 61 6c 20 28 63 61 72 20 28 6e 74 ))).............(signal.(car.(nt
139c0 68 20 31 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 h.1.result))....................
139e0 20 28 63 64 72 20 28 6e 74 68 20 31 20 72 65 73 75 6c 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 .(cdr.(nth.1.result)))..........
13a00 20 28 66 75 6e 63 61 6c 6c 20 66 75 6e 63 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 28 75 .(funcall.func.result)).......(u
13a20 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 28 6b 69 6c 6c 2d nless.async-debug.........(kill-
13a40 62 75 66 66 65 72 20 62 75 66 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 77 68 buffer.buf)))))..(defun.async-wh
13a60 65 6e 2d 64 6f 6e 65 20 28 70 72 6f 63 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 63 68 61 6e 67 65 29 en-done.(proc.&optional._change)
13a80 0a 20 20 22 50 72 6f 63 65 73 73 20 73 65 6e 74 69 6e 65 6c 20 75 73 65 64 20 74 6f 20 72 65 74 ..."Process.sentinel.used.to.ret
13aa0 72 69 65 76 65 20 74 68 65 20 76 61 6c 75 65 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 20 70 rieve.the.value.from.the.child.p
13ac0 72 6f 63 65 73 73 2e 22 0a 20 20 28 77 68 65 6e 20 28 65 71 20 27 65 78 69 74 20 28 70 72 6f 63 rocess."...(when.(eq.'exit.(proc
13ae0 65 73 73 2d 73 74 61 74 75 73 20 70 72 6f 63 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 ess-status.proc)).....(with-curr
13b00 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 29 ent-buffer.(process-buffer.proc)
13b20 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 61 73 79 6e 63 2d 63 75 72 72 65 6e 74 2d 70 72 6f 63 .......(let.((async-current-proc
13b40 65 73 73 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 3d 20 30 20 28 70 72 6f ess.proc)).........(if.(=.0.(pro
13b60 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 cess-exit-status.proc)).........
13b80 20 20 20 20 28 69 66 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 ....(if.async-callback-for-proce
13ba0 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 63 61 6c ss.................(if.async-cal
13bc0 6c 62 61 63 6b 0a 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 31 lback.....................(prog1
13be0 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 66 75 6e 63 61 6c .........................(funcal
13c00 6c 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 l.async-callback.proc)..........
13c20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 64 65 62 75 67 .............(unless.async-debug
13c40 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 3b 3b 20 77 65 20 6e .........................;;.we.n
13c60 65 65 64 20 74 6f 20 63 68 65 63 6b 20 74 68 69 73 20 62 65 63 61 75 73 65 20 74 68 65 6f 72 65 eed.to.check.this.because.theore
13c80 74 69 63 61 6c 6c 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 tically.........................
13ca0 3b 3b 20 60 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 27 20 63 6f 75 6c 64 27 76 65 20 6b 69 6c ;;.`async-callback'.could've.kil
13cc0 6c 65 64 20 69 74 20 61 6c 72 65 61 64 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 led.it.already..................
13ce0 20 20 20 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 28 70 72 6f .......(when.(buffer-live-p.(pro
13d00 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 cess-buffer.proc))..............
13d20 20 20 20 20 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 6f 63 65 .............(kill-buffer.(proce
13d40 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ss-buffer.proc))))).............
13d60 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 6c 65 20 ......(set.(make-local-variable.
13d80 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 29 20 70 72 6f 63 29 0a 20 20 20 'async-callback-value).proc)....
13da0 20 20 20 20 20 20 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 ...............(set.(make-local-
13dc0 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 61 6c 75 65 2d 73 variable.'async-callback-value-s
13de0 65 74 29 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4d 61 79 62 65 20 73 et).t))...............;;.Maybe.s
13e00 74 72 69 70 20 6f 75 74 20 75 6e 72 65 61 64 61 62 6c 65 20 22 23 22 3b 20 54 68 65 79 20 61 72 trip.out.unreadable."#";.They.ar
13e20 65 20 72 65 70 6c 61 63 65 64 20 62 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 e.replaced.by...............;;.e
13e40 6d 70 74 79 20 73 74 72 69 6e 67 20 75 6e 6c 65 73 73 20 74 68 65 79 20 61 72 65 20 70 72 65 66 mpty.string.unless.they.are.pref
13e60 69 78 69 6e 67 20 61 20 73 70 65 63 69 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b ixing.a.special...............;;
13e80 20 6f 62 6a 65 63 74 20 6c 69 6b 65 20 61 20 6d 61 72 6b 65 72 2e 20 53 65 65 20 69 73 73 75 65 .object.like.a.marker..See.issue
13ea0 20 23 31 34 35 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 .#145................(widen)....
13ec0 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 6e ...........(goto-char.(point-min
13ee0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e ))...............(save-excursion
13f00 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 72 61 6e 73 66 6f 72 6d 20 6d 61 .................;;.Transform.ma
13f20 72 6b 65 72 73 20 69 6e 20 6c 69 73 74 20 6c 69 6b 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 rkers.in.list.like..............
13f40 20 20 20 3b 3b 20 28 6d 61 72 6b 65 72 20 28 6d 6f 76 65 73 20 61 66 74 65 72 20 69 6e 73 65 72 ...;;.(marker.(moves.after.inser
13f60 74 69 6f 6e 29 20 61 74 20 32 33 33 38 20 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tion).at.2338.in................
13f80 20 3b 3b 20 74 65 73 74 5c 2e 6f 72 67 29 20 73 6f 20 74 68 61 74 20 72 65 6d 61 70 20 74 65 78 .;;.test\.org).so.that.remap.tex
13fa0 74 20 70 72 6f 70 65 72 74 69 65 73 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 t.properties.function...........
13fc0 20 20 20 20 20 20 3b 3b 20 63 61 6e 20 70 61 72 73 65 20 69 74 20 74 6f 20 72 65 73 74 69 74 75 ......;;.can.parse.it.to.restitu
13fe0 74 65 20 6d 61 72 6b 65 72 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c te.marker..................(whil
14000 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 23 3c 5c 5c 28 5b 5e 3e 5d 2a e.(re-search-forward."#<\\([^>]*
14020 5c 5c 29 3e 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 28 \\)>".nil.t)...................(
14040 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 28 63 6f 6e 63 61 74 20 22 28 22 20 28 6d 61 74 63 68 replace-match.(concat."(".(match
14060 2d 73 74 72 69 6e 67 20 31 29 20 22 29 22 29 20 74 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 -string.1).")").t.t)))..........
14080 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 .....(while.(re-search-forward."
140a0 23 28 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 28 72 65 70 6c #(".nil.t).................(repl
140c0 61 63 65 2d 6d 61 74 63 68 20 22 28 22 20 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ace-match."(".t.t)).............
140e0 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 20 20 20 20 20 ..(goto-char.(point-max)).......
14100 20 20 20 20 20 20 20 20 28 62 61 63 6b 77 61 72 64 2d 73 65 78 70 29 0a 20 20 20 20 20 20 20 20 ........(backward-sexp).........
14120 20 20 20 20 20 20 28 6c 65 74 20 28 28 76 61 6c 75 65 20 28 72 65 61 64 20 28 63 75 72 72 65 6e ......(let.((value.(read.(curren
14140 74 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 t-buffer)))).................(as
14160 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 73 75 6c 74 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b ync-handle-result.async-callback
14180 20 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 0a 20 20 20 20 20 .value.(current-buffer))))......
141a0 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 6c 65 20 27 .....(set.(make-local-variable.'
141c0 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 async-callback-value)...........
141e0 20 20 20 20 20 28 6c 69 73 74 20 27 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....(list.'error...............
14200 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 27 25 .......(format."Async.process.'%
14220 73 27 20 66 61 69 6c 65 64 20 77 69 74 68 20 65 78 69 74 20 63 6f 64 65 20 25 64 22 0a 20 20 20 s'.failed.with.exit.code.%d"....
14240 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 70 72 6f 63 65 ..........................(proce
14260 73 73 2d 6e 61 6d 65 20 70 72 6f 63 29 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 ss-name.proc).(process-exit-stat
14280 75 73 20 70 72 6f 63 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 us.proc))))...........(set.(make
142a0 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-
142c0 76 61 6c 75 65 2d 73 65 74 29 20 74 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 value-set).t))))))..(defun.async
142e0 2d 72 65 61 64 2d 66 72 6f 6d 2d 63 6c 69 65 6e 74 20 28 70 72 6f 63 20 73 74 72 69 6e 67 20 26 -read-from-client.(proc.string.&
14300 6f 70 74 69 6f 6e 61 6c 20 70 72 6f 6d 70 74 2d 66 6f 72 2d 70 77 64 29 0a 20 20 22 50 72 6f 63 optional.prompt-for-pwd)..."Proc
14320 65 73 73 20 74 65 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 ess.text.from.client.process...T
14340 68 65 20 73 74 72 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 he.string.chunks.usually.arrive.
14360 69 6e 20 6d 61 78 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 in.maximum.of.4096.bytes,.so.a.l
14380 6f 6e 67 20 63 6c 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 ong.client.message.might.be.spli
143a0 74 20 69 6e 74 6f 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 t.into.multiple.calls.of.this.fu
143c0 6e 63 74 69 6f 6e 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 nction...We.use.a.marker.`async-
143e0 72 65 61 64 2d 6d 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 read-marker'.to.track.the.positi
14400 6f 6e 20 6f 66 20 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 on.of.the.lasts.complete.line...
14420 45 76 65 72 79 20 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 Every.time.we.get.new.input,.we.
14440 74 72 79 20 74 6f 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 try.to.look.for.newline,.and.if.
14460 66 6f 75 6e 64 2c 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 found,.process.the.entire.line.a
14480 6e 64 20 62 75 6d 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 nd.bump.the.marker.position.to.t
144a0 68 65 20 65 6e 64 20 6f 66 20 74 68 69 73 20 6e 65 78 74 20 6c 69 6e 65 2e 0a 0a 41 72 67 75 6d he.end.of.this.next.line...Argum
144c0 65 6e 74 20 50 52 4f 4d 50 54 2d 46 4f 52 2d 50 57 44 20 61 6c 6c 6f 77 20 62 69 6e 64 69 6e 67 ent.PROMPT-FOR-PWD.allow.binding
144e0 20 6c 65 78 69 63 61 6c 6c 79 20 74 68 65 20 76 61 6c 75 65 20 6f 66 0a 60 61 73 79 6e 63 2d 70 .lexically.the.value.of.`async-p
14500 72 6f 6d 70 74 2d 66 6f 72 2d 70 61 73 73 77 6f 72 64 27 2c 20 69 66 20 75 6e 73 70 65 63 69 66 rompt-for-password',.if.unspecif
14520 69 65 64 20 69 74 73 20 67 6c 6f 62 61 6c 20 76 61 6c 75 65 0a 69 73 20 75 73 65 64 2e 22 0a 20 ied.its.global.value.is.used."..
14540 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 .(with-current-buffer.(process-b
14560 75 66 66 65 72 20 70 72 6f 63 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 70 72 6f 6d 70 uffer.proc).....(when.(and.promp
14580 74 2d 66 6f 72 2d 70 77 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 70 t-for-pwd................(boundp
145a0 20 27 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 65 78 70 29 0a .'tramp-password-prompt-regexp).
145c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 72 61 6d 70 2d 70 61 73 73 77 6f 72 64 2d 70 72 ...............tramp-password-pr
145e0 6f 6d 70 74 2d 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 ompt-regexp................(stri
14600 6e 67 2d 6d 61 74 63 68 20 74 72 61 6d 70 2d 70 61 73 73 77 6f 72 64 2d 70 72 6f 6d 70 74 2d 72 ng-match.tramp-password-prompt-r
14620 65 67 65 78 70 20 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 73 65 egexp.string)).......(process-se
14640 6e 64 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 70 72 6f 63 20 28 63 6f 6e 63 61 74 20 28 72 nd-string........proc.(concat.(r
14660 65 61 64 2d 70 61 73 73 77 64 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 30 20 73 74 72 69 6e ead-passwd.(match-string.0.strin
14680 67 29 29 20 22 5c 6e 22 29 29 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e g))."\n"))).....(goto-char.(poin
146a0 74 2d 6d 61 78 29 29 0a 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 t-max)).....(save-excursion.....
146c0 20 20 28 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 29 0a 0a 20 20 20 20 28 77 68 69 6c 65 20 28 ..(insert.string))......(while.(
146e0 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 6e 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 search-forward."\n".nil.t)......
14700 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 28 73 61 76 65 2d 72 .(save-excursion.........(save-r
14720 65 73 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 estriction...........(widen)....
14740 20 20 20 20 20 20 20 28 6e 61 72 72 6f 77 2d 74 6f 2d 72 65 67 69 6f 6e 20 61 73 79 6e 63 2d 72 .......(narrow-to-region.async-r
14760 65 61 64 2d 6d 61 72 6b 65 72 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 ead-marker.(point))...........(g
14780 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))...........
147a0 28 6c 65 74 20 28 6d 73 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f (let.(msg).............(conditio
147c0 6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 74 n-case.nil.................;;.It
147e0 20 69 73 20 73 61 66 65 20 74 6f 20 74 68 72 6f 77 20 65 72 72 6f 72 73 20 69 6e 20 74 68 65 20 .is.safe.to.throw.errors.in.the.
14800 72 65 61 64 20 62 65 63 61 75 73 65 20 77 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 read.because.we.................
14820 3b 3b 20 73 65 6e 64 20 6d 65 73 73 61 67 65 73 20 61 6c 77 61 79 73 20 6f 6e 20 74 68 65 69 72 ;;.send.messages.always.on.their
14840 20 6f 77 6e 20 6c 69 6e 65 2c 20 61 6e 64 20 74 68 65 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 .own.line,.and.they.............
14860 20 20 20 20 3b 3b 20 61 72 65 20 61 6c 77 61 79 73 20 61 20 62 61 73 65 36 34 20 65 6e 63 6f 64 ....;;.are.always.a.base64.encod
14880 65 64 20 73 74 72 69 6e 67 2c 20 73 6f 20 61 20 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 ed.string,.so.a.message.........
148a0 20 20 20 20 20 20 20 20 3b 3b 20 77 69 6c 6c 20 61 6c 77 61 79 73 20 72 65 61 64 2e 20 20 57 65 ........;;.will.always.read...We
148c0 20 77 69 6c 6c 20 61 6c 73 6f 20 69 67 6e 6f 72 65 20 74 68 65 20 72 65 73 74 0a 20 20 20 20 20 .will.also.ignore.the.rest......
148e0 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 66 20 74 68 69 73 20 6c 69 6e 65 20 73 69 6e 63 65 ...........;;.of.this.line.since
14900 20 74 68 65 72 65 20 77 6f 6e 27 74 20 62 65 20 61 6e 79 74 68 69 6e 67 0a 20 20 20 20 20 20 20 .there.won't.be.anything........
14920 20 20 20 20 20 20 20 20 20 3b 3b 20 69 6e 74 65 72 65 73 74 69 6e 67 2e 0a 20 20 20 20 20 20 20 .........;;.interesting.........
14940 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 6d 73 67 20 28 72 65 61 64 20 .........(while.(setq.msg.(read.
14960 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 (current-buffer)))..............
14980 20 20 20 20 20 28 6c 65 74 20 28 28 6d 73 67 2d 64 65 63 6f 64 65 64 20 28 69 67 6e 6f 72 65 2d .....(let.((msg-decoded.(ignore-
149a0 65 72 72 6f 72 73 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 6d 73 67 errors.(base64-decode-string.msg
149c0 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 28 77 68 65 6e 20 6d )))).....................(when.m
149e0 73 67 2d 64 65 63 6f 64 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sg-decoded......................
14a00 20 28 73 65 74 71 20 6d 73 67 2d 64 65 63 6f 64 65 64 20 28 63 61 72 20 28 72 65 61 64 2d 66 72 .(setq.msg-decoded.(car.(read-fr
14a20 6f 6d 2d 73 74 72 69 6e 67 20 6d 73 67 2d 64 65 63 6f 64 65 64 29 29 29 0a 20 20 20 20 20 20 20 om-string.msg-decoded)))........
14a40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6c 69 73 74 70 ...............(when.(and.(listp
14a60 20 6d 73 67 2d 64 65 63 6f 64 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .msg-decoded)...................
14a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 70 20 ...............(async-message-p.
14aa0 6d 73 67 2d 64 65 63 6f 64 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 msg-decoded)....................
14ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 29 0a 20 20 ..............async-callback)...
14ae0 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 61 6c 6c 20 61 ......................(funcall.a
14b00 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 6d 73 67 2d 64 65 63 6f 64 65 64 29 29 29 29 29 0a 20 sync-callback.msg-decoded)))))..
14b20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 69 73 20 4f 4b 2c 20 77 65 20 72 .............;;.This.is.OK,.we.r
14b40 65 61 63 68 65 64 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 63 68 75 6e 6b 20 73 75 62 70 eached.the.end.of.the.chunk.subp
14b60 72 6f 63 65 73 73 20 73 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 74 20 rocess.sent...............;;.at.
14b80 74 68 69 73 20 74 69 6d 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 76 61 6c 69 this.time................(invali
14ba0 64 2d 72 65 61 64 2d 73 79 6e 74 61 78 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 d-read-syntax.t)...............(
14bc0 65 6e 64 2d 6f 66 2d 66 69 6c 65 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f end-of-file.t)))...........(goto
14be0 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 6f -char.(point-max))...........(mo
14c00 76 65 2d 6d 61 72 6b 65 72 20 61 73 79 6e 63 2d 72 65 61 64 2d 6d 61 72 6b 65 72 20 28 70 6f 69 ve-marker.async-read-marker.(poi
14c20 6e 74 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 2d 72 65 63 65 69 76 65 nt)))))))..(defun.async--receive
14c40 2d 73 65 78 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 74 72 65 61 6d 29 0a 20 20 3b 3b 20 46 49 -sexp.(&optional.stream)...;;.FI
14c60 58 4d 45 3a 20 57 68 79 20 75 73 65 20 60 75 74 66 2d 38 2d 61 75 74 6f 27 20 69 6e 73 74 65 61 XME:.Why.use.`utf-8-auto'.instea
14c80 64 20 6f 66 20 60 75 74 66 2d 38 2d 75 6e 69 78 27 3f 20 20 54 68 69 73 20 69 73 0a 20 20 3b 3b d.of.`utf-8-unix'?..This.is...;;
14ca0 20 61 20 63 6f 6d 6d 75 6e 69 63 61 74 69 6f 6e 20 63 68 61 6e 6e 65 6c 20 6f 76 65 72 20 77 68 .a.communication.channel.over.wh
14cc0 69 63 68 20 77 65 20 68 61 76 65 20 63 6f 6d 70 6c 65 74 65 20 63 6f 6e 74 72 6f 6c 2c 0a 20 20 ich.we.have.complete.control,...
14ce0 3b 3b 20 73 6f 20 77 65 20 67 65 74 20 74 6f 20 63 68 6f 6f 73 65 20 65 78 61 63 74 6c 79 20 77 ;;.so.we.get.to.choose.exactly.w
14d00 68 69 63 68 20 65 6e 63 6f 64 69 6e 67 20 61 6e 64 20 45 4f 4c 20 77 65 20 75 73 65 2c 20 69 73 hich.encoding.and.EOL.we.use,.is
14d20 6e 27 74 0a 20 20 3b 3b 20 69 74 3f 0a 20 20 3b 3b 20 55 50 44 41 54 45 3a 20 57 65 20 75 73 65 n't...;;.it?...;;.UPDATE:.We.use
14d40 20 6e 6f 77 20 60 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 27 20 69 6e 73 74 65 61 64 20 .now.`utf-8-emacs-unix'.instead.
14d60 6f 66 20 60 75 74 66 2d 38 2d 61 75 74 6f 27 20 61 73 0a 20 20 3b 3b 20 72 65 63 6f 6d 6d 65 6e of.`utf-8-auto'.as...;;.recommen
14d80 64 65 64 20 69 6e 20 62 75 67 23 31 36 35 2e 0a 20 20 28 6c 65 74 20 28 28 73 65 78 70 20 28 64 ded.in.bug#165....(let.((sexp.(d
14da0 65 63 6f 64 65 2d 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 20 28 62 61 73 65 36 34 2d 64 65 63 6f ecode-coding-string.(base64-deco
14dc0 64 65 2d 73 74 72 69 6e 67 20 28 72 65 61 64 20 73 74 72 65 61 6d 29 29 0a 20 20 20 20 20 20 20 de-string.(read.stream))........
14de0 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 27 75 74 .............................'ut
14e00 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 50 61 72 65 f-8-emacs-unix)).........;;.Pare
14e20 6e 74 20 65 78 70 65 63 74 73 20 55 54 46 2d 38 20 65 6e 63 6f 64 65 64 20 74 65 78 74 2e 0a 20 nt.expects.UTF-8.encoded.text...
14e40 20 20 20 20 20 20 20 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 2d 66 6f 72 2d 77 72 69 74 65 20 .......(coding-system-for-write.
14e60 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 29 0a 20 20 20 20 28 69 66 20 61 73 79 6e 'utf-8-emacs-unix)).....(if.asyn
14e80 63 2d 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 52 65 63 65 69 76 c-debug.........(message."Receiv
14ea0 65 64 20 73 65 78 70 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 ed.sexp.{{{%s}}}".(pp-to-string.
14ec0 73 65 78 70 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 73 65 78 70 20 28 72 65 61 64 20 73 65 78 sexp))).....(setq.sexp.(read.sex
14ee0 70 29 29 0a 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 p)).....(if.async-debug.........
14f00 28 6d 65 73 73 61 67 65 20 22 52 65 61 64 20 73 65 78 70 20 7b 7b 7b 25 73 7d 7d 7d 22 20 28 70 (message."Read.sexp.{{{%s}}}".(p
14f20 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 65 76 61 6c 20 73 65 p-to-string.sexp))).....(eval.se
14f40 78 70 20 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 xp.t)))..(defun.async--insert-se
14f60 78 70 20 28 73 65 78 70 29 0a 20 20 28 6c 65 74 20 28 70 72 69 6e 74 2d 6c 65 76 65 6c 0a 20 20 xp.(sexp)...(let.(print-level...
14f80 20 20 20 20 20 20 70 72 69 6e 74 2d 6c 65 6e 67 74 68 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e ......print-length.........(prin
14fa0 74 2d 65 73 63 61 70 65 2d 6e 6f 6e 61 73 63 69 69 20 74 29 0a 20 20 20 20 20 20 20 20 28 70 72 t-escape-nonascii.t).........(pr
14fc0 69 6e 74 2d 63 69 72 63 6c 65 20 74 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 46 69 78 20 62 75 67 int-circle.t).........;;.Fix.bug
14fe0 23 31 35 33 20 69 6e 20 65 6d 61 63 73 2d 32 39 20 77 69 74 68 20 73 79 6d 62 6f 6c 27 73 20 70 #153.in.emacs-29.with.symbol's.p
15000 6f 73 69 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 74 2d 73 79 6d 62 6f 6c 73 ositions..........(print-symbols
15020 2d 62 61 72 65 20 74 29 29 0a 20 20 20 20 28 70 72 69 6e 31 20 73 65 78 70 20 28 63 75 72 72 65 -bare.t)).....(prin1.sexp.(curre
15040 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 3b 3b 20 4a 75 73 74 20 69 6e 20 63 61 73 65 20 nt-buffer)).....;;.Just.in.case.
15060 74 68 65 20 73 74 72 69 6e 67 20 77 65 27 72 65 20 73 65 6e 64 69 6e 67 20 6d 69 67 68 74 20 63 the.string.we're.sending.might.c
15080 6f 6e 74 61 69 6e 20 45 4f 46 0a 20 20 20 20 28 65 6e 63 6f 64 65 2d 63 6f 64 69 6e 67 2d 72 65 ontain.EOF.....(encode-coding-re
150a0 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 27 75 74 gion.(point-min).(point-max).'ut
150c0 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 0a 20 20 20 20 28 62 61 73 65 36 34 2d 65 6e 63 6f f-8-emacs-unix).....(base64-enco
150e0 64 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 de-region.(point-min).(point-max
15100 29 20 74 29 0a 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 29 ).t).....(goto-char.(point-min))
15120 20 28 69 6e 73 65 72 74 20 3f 5c 22 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f .(insert.?\").....(goto-char.(po
15140 69 6e 74 2d 6d 61 78 29 29 20 28 69 6e 73 65 72 74 20 3f 5c 22 20 3f 5c 6e 29 29 29 0a 0a 28 64 int-max)).(insert.?\".?\n)))..(d
15160 65 66 75 6e 20 61 73 79 6e 63 2d 2d 74 72 61 6e 73 6d 69 74 2d 73 65 78 70 20 28 70 72 6f 63 65 efun.async--transmit-sexp.(proce
15180 73 73 20 73 65 78 70 29 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 ss.sexp)...(with-temp-buffer....
151a0 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 73 61 67 .(if.async-debug.........(messag
151c0 65 20 22 54 72 61 6e 73 6d 69 74 74 69 6e 67 20 73 65 78 70 20 7b 7b 7b 25 73 7d 7d 7d 22 20 28 e."Transmitting.sexp.{{{%s}}}".(
151e0 70 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 61 73 79 6e 63 2d pp-to-string.sexp))).....(async-
15200 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 73 65 78 70 29 0a 20 20 20 20 28 70 72 6f 63 65 73 73 2d -insert-sexp.sexp).....(process-
15220 73 65 6e 64 2d 72 65 67 69 6f 6e 20 70 72 6f 63 65 73 73 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 send-region.process.(point-min).
15240 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 62 61 74 (point-max))))..(defun.async-bat
15260 63 68 2d 69 6e 76 6f 6b 65 20 28 29 0a 20 20 22 43 61 6c 6c 65 64 20 66 72 6f 6d 20 74 68 65 20 ch-invoke.()..."Called.from.the.
15280 63 68 69 6c 64 20 45 6d 61 63 73 20 70 72 6f 63 65 73 73 27 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e child.Emacs.process'.command.lin
152a0 65 2e 22 0a 20 20 3b 3b 20 4d 61 6b 65 20 73 75 72 65 20 27 6d 65 73 73 61 67 65 27 20 61 6e 64 e."...;;.Make.sure.'message'.and
152c0 20 27 70 72 69 6e 31 27 20 65 6e 63 6f 64 65 20 73 74 75 66 66 20 69 6e 20 55 54 46 2d 38 2c 20 .'prin1'.encode.stuff.in.UTF-8,.
152e0 61 73 20 70 61 72 65 6e 74 0a 20 20 3b 3b 20 70 72 6f 63 65 73 73 20 65 78 70 65 63 74 73 2e 0a as.parent...;;.process.expects..
15300 20 20 28 6c 65 74 20 28 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 2d 66 6f 72 2d 77 72 69 74 65 ..(let.((coding-system-for-write
15320 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 0a 20 20 20 20 20 20 20 20 28 61 72 67 .'utf-8-emacs-unix).........(arg
15340 73 2d 6c 65 66 74 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 73 2d 6c 65 66 74 29 29 0a s-left.command-line-args-left)).
15360 20 20 20 20 28 73 65 74 71 20 61 73 79 6e 63 2d 69 6e 2d 63 68 69 6c 64 2d 65 6d 61 63 73 20 74 ....(setq.async-in-child-emacs.t
15380 0a 20 20 20 20 20 20 20 20 20 20 64 65 62 75 67 2d 6f 6e 2d 65 72 72 6f 72 20 61 73 79 6e 63 2d ...........debug-on-error.async-
153a0 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 debug...........command-line-arg
153c0 73 2d 6c 65 66 74 20 6e 69 6c 29 0a 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 2d s-left.nil).....(condition-case-
153e0 75 6e 6c 65 73 73 2d 64 65 62 75 67 20 65 72 72 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 unless-debug.err.........(let.((
15400 72 65 74 20 28 66 75 6e 63 61 6c 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ret.(funcall....................
15420 20 28 61 73 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 70 20 28 75 6e 6c 65 73 73 20 61 73 .(async--receive-sexp.(unless.as
15440 79 6e 63 2d 73 65 6e 64 2d 6f 76 65 72 2d 70 69 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ync-send-over-pipe..............
15460 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 72 ..............................ar
15480 67 73 2d 6c 65 66 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6e 65 gs-left)))))...........;;.The.ne
154a0 77 6c 69 6e 65 73 20 6d 61 6b 65 73 20 63 6c 69 65 6e 74 20 6d 65 73 73 61 67 65 73 20 6d 6f 72 wlines.makes.client.messages.mor
154c0 65 20 72 6f 62 75 73 74 20 61 6e 64 20 61 6c 73 6f 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 68 e.robust.and.also...........;;.h
154e0 61 6e 64 6c 65 20 73 6f 6d 65 20 77 65 69 72 64 20 6c 69 6e 65 2d 62 75 66 66 65 72 69 6e 67 20 andle.some.weird.line-buffering.
15500 69 73 73 75 65 73 20 6f 6e 20 77 69 6e 64 6f 77 73 2e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 issues.on.windows............;;.
15520 53 6f 6d 65 74 69 6d 65 73 2c 20 74 68 65 20 6c 61 73 74 20 22 63 68 75 6e 6b 22 20 77 61 73 20 Sometimes,.the.last."chunk".was.
15540 6e 6f 74 20 72 65 61 64 20 62 79 20 74 68 65 20 66 69 6c 74 65 72 2c 0a 20 20 20 20 20 20 20 20 not.read.by.the.filter,.........
15560 20 20 3b 3b 20 73 6f 20 61 20 6e 65 77 6c 69 6e 65 20 68 65 72 65 20 73 68 6f 75 6c 64 20 66 6f ..;;.so.a.newline.here.should.fo
15580 72 63 65 20 61 20 62 75 66 66 65 72 20 66 6c 75 73 68 2e 0a 20 20 20 20 20 20 20 20 20 20 28 70 rce.a.buffer.flush............(p
155a0 72 69 6e 63 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 31 20 72 65 74 29 rinc."\n")...........(prin1.ret)
155c0 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c 6e 22 29 29 0a 20 20 20 20 20 20 28 ...........(princ."\n")).......(
155e0 65 72 72 6f 72 0a 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 28 70 72 error........(progn..........(pr
15600 69 6e 63 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 31 20 28 6c 69 73 74 20 inc."\n")..........(prin1.(list.
15620 27 61 73 79 6e 63 2d 73 69 67 6e 61 6c 20 65 72 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 'async-signal.err))..........(pr
15640 69 6e 63 20 22 5c 6e 22 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 72 65 61 inc."\n"))))))..(defun.async-rea
15660 64 79 20 28 66 75 74 75 72 65 29 0a 20 20 22 51 75 65 72 79 20 61 20 46 55 54 55 52 45 20 74 6f dy.(future)..."Query.a.FUTURE.to
15680 20 73 65 65 20 69 66 20 69 74 20 69 73 20 72 65 61 64 79 2e 0a 0a 49 2e 65 2e 2c 20 69 66 20 6e .see.if.it.is.ready...I.e.,.if.n
156a0 6f 20 62 6c 6f 63 6b 69 6e 67 20 77 6f 75 6c 64 20 72 65 73 75 6c 74 20 66 72 6f 6d 20 61 20 63 o.blocking.would.result.from.a.c
156c0 61 6c 6c 20 74 6f 20 60 61 73 79 6e 63 2d 67 65 74 27 20 6f 6e 20 74 68 61 74 20 46 55 54 55 52 all.to.`async-get'.on.that.FUTUR
156e0 45 2e 22 0a 20 20 28 61 6e 64 20 28 6d 65 6d 71 20 28 70 72 6f 63 65 73 73 2d 73 74 61 74 75 73 E."...(and.(memq.(process-status
15700 20 66 75 74 75 72 65 29 20 27 28 65 78 69 74 20 73 69 67 6e 61 6c 29 29 0a 20 20 20 20 20 20 20 .future).'(exit.signal))........
15720 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
15740 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 e)))..........(if.(buffer-live-p
15760 20 62 75 66 29 0a 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 .buf)..............(with-current
15780 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 79 6e 63 -buffer.buf................async
157a0 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 2d 73 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 -callback-value-set)............
157c0 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 77 61 69 74 20 28 66 75 74 75 72 65 t))))..(defun.async-wait.(future
157e0 29 0a 20 20 22 57 61 69 74 20 66 6f 72 20 46 55 54 55 52 45 20 74 6f 20 62 65 63 6f 6d 65 20 72 )..."Wait.for.FUTURE.to.become.r
15800 65 61 64 79 2e 22 0a 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 20 28 61 73 79 6e 63 2d 72 65 61 64 eady."...(while.(not.(async-read
15820 79 20 66 75 74 75 72 65 29 29 0a 20 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 30 2e 30 35 29 29 y.future)).....(sleep-for.0.05))
15840 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 67 65 74 20 28 66 75 74 75 72 65 29 0a 20 20 22 )..(defun.async-get.(future)..."
15860 47 65 74 20 74 68 65 20 76 61 6c 75 65 20 66 72 6f 6d 20 70 72 6f 63 65 73 73 20 46 55 54 55 52 Get.the.value.from.process.FUTUR
15880 45 20 77 68 65 6e 20 69 74 20 69 73 20 72 65 61 64 79 2e 0a 46 55 54 55 52 45 20 69 73 20 72 65 E.when.it.is.ready..FUTURE.is.re
158a0 74 75 72 6e 65 64 20 62 79 20 60 61 73 79 6e 63 2d 73 74 61 72 74 27 20 6f 72 20 60 61 73 79 6e turned.by.`async-start'.or.`asyn
158c0 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 27 20 77 68 65 6e 0a 69 74 73 20 46 49 4e 49 53 48 c-start-process'.when.its.FINISH
158e0 2d 46 55 4e 43 20 69 73 20 6e 69 6c 2e 22 0a 20 20 28 61 6e 64 20 66 75 74 75 72 65 20 28 61 73 -FUNC.is.nil."...(and.future.(as
15900 79 6e 63 2d 77 61 69 74 20 66 75 74 75 72 65 29 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 ync-wait.future))...(let.((buf.(
15920 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 66 75 74 75 72 65 29 29 29 0a 20 20 20 20 28 77 68 process-buffer.future))).....(wh
15940 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 29 0a 20 20 20 20 20 20 28 77 69 en.(buffer-live-p.buf).......(wi
15960 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 28 61 th-current-buffer.buf.........(a
15980 73 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 73 75 6c 74 0a 20 20 20 20 20 20 20 20 20 23 27 69 64 sync-handle-result..........#'id
159a0 65 6e 74 69 74 79 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 20 28 63 75 72 entity.async-callback-value.(cur
159c0 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d rent-buffer))))))..(defun.async-
159e0 6d 65 73 73 61 67 65 2d 70 20 28 76 61 6c 75 65 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d message-p.(value)..."Return.non-
15a00 6e 69 6c 20 69 66 20 56 41 4c 55 45 20 69 73 20 61 6e 20 61 73 79 6e 63 2e 65 6c 20 6d 65 73 73 nil.if.VALUE.is.an.async.el.mess
15a20 61 67 65 20 70 61 63 6b 65 74 2e 22 0a 20 20 28 61 6e 64 20 28 6c 69 73 74 70 20 76 61 6c 75 65 age.packet."...(and.(listp.value
15a40 29 0a 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 76 61 6c 75 65 20 3a 61 73 79 6e 63 )........(plist-get.value.:async
15a60 2d 6d 65 73 73 61 67 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 73 65 6e 64 20 28 -message)))..(defun.async-send.(
15a80 70 72 6f 63 65 73 73 2d 6f 72 2d 6b 65 79 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 53 65 process-or-key.&rest.args)..."Se
15aa0 6e 64 20 74 68 65 20 67 69 76 65 6e 20 6d 65 73 73 61 67 65 20 74 6f 20 74 68 65 20 61 73 79 6e nd.the.given.message.to.the.asyn
15ac0 63 68 72 6f 6e 6f 75 73 20 63 68 69 6c 64 20 6f 72 20 70 61 72 65 6e 74 20 45 6d 61 63 73 2e 0a chronous.child.or.parent.Emacs..
15ae0 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 70 61 72 65 6e .To.send.messages.from.the.paren
15b00 74 20 74 6f 20 61 20 63 68 69 6c 64 2c 20 50 52 4f 43 45 53 53 2d 4f 52 2d 4b 45 59 20 69 73 0a t.to.a.child,.PROCESS-OR-KEY.is.
15b20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 20 6f 62 6a 65 63 74 2e 20 20 41 52 47 53 20 the.child.process.object...ARGS.
15b40 69 73 20 61 20 70 6c 69 73 74 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 0a 20 20 28 61 73 79 6e 63 2d is.a.plist...Example:....(async-
15b60 73 65 6e 64 20 70 72 6f 63 20 3a 6f 70 65 72 61 74 69 6f 6e 20 3a 6c 6f 61 64 2d 66 69 6c 65 20 send.proc.:operation.:load-file.
15b80 3a 66 69 6c 65 20 5c 22 74 68 69 73 20 66 69 6c 65 5c 22 29 0a 0a 54 6f 20 73 65 6e 64 20 6d 65 :file.\"this.file\")..To.send.me
15ba0 73 73 61 67 65 73 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 20 74 6f 20 74 68 65 20 70 61 72 ssages.from.the.child.to.the.par
15bc0 65 6e 74 2c 20 50 52 4f 43 45 53 53 2d 4f 52 2d 4b 45 59 20 69 73 0a 74 68 65 20 66 69 72 73 74 ent,.PROCESS-OR-KEY.is.the.first
15be0 20 6b 65 79 20 6f 66 20 74 68 65 20 70 6c 69 73 74 2c 20 41 52 47 53 20 69 73 20 61 20 76 61 6c .key.of.the.plist,.ARGS.is.a.val
15c00 75 65 20 66 6f 6c 6c 6f 77 65 64 20 62 79 0a 6f 70 74 69 6f 6e 61 6c 6c 79 20 6d 6f 72 65 20 6b ue.followed.by.optionally.more.k
15c20 65 79 2d 76 61 6c 75 65 20 70 61 69 72 73 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 0a 20 20 28 61 73 ey-value.pairs...Example:....(as
15c40 79 6e 63 2d 73 65 6e 64 20 3a 73 74 61 74 75 73 20 5c 22 66 69 6e 69 73 68 65 64 5c 22 20 3a 66 ync-send.:status.\"finished\".:f
15c60 69 6c 65 2d 73 69 7a 65 20 31 32 33 29 22 0a 20 20 28 6c 65 74 20 28 28 61 72 67 73 20 28 61 70 ile-size.123)"...(let.((args.(ap
15c80 70 65 6e 64 20 61 72 67 73 20 27 28 3a 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 20 74 29 29 29 29 pend.args.'(:async-message.t))))
15ca0 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 69 6e 2d 63 68 69 6c 64 2d 65 6d 61 63 73 0a 20 20 .....(if.async-in-child-emacs...
15cc0 20 20 20 20 20 20 3b 3b 20 60 70 72 69 6e 63 27 20 62 65 63 61 75 73 65 20 61 73 79 6e 63 2d 2d ......;;.`princ'.because.async--
15ce0 69 6e 73 65 72 74 2d 73 65 78 70 20 61 6c 72 65 61 64 79 20 71 75 6f 74 65 73 20 65 76 65 72 79 insert-sexp.already.quotes.every
15d00 74 68 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 0a 20 20 20 20 20 20 20 20 20 28 thing..........(princ..........(
15d20 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 with-temp-buffer............(asy
15d40 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 28 63 6f 6e 73 20 70 72 6f 63 65 73 73 2d 6f 72 nc--insert-sexp.(cons.process-or
15d60 2d 6b 65 79 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6c 77 61 79 73 -key.args))............;;.always
15d80 20 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 6f 6e 65 20 6d 65 73 73 61 67 65 20 70 61 63 6b .make.sure.that.one.message.pack
15da0 61 67 65 20 68 61 73 20 69 74 73 20 6f 77 6e 0a 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 69 age.has.its.own............;;.li
15dc0 6e 65 20 61 73 20 74 68 65 72 65 20 63 61 6e 20 62 65 20 61 6e 79 20 72 61 6e 64 6f 6d 20 64 65 ne.as.there.can.be.any.random.de
15de0 62 75 67 20 67 61 72 62 61 67 65 20 70 72 69 6e 74 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 3b bug.garbage.printed............;
15e00 3b 20 61 62 6f 76 65 20 69 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 ;.above.it.............(concat."
15e20 5c 6e 22 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 20 20 28 61 73 \n".(buffer-string)))).......(as
15e40 79 6e 63 2d 2d 74 72 61 6e 73 6d 69 74 2d 73 65 78 70 20 70 72 6f 63 65 73 73 2d 6f 72 2d 6b 65 ync--transmit-sexp.process-or-ke
15e60 79 20 28 6c 69 73 74 20 27 71 75 6f 74 65 20 61 72 67 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e y.(list.'quote.args)))))..(defun
15e80 20 61 73 79 6e 63 2d 72 65 63 65 69 76 65 20 28 29 0a 20 20 22 52 65 63 65 69 76 65 20 6d 65 73 .async-receive.()..."Receive.mes
15ea0 73 61 67 65 20 66 72 6f 6d 20 70 61 72 65 6e 74 20 45 6d 61 63 73 2e 0a 0a 54 68 65 20 63 68 69 sage.from.parent.Emacs...The.chi
15ec0 6c 64 20 70 72 6f 63 65 73 73 20 62 6c 6f 63 6b 73 20 75 6e 74 69 6c 20 61 20 6d 65 73 73 61 67 ld.process.blocks.until.a.messag
15ee0 65 20 69 73 20 72 65 63 65 69 76 65 64 2e 0a 0a 4d 65 73 73 61 67 65 20 69 73 20 61 20 70 6c 69 e.is.received...Message.is.a.pli
15f00 73 74 20 77 69 74 68 20 6f 6e 65 20 6b 65 79 20 3a 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 20 73 st.with.one.key.:async-message.s
15f20 65 74 20 74 6f 20 74 20 61 6c 77 61 79 73 0a 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 61 64 64 et.to.t.always.automatically.add
15f40 65 64 20 74 6f 20 73 69 67 6e 69 66 79 20 74 68 69 73 20 70 6c 69 73 74 20 69 73 20 61 6e 20 61 ed.to.signify.this.plist.is.an.a
15f60 73 79 6e 63 20 6d 65 73 73 61 67 65 2e 0a 0a 59 6f 75 20 63 61 6e 20 75 73 65 20 60 61 73 79 6e sync.message...You.can.use.`asyn
15f80 63 2d 6d 65 73 73 61 67 65 2d 70 27 20 74 6f 20 74 65 73 74 20 69 66 20 74 68 65 20 70 61 79 6c c-message-p'.to.test.if.the.payl
15fa0 6f 61 64 20 77 61 73 20 61 0a 6d 65 73 73 61 67 65 2e 0a 0a 55 73 65 0a 0a 20 20 20 28 6c 65 74 oad.was.a.message...Use.....(let
15fc0 20 28 28 6d 73 67 20 28 61 73 79 6e 63 2d 72 65 63 65 69 76 65 29 29 29 20 2e 2e 2e 29 0a 0a 74 .((msg.(async-receive)))....)..t
15fe0 6f 20 72 65 61 64 20 61 6e 64 20 70 72 6f 63 65 73 73 20 61 20 6d 65 73 73 61 67 65 2e 22 0a 20 o.read.and.process.a.message."..
16000 20 28 61 73 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 70 29 29 0a 0a 3b 3b 3b 23 23 23 61 .(async--receive-sexp))..;;;###a
16020 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 74 2d 70 72 6f 63 65 utoload.(defun.async-start-proce
16040 73 73 20 28 6e 61 6d 65 20 70 72 6f 67 72 61 6d 20 66 69 6e 69 73 68 2d 66 75 6e 63 20 26 72 65 ss.(name.program.finish-func.&re
16060 73 74 20 70 72 6f 67 72 61 6d 2d 61 72 67 73 29 0a 20 20 22 53 74 61 72 74 20 74 68 65 20 65 78 st.program-args)..."Start.the.ex
16080 65 63 75 74 61 62 6c 65 20 50 52 4f 47 52 41 4d 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 ecutable.PROGRAM.asynchronously.
160a0 6e 61 6d 65 64 20 4e 41 4d 45 2e 20 20 53 65 65 20 60 61 73 79 6e 63 2d 73 74 61 72 74 27 2e 0a named.NAME...See.`async-start'..
160c0 50 52 4f 47 52 41 4d 20 69 73 20 70 61 73 73 65 64 20 50 52 4f 47 52 41 4d 2d 41 52 47 53 2c 20 PROGRAM.is.passed.PROGRAM-ARGS,.
160e0 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 74 68 65 0a 70 72 6f calling.FINISH-FUNC.with.the.pro
16100 63 65 73 73 20 6f 62 6a 65 63 74 20 77 68 65 6e 20 64 6f 6e 65 2e 20 20 49 66 20 46 49 4e 49 53 cess.object.when.done...If.FINIS
16120 48 2d 46 55 4e 43 20 69 73 20 6e 69 6c 2c 20 74 68 65 20 66 75 74 75 72 65 0a 6f 62 6a 65 63 74 H-FUNC.is.nil,.the.future.object
16140 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 68 65 20 70 72 6f 63 65 73 73 20 6f 62 6a 65 63 74 20 .will.return.the.process.object.
16160 77 68 65 6e 20 74 68 65 20 70 72 6f 67 72 61 6d 20 69 73 0a 66 69 6e 69 73 68 65 64 2e 20 20 53 when.the.program.is.finished...S
16180 65 74 20 44 45 46 41 55 4c 54 2d 44 49 52 45 43 54 4f 52 59 20 74 6f 20 63 68 61 6e 67 65 20 50 et.DEFAULT-DIRECTORY.to.change.P
161a0 52 4f 47 52 41 4d 27 73 20 63 75 72 72 65 6e 74 0a 77 6f 72 6b 69 6e 67 20 64 69 72 65 63 74 6f ROGRAM's.current.working.directo
161c0 72 79 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 62 75 66 20 28 67 65 6e 65 72 61 74 65 2d 6e 65 77 ry."...(let*.((buf.(generate-new
161e0 2d 62 75 66 66 65 72 20 28 63 6f 6e 63 61 74 20 22 2a 22 20 6e 61 6d 65 20 22 2a 22 29 29 29 0a -buffer.(concat."*".name."*"))).
16200 20 20 20 20 20 20 20 20 20 28 62 75 66 2d 65 72 72 20 28 67 65 6e 65 72 61 74 65 2d 6e 65 77 2d .........(buf-err.(generate-new-
16220 62 75 66 66 65 72 20 28 63 6f 6e 63 61 74 20 22 2a 22 20 6e 61 6d 65 20 22 3a 65 72 72 2a 22 29 buffer.(concat."*".name.":err*")
16240 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 74 2d 66 6f 72 2d 70 77 64 20 61 73 79 6e 63 2d 70 ))..........(prt-for-pwd.async-p
16260 72 6f 6d 70 74 2d 66 6f 72 2d 70 61 73 73 77 6f 72 64 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 rompt-for-password)..........(pr
16280 6f 63 20 28 6c 65 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 oc.(let.((process-connection-typ
162a0 65 20 6e 69 6c 29 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 e.nil))..................(make-p
162c0 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 3a 6e 61 6d 65 20 6e rocess...................:name.n
162e0 61 6d 65 0a 20 20 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 ame...................:buffer.bu
16300 66 0a 20 20 20 20 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 f...................:stderr.buf-
16320 65 72 72 0a 20 20 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 err...................:command.(
16340 63 6f 6e 73 20 70 72 6f 67 72 61 6d 20 70 72 6f 67 72 61 6d 2d 61 72 67 73 29 0a 20 20 20 20 20 cons.program.program-args)......
16360 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 71 75 65 72 79 20 61 73 79 6e 63 2d 70 72 6f 63 .............:noquery.async-proc
16380 65 73 73 2d 6e 6f 71 75 65 72 79 2d 6f 6e 2d 65 78 69 74 29 29 29 29 0a 20 20 20 20 28 73 65 74 ess-noquery-on-exit)))).....(set
163a0 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 66 -process-sentinel......(get-buff
163c0 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 61 er-process.buf-err)......(lambda
163e0 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 28 .(proc._change)........(unless.(
16400 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 70 or.async-debug.(process-live-p.p
16420 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 6f roc))..........(kill-buffer.(pro
16440 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 2d cess-buffer.proc))))).....(with-
16460 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 6d current-buffer.buf.......(set.(m
16480 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
164a0 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 6b ck).finish-func).......(set.(mak
164c0 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 72 e-local-variable.'async-read-mar
164e0 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 6b ker)............(set-marker.(mak
16500 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 20 e-marker).(point-min).buf)).....
16520 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 79 ..(set-marker-insertion-type.asy
16540 6e 63 2d 72 65 61 64 2d 6d 61 72 6b 65 72 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 2d 70 nc-read-marker.nil).......(set-p
16560 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 68 65 rocess-sentinel.proc.#'async-whe
16580 6e 2d 64 6f 6e 65 29 0a 20 20 20 20 20 20 3b 3b 20 50 61 73 73 20 74 68 65 20 76 61 6c 75 65 20 n-done).......;;.Pass.the.value.
165a0 6f 66 20 60 61 73 79 6e 63 2d 70 72 6f 6d 70 74 2d 66 6f 72 2d 70 61 73 73 77 6f 72 64 27 20 74 of.`async-prompt-for-password'.t
165c0 6f 20 74 68 65 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 3b 3b 20 66 69 6c 74 65 72 20 66 6e o.the.process.......;;.filter.fn
165e0 20 74 68 72 6f 75 67 68 20 74 68 65 20 6c 65 78 69 63 61 6c 20 6c 6f 63 61 6c 20 76 61 72 20 70 .through.the.lexical.local.var.p
16600 72 74 2d 66 6f 72 2d 70 77 64 20 28 49 73 73 75 65 23 31 38 32 29 2e 0a 20 20 20 20 20 20 28 73 rt-for-pwd.(Issue#182)........(s
16620 65 74 2d 70 72 6f 63 65 73 73 2d 66 69 6c 74 65 72 20 70 72 6f 63 20 28 6c 61 6d 62 64 61 20 28 et-process-filter.proc.(lambda.(
16640 70 72 6f 63 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 proc.string)....................
16660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 72 65 61 64 2d 66 72 6f 6d 2d 63 ..............(async-read-from-c
16680 6c 69 65 6e 74 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 lient...........................
166a0 20 20 20 20 20 20 20 20 70 72 6f 63 20 73 74 72 69 6e 67 20 70 72 74 2d 66 6f 72 2d 70 77 64 29 ........proc.string.prt-for-pwd)
166c0 29 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 )).......(unless.(string=.name."
166e0 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
16700 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
16720 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
16740 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
16760 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.
16780 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
167a0 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
167c0 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
167e0 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
16800 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
16820 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
16840 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)..
16860 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
16880 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."...;;
168a0 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
168c0 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
168e0 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
16900 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
16920 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"))
16940 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...
16960 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
16980 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)))).....
169a0 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"
169c0 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"...........
169e0 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...........
16a00 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
16a20 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..............................
16a40 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
16a60 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)).........................
16a80 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))...........
16aa0 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>")))))..
16ac0 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
16ae0 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
16b00 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
16b20 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
16b40 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
16b60 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
16b80 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...
16ba0 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.
16bc0 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.().......
16be0 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\").
16c00 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)..........
16c20 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.
16c40 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
16c60 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
16c80 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
16ca0 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)
16cc0 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
16ce0 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
16d00 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
16d20 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
16d40 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.`
16d60 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
16d80 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
16da0 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:......
16dc0 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
16de0 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
16e00 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
16e20 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)....
16e40 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
16e60 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
16e80 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.
16ea0 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
16ec0 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
16ee0 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...
16f00 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
16f20 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
16f40 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....
16f60 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.()......
16f80 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.
16fa0 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\")....................
16fc0 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).................
16fe0 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.\
17000 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\
17020 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
17040 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.
17060 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\".............
17080 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.
170a0 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
170c0 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
170e0 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,.
17100 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.
17120 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
17140 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
17160 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
17180 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
171a0 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
171c0 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
171e0 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).
17200 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.
17220 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
17240 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
17260 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
17280 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
172a0 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.
172c0 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
172e0 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
17300 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.
17320 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
17340 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
17360 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
17380 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
173a0 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
173c0 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
173e0 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
17400 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
17420 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
17440 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.
17460 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
17480 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
174a0 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
174c0 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
174e0 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.
17500 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'.".
17520 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).......
17540 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
17560 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..........
17580 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
175a0 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
175c0 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
175e0 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
17600 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..............
17620 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
17640 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..................
17660 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
17680 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))...............
176a0 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..................
176c0 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.(
176e0 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))
17700 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
17720 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
17740 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)
17760 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
17780 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
177a0 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
177c0 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
177e0 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
17800 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
17820 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)).....(
17840 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).......
17860 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.......
17880 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
178a0 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)..........................
178c0 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.....................
178e0 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
17900 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
17920 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
17940 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
17960 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
17980 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))......
179a0 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
179c0 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
179e0 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)....(
17a00 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
17a20 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
17a40 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
17a60 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-
17a80 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)...
17aa0 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
17ac0 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
17ae0 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)..............
17b00 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))))).....
17b20 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...........
17b40 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
17b60 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)
17b80 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
17ba0 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
17bc0 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.......
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 73 6d 74 70 6d 61 69 6c 2d 61 73 79 6e 63 2e 65 6c 00 00 00 async-1.9.9/smtpmail-async.el...
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 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
17c80 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 35 00 20 30 00 00 00 0004666.00000000000.014605..0...
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 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...................
17d20 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...................
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 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
17e20 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
17e40 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.-*-
17e60 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
17e80 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...;;.
17ea0 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
17ec0 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
17ee0 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
17f00 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
17f20 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
17f40 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
17f60 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
17f80 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.
17fa0 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.;
17fc0 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,.
17fe0 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,
18000 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
18020 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
18040 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
18060 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
18080 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
180a0 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
180c0 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.
180e0 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
18100 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
18120 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
18140 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.
18160 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
18180 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
181a0 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
181c0 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
181e0 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:.;;
18200 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).
18220 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
18240 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.;;.....
18260 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.'
18280 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
182a0 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
182c0 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
182e0 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
18300 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
18320 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)..(
18340 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
18360 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.
18380 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.
183a0 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
183c0 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
183e0 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
18400 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
18420 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.()...(
18440 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
18460 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
18480 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
184a0 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-
184c0 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
184e0 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
18500 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
18520 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)
18540 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......
18560 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)......
18580 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).
185a0 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
185c0 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......
185e0 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...
18600 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
18620 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\\)
18640 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"...
18660 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
18680 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
186a0 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
186c0 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
186e0 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).
18700 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)))..
18720 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).
18740 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
18760 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
18780 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
187a0 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...........
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 61 73 79 6e 63 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 async-1.9.9/async-pkg.el........
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 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
18880 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 36 00 20 30 00 00 00 0000606.00000000000.013526..0...
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 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...................
18920 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...................
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 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
18a20 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
18a40 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
18a60 63 22 20 22 31 2e 39 2e 39 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.9"."Asynchronous.process
18a80 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")).
18aa0 3a 63 6f 6d 6d 69 74 20 22 66 33 31 37 62 30 63 39 63 33 65 36 30 61 39 35 39 66 34 35 64 30 33 :commit."f317b0c9c3e60a959f45d03
18ac0 35 65 64 35 65 33 31 61 37 38 66 31 32 36 33 61 63 22 20 3a 61 75 74 68 6f 72 73 20 27 28 28 22 5ed5e31a78f1263ac".:authors.'(("
18ae0 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.
18b00 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
18b20 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")
18b40 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
18b60 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
18b80 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")...........................
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 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 00 00 00 00 00 00 async-1.9.9/.dir-locals.el......
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 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
18c80 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 35 00 20 30 00 00 00 0000664.00000000000.013745..0...
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 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...................
18d20 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...................
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 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.;;
18e20 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
18e40 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").
18e60 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
18e80 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.?#?\\
18ea0 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.
18ec0 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]+\\(
18ee0 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]+\\)?\\)\\)")..........(
18f00 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
18f20 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
18f40 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
18f60 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
18f80 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-
18fa0 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)))).............
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 ................................
19000 61 73 79 6e 63 2d 31 2e 39 2e 39 2f 2e 65 6c 70 61 69 67 6e 6f 72 65 00 00 00 00 00 00 00 00 00 async-1.9.9/.elpaignore.........
19020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19060 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
19080 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 33 00 20 30 00 00 00 0000010.00000000000.013423..0...
190a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
190c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
190e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19100 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...................
19120 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...................
19140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
191a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
191c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
191e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19200 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.........................
19220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
192a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
192c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
192e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
193a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
193c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
193e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
194a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
194c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
194e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
195a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
195c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
195e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
196a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
196c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
196e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
197a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
197c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
197e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
198a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
198c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
198e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
199a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
199c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
199e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
19fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a8a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1a9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aa00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aa20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aa40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aa60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aa80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aaa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ab00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ab20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ab40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ab60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ab80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1abc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1abe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ac00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ac20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ac40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ac60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ac80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1acc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ace0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ad00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ad20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ad40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ad60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ad80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ada0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1adc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ade0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ae00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ae20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ae40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ae60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ae80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1aee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1af00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1af20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1af40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1af60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1af80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1afa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1afc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1afe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1b7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................