| ofs | hex dump | ascii |
|---|---|---|
| 0000 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | async-1.9.8/.................... |
| 0020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0060 | 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000755.0000000.0000000.0000 |
| 0080 | 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 31 33 30 35 00 20 35 00 00 00 | 0000000.00000000000.011305..5... |
| 00a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 00c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 00e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0100 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0120 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0200 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 | async-1.9.8/async-pkg.el........ |
| 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 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 |
| 0280 | 30 30 30 30 36 30 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 35 32 35 00 20 30 00 00 00 | 0000606.00000000000.013525..0... |
| 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 | 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 |
| 0420 | 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 |
| 0440 | 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 |
| 0460 | 63 22 20 22 31 2e 39 2e 38 22 20 22 41 73 79 6e 63 68 72 6f 6e 6f 75 73 20 70 72 6f 63 65 73 73 | c"."1.9.8"."Asynchronous.process |
| 0480 | 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")). |
| 04a0 | 3a 63 6f 6d 6d 69 74 20 22 30 30 65 30 37 65 30 36 30 32 31 38 66 62 64 31 65 31 36 66 61 61 66 | :commit."00e07e060218fbd1e16faaf |
| 04c0 | 31 30 31 31 36 63 30 33 62 31 32 65 36 32 35 38 30 22 20 3a 61 75 74 68 6f 72 73 20 27 28 28 22 | 10116c03b12e62580".:authors.'((" |
| 04e0 | 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. |
| 0500 | 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 |
| 0520 | 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") |
| 0540 | 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 |
| 0560 | 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 |
| 0580 | 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")........................... |
| 05a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0600 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 | async-1.9.8/async.el............ |
| 0620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 35 34 31 37 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 37 35 35 00 20 30 00 00 00 | 0054172.00000000000.012755..0... |
| 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 | 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 |
| 0820 | 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 |
| 0840 | 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 |
| 0860 | 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 |
| 0880 | 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 |
| 08a0 | 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 |
| 08c0 | 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@ |
| 08e0 | 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. |
| 0900 | 32 30 31 32 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 31 2e 39 2e 38 0a 3b 3b 20 50 61 63 6b 61 67 | 2012.;;.Version:.1.9.8.;;.Packag |
| 0920 | 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"))..;; |
| 0940 | 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 |
| 0960 | 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 |
| 0980 | 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 |
| 09a0 | 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 |
| 09c0 | 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 |
| 09e0 | 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 |
| 0a00 | 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. |
| 0a20 | 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 |
| 0a40 | 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. |
| 0a60 | 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.. |
| 0a80 | 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. |
| 0aa0 | 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 |
| 0ac0 | 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; |
| 0ae0 | 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 |
| 0b00 | 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 |
| 0b20 | 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 |
| 0b40 | 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 |
| 0b60 | 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 |
| 0b80 | 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 |
| 0ba0 | 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.;;. |
| 0bc0 | 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 |
| 0be0 | 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 |
| 0c00 | 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 |
| 0c20 | 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 |
| 0c40 | 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 |
| 0c60 | 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 |
| 0c80 | 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 |
| 0ca0 | 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 |
| 0cc0 | 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))..( |
| 0ce0 | 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 |
| 0d00 | 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 |
| 0d20 | 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 |
| 0d40 | 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 |
| 0d60 | 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 |
| 0d80 | 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. |
| 0da0 | 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 |
| 0dc0 | 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 |
| 0de0 | 69 6f 6e 29 0a 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 64 65 62 75 67 20 6e 69 6c 29 0a 28 | ion)..(defvar.async-debug.nil).( |
| 0e00 | 64 65 66 76 61 72 20 61 73 79 6e 63 2d 73 65 6e 64 2d 6f 76 65 72 2d 70 69 70 65 20 74 29 0a 28 | defvar.async-send-over-pipe.t).( |
| 0e20 | 64 65 66 76 61 72 20 61 73 79 6e 63 2d 69 6e 2d 63 68 69 6c 64 2d 65 6d 61 63 73 20 6e 69 6c 29 | defvar.async-in-child-emacs.nil) |
| 0e40 | 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 6e 69 6c 29 0a 28 64 65 | .(defvar.async-callback.nil).(de |
| 0e60 | 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 66 6f 72 2d 70 72 6f 63 65 73 73 20 | fvar.async-callback-for-process. |
| 0e80 | 6e 69 6c 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 69 66 20 74 68 65 20 73 75 62 70 72 6f 63 65 73 73 | nil..."Non-nil.if.the.subprocess |
| 0ea0 | 20 69 73 20 6e 6f 74 20 45 6d 61 63 73 20 65 78 65 63 75 74 69 6e 67 20 61 20 6c 69 73 70 20 66 | .is.not.Emacs.executing.a.lisp.f |
| 0ec0 | 6f 72 6d 2e 22 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 | orm.").(defvar.async-callback-va |
| 0ee0 | 6c 75 65 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d | lue.nil).(defvar.async-callback- |
| 0f00 | 76 61 6c 75 65 2d 73 65 74 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 63 75 72 | value-set.nil).(defvar.async-cur |
| 0f20 | 72 65 6e 74 2d 70 72 6f 63 65 73 73 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d | rent-process.nil).(defvar.async- |
| 0f40 | 2d 70 72 6f 63 76 61 72 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 61 73 79 6e 63 2d 72 65 61 64 | -procvar.nil).(defvar.async-read |
| 0f60 | 2d 6d 61 72 6b 65 72 20 6e 69 6c 0a 20 20 22 50 6f 73 69 74 69 6f 6e 20 66 72 6f 6d 20 77 68 69 | -marker.nil..."Position.from.whi |
| 0f80 | 63 68 20 77 65 20 72 65 61 64 20 74 68 65 20 6c 61 73 74 20 6d 65 73 73 61 67 65 20 70 61 63 6b | ch.we.read.the.last.message.pack |
| 0fa0 | 65 74 2e 0a 0a 4d 65 73 73 61 67 65 20 70 61 63 6b 65 74 73 20 61 72 65 20 64 65 6c 69 76 65 72 | et...Message.packets.are.deliver |
| 0fc0 | 65 64 20 66 72 6f 6d 20 63 6c 69 65 6e 74 20 6c 69 6e 65 2d 62 79 2d 6c 69 6e 65 20 61 73 20 62 | ed.from.client.line-by-line.as.b |
| 0fe0 | 61 73 65 36 34 0a 65 6e 63 6f 64 65 64 20 73 74 72 69 6e 67 73 2e 22 29 0a 28 64 65 66 76 61 72 | ase64.encoded.strings.").(defvar |
| 1000 | 20 61 73 79 6e 63 2d 63 68 69 6c 64 2d 69 6e 69 74 20 6e 69 6c 0a 20 20 22 49 6e 69 74 69 61 6c | .async-child-init.nil..."Initial |
| 1020 | 69 73 61 74 69 6f 6e 20 66 69 6c 65 20 66 6f 72 20 61 73 79 6e 63 20 63 68 69 6c 64 20 45 6d 61 | isation.file.for.async.child.Ema |
| 1040 | 63 73 2e 0a 0a 49 66 20 64 65 66 69 6e 65 64 20 74 68 69 73 20 61 6c 6c 6f 77 73 20 66 6f 72 20 | cs...If.defined.this.allows.for. |
| 1060 | 61 6e 20 69 6e 69 74 20 66 69 6c 65 20 74 6f 20 73 65 74 75 70 20 74 68 65 20 63 68 69 6c 64 20 | an.init.file.to.setup.the.child. |
| 1080 | 45 6d 61 63 73 2e 20 49 74 0a 73 68 6f 75 6c 64 20 6e 6f 74 20 62 65 20 79 6f 75 72 20 6e 6f 72 | Emacs..It.should.not.be.your.nor |
| 10a0 | 6d 61 6c 20 69 6e 69 74 2e 65 6c 20 61 73 20 74 68 61 74 20 77 6f 75 6c 64 20 6c 69 6b 65 6c 79 | mal.init.el.as.that.would.likely |
| 10c0 | 20 6c 6f 61 64 20 6d 6f 72 65 0a 74 68 69 6e 67 73 20 74 68 61 74 20 79 6f 75 20 72 65 71 75 69 | .load.more.things.that.you.requi |
| 10e0 | 72 65 2e 20 49 74 20 73 68 6f 75 6c 64 20 6c 69 6d 69 74 20 69 74 73 65 6c 66 20 74 6f 20 65 6e | re..It.should.limit.itself.to.en |
| 1100 | 73 75 72 69 6e 67 20 70 61 74 68 73 20 68 61 76 65 0a 62 65 65 6e 20 73 65 74 75 70 20 73 6f 20 | suring.paths.have.been.setup.so. |
| 1120 | 61 6e 79 20 61 73 79 6e 63 20 63 6f 64 65 20 63 61 6e 20 6c 6f 61 64 20 6c 69 62 72 61 72 69 65 | any.async.code.can.load.librarie |
| 1140 | 73 20 79 6f 75 20 65 78 70 65 63 74 2e 22 29 0a 0a 3b 3b 20 46 6f 72 20 65 6d 61 63 73 3c 32 39 | s.you.expect.")..;;.For.emacs<29 |
| 1160 | 20 28 6f 6e 6c 79 20 65 78 69 73 74 73 20 69 6e 20 65 6d 61 63 73 2d 32 39 2b 29 2e 0a 28 64 65 | .(only.exists.in.emacs-29+)..(de |
| 1180 | 66 76 61 72 20 70 72 69 6e 74 2d 73 79 6d 62 6f 6c 73 2d 62 61 72 65 29 0a 0a 28 64 65 66 75 6e | fvar.print-symbols-bare)..(defun |
| 11a0 | 20 61 73 79 6e 63 2d 2d 70 75 72 65 63 6f 70 79 20 28 6f 62 6a 65 63 74 29 0a 20 20 22 52 65 6d | .async--purecopy.(object)..."Rem |
| 11c0 | 6f 76 65 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 20 69 6e 20 4f 42 4a 45 43 54 2e 0a 0a | ove.text.properties.in.OBJECT... |
| 11e0 | 41 72 67 75 6d 65 6e 74 20 4f 42 4a 45 43 54 20 6d 61 79 20 62 65 20 61 20 6c 69 73 74 20 6f 72 | Argument.OBJECT.may.be.a.list.or |
| 1200 | 20 61 20 73 74 72 69 6e 67 2c 20 69 66 20 61 6e 79 74 68 69 6e 67 20 65 6c 73 65 20 69 74 0a 69 | .a.string,.if.anything.else.it.i |
| 1220 | 73 20 72 65 74 75 72 6e 65 64 20 75 6e 6d 6f 64 69 66 69 65 64 2e 22 0a 20 20 28 63 6f 6e 64 20 | s.returned.unmodified."...(cond. |
| 1240 | 28 28 73 74 72 69 6e 67 70 20 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 28 73 75 62 73 | ((stringp.object)..........(subs |
| 1260 | 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6f 62 6a 65 63 74 29 29 0a 20 20 20 | tring-no-properties.object)).... |
| 1280 | 20 20 20 20 20 28 28 63 6f 6e 73 70 20 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 28 63 | .....((consp.object)..........(c |
| 12a0 | 6c 2d 6c 6f 6f 70 20 66 6f 72 20 65 6c 6d 20 69 6e 20 6f 62 6a 65 63 74 0a 20 20 20 20 20 20 20 | l-loop.for.elm.in.object........ |
| 12c0 | 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 20 73 74 72 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 | ...........;;.A.string.......... |
| 12e0 | 20 20 20 20 20 20 20 20 20 20 69 66 20 28 73 74 72 69 6e 67 70 20 65 6c 6d 29 0a 20 20 20 20 20 | ..........if.(stringp.elm)...... |
| 1300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 73 75 62 73 74 72 69 6e 67 2d | .............collect.(substring- |
| 1320 | 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 65 6c 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | no-properties.elm).............. |
| 1340 | 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 | .....else...................;;.P |
| 1360 | 72 6f 70 65 72 20 6c 69 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 | roper.lists....................i |
| 1380 | 66 20 28 61 6e 64 20 28 63 6f 6e 73 70 20 65 6c 6d 29 20 28 6e 75 6c 6c 20 28 63 64 72 20 28 6c | f.(and.(consp.elm).(null.(cdr.(l |
| 13a0 | 61 73 74 20 65 6c 6d 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f | ast.elm))))...................co |
| 13c0 | 6c 6c 65 63 74 20 28 61 73 79 6e 63 2d 2d 70 75 72 65 63 6f 70 79 20 65 6c 6d 29 0a 20 20 20 20 | llect.(async--purecopy.elm)..... |
| 13e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..............else.............. |
| 1400 | 20 20 20 20 20 3b 3b 20 44 6f 74 74 65 64 20 6c 69 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 | .....;;.Dotted.lists............ |
| 1420 | 20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 68 61 6e 64 6c 65 20 68 65 72 65 20 6f 6e 6c 79 20 64 | ........;;.We.handle.here.only.d |
| 1440 | 6f 74 74 65 64 20 6c 69 73 74 20 77 68 65 72 65 20 63 61 72 20 61 6e 64 20 63 64 72 0a 20 20 20 | otted.list.where.car.and.cdr.... |
| 1460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 72 65 20 61 74 6f 6d 73 20 69 2e 65 2e | ...............;;.are.atoms.i.e. |
| 1480 | 20 28 78 20 2e 20 79 29 20 61 6e 64 20 6e 6f 74 20 28 78 20 2e 20 28 78 20 2e 20 79 29 29 20 6f | .(x...y).and.not.(x...(x...y)).o |
| 14a0 | 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 78 20 2e 20 28 78 20 79 | r...................;;.(x...(x.y |
| 14c0 | 29 29 20 77 68 69 63 68 20 73 68 6f 75 6c 64 20 66 69 74 20 6d 6f 73 74 20 63 61 73 65 73 2e 0a | )).which.should.fit.most.cases.. |
| 14e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28 61 6e 64 20 28 63 6f 6e 73 70 | ..................if.(and.(consp |
| 1500 | 20 65 6c 6d 29 20 28 63 64 72 20 28 6c 61 73 74 20 65 6c 6d 29 29 29 0a 20 20 20 20 20 20 20 20 | .elm).(cdr.(last.elm)))......... |
| 1520 | 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 6c 65 74 20 28 28 6b 65 79 20 28 63 61 | ..........collect.(let.((key.(ca |
| 1540 | 72 20 65 6c 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | r.elm))......................... |
| 1560 | 20 20 20 20 20 20 20 20 28 76 61 6c 20 28 63 64 72 20 65 6c 6d 29 29 29 0a 20 20 20 20 20 20 20 | ........(val.(cdr.elm)))........ |
| 1580 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 69 66 20 28 | .....................(cons.(if.( |
| 15a0 | 73 74 72 69 6e 67 70 20 6b 65 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | stringp.key).................... |
| 15c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 2d 6e 6f | ...................(substring-no |
| 15e0 | 2d 70 72 6f 70 65 72 74 69 65 73 20 6b 65 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -properties.key)................ |
| 1600 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 65 79 29 0a 20 20 20 20 20 20 | .....................key)....... |
| 1620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 | ............................(if. |
| 1640 | 28 73 74 72 69 6e 67 70 20 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (stringp.val)................... |
| 1660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 2d 6e | ....................(substring-n |
| 1680 | 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | o-properties.val)............... |
| 16a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 29 29 29 0a 20 20 20 | ......................val))).... |
| 16c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ...............else............. |
| 16e0 | 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 65 6c 6d 29 29 0a 20 20 20 20 20 20 20 20 28 74 20 6f | ......collect.elm)).........(t.o |
| 1700 | 62 6a 65 63 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 | bject)))..(defun.async-inject-va |
| 1720 | 72 69 61 62 6c 65 73 0a 20 20 20 20 28 69 6e 63 6c 75 64 65 2d 72 65 67 65 78 70 20 26 6f 70 74 | riables.....(include-regexp.&opt |
| 1740 | 69 6f 6e 61 6c 20 70 72 65 64 69 63 61 74 65 20 65 78 63 6c 75 64 65 2d 72 65 67 65 78 70 20 6e | ional.predicate.exclude-regexp.n |
| 1760 | 6f 70 72 6f 70 73 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 60 73 65 74 71 27 20 66 6f 72 6d 20 | oprops)..."Return.a.`setq'.form. |
| 1780 | 74 68 61 74 20 72 65 70 6c 69 63 61 74 65 73 20 70 61 72 74 20 6f 66 20 74 68 65 20 63 61 6c 6c | that.replicates.part.of.the.call |
| 17a0 | 69 6e 67 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e 0a 0a 49 74 20 73 65 74 73 20 74 68 65 20 76 61 | ing.environment...It.sets.the.va |
| 17c0 | 6c 75 65 20 66 6f 72 20 65 76 65 72 79 20 76 61 72 69 61 62 6c 65 20 6d 61 74 63 68 69 6e 67 20 | lue.for.every.variable.matching. |
| 17e0 | 49 4e 43 4c 55 44 45 2d 52 45 47 45 58 50 20 61 6e 64 0a 61 6c 73 6f 20 50 52 45 44 49 43 41 54 | INCLUDE-REGEXP.and.also.PREDICAT |
| 1800 | 45 2e 20 20 49 74 20 77 69 6c 6c 20 6e 6f 74 20 70 65 72 66 6f 72 6d 20 69 6e 6a 65 63 74 69 6f | E...It.will.not.perform.injectio |
| 1820 | 6e 20 66 6f 72 20 61 6e 79 20 76 61 72 69 61 62 6c 65 0a 6d 61 74 63 68 69 6e 67 20 45 58 43 4c | n.for.any.variable.matching.EXCL |
| 1840 | 55 44 45 2d 52 45 47 45 58 50 20 28 69 66 20 70 72 65 73 65 6e 74 29 20 6f 72 20 72 65 70 72 65 | UDE-REGEXP.(if.present).or.repre |
| 1860 | 73 65 6e 74 69 6e 67 20 61 20 60 73 79 6e 74 61 78 2d 74 61 62 6c 65 27 0a 69 2e 65 2e 20 65 6e | senting.a.`syntax-table'.i.e..en |
| 1880 | 64 69 6e 67 20 62 79 20 5c 22 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 5c 22 2e 0a 57 68 65 6e 20 | ding.by.\"-syntax-table\"..When. |
| 18a0 | 4e 4f 50 52 4f 50 53 20 69 73 20 6e 6f 6e 20 6e 69 6c 20 69 74 20 74 72 69 65 73 20 74 6f 20 73 | NOPROPS.is.non.nil.it.tries.to.s |
| 18c0 | 74 72 69 70 20 6f 75 74 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 20 6f 66 20 65 61 63 68 | trip.out.text.properties.of.each |
| 18e0 | 0a 76 61 72 69 61 62 6c 65 27 73 20 76 61 6c 75 65 20 77 69 74 68 20 60 61 73 79 6e 63 2d 76 61 | .variable's.value.with.`async-va |
| 1900 | 72 69 61 62 6c 65 73 2d 6e 6f 70 72 6f 70 73 2d 66 75 6e 63 74 69 6f 6e 27 2e 0a 0a 49 74 20 69 | riables-noprops-function'...It.i |
| 1920 | 73 20 69 6e 74 65 6e 64 65 64 20 74 6f 20 62 65 20 75 73 65 64 20 61 73 20 66 6f 6c 6c 6f 77 73 | s.intended.to.be.used.as.follows |
| 1940 | 3a 0a 0a 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 5c 5c 3d 60 28 | :......(async-start........\\=`( |
| 1960 | 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 5c 5c 3d | lambda.()...........(require.\\= |
| 1980 | 27 73 6d 74 70 6d 61 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d | 'smtpmail)...........(with-temp- |
| 19a0 | 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 2c 28 62 75 66 | buffer.............(insert.,(buf |
| 19c0 | 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 | fer-substring-no-properties.(poi |
| 19e0 | 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 | nt-min).(point-max)))........... |
| 1a00 | 20 20 3b 3b 20 50 61 73 73 20 69 6e 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 65 6e 76 69 72 6f | ..;;.Pass.in.the.variable.enviro |
| 1a20 | 6e 6d 65 6e 74 20 66 6f 72 20 73 6d 74 70 6d 61 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c | nment.for.smtpmail............., |
| 1a40 | 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 20 5c 22 5c 5c 5c 5c 3d 60 | (async-inject-variables.\"\\\\=` |
| 1a60 | 5c 5c 28 73 6d 74 70 6d 61 69 6c 5c 5c 7c 5c 5c 28 75 73 65 72 2d 5c 5c 29 3f 6d 61 69 6c 5c 5c | \\(smtpmail\\|\\(user-\\)?mail\\ |
| 1a80 | 29 2d 5c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 | )-\").............(smtpmail-send |
| 1aa0 | 2d 69 74 29 29 29 0a 20 20 20 20 20 20 20 5c 5c 3d 27 69 67 6e 6f 72 65 29 22 0a 20 20 60 28 73 | -it)))........\\='ignore)"...`(s |
| 1ac0 | 65 74 71 0a 20 20 20 20 2c 40 28 6c 65 74 20 28 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 | etq.....,@(let.(bindings)....... |
| 1ae0 | 20 20 28 6d 61 70 61 74 6f 6d 73 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 79 | ..(mapatoms..........(lambda.(sy |
| 1b00 | 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 6e 61 6d 65 20 28 61 6e 64 | m)............(let*.((sname.(and |
| 1b20 | 20 28 62 6f 75 6e 64 70 20 73 79 6d 29 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 73 79 6d 29 29 | .(boundp.sym).(symbol-name.sym)) |
| 1b40 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 61 6c 75 65 20 28 61 6e 64 20 | )...................(value.(and. |
| 1b60 | 73 6e 61 6d 65 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 73 79 6d 29 29 29 29 0a 20 20 20 20 | sname.(symbol-value.sym))))..... |
| 1b80 | 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 73 6e 61 6d 65 0a 20 20 20 20 20 20 | .........(when.(and.sname....... |
| 1ba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 6e 75 6c 6c 20 69 6e 63 6c | ..................(or.(null.incl |
| 1bc0 | 75 64 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ude-regexp)..................... |
| 1be0 | 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 69 6e 63 6c 75 64 65 2d 72 65 | ........(string-match.include-re |
| 1c00 | 67 65 78 70 20 73 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | gexp.sname)).................... |
| 1c20 | 20 20 20 20 20 28 6f 72 20 28 6e 75 6c 6c 20 65 78 63 6c 75 64 65 2d 72 65 67 65 78 70 29 0a 20 | .....(or.(null.exclude-regexp).. |
| 1c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 | ...........................(not. |
| 1c60 | 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 65 78 63 6c 75 64 65 2d 72 65 67 65 78 70 20 73 6e 61 | (string-match.exclude-regexp.sna |
| 1c80 | 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e | me))).........................(n |
| 1ca0 | 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 5c | ot.(string-match."-syntax-table\ |
| 1cc0 | 5c 27 22 20 73 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c | \'".sname)))................(unl |
| 1ce0 | 65 73 73 20 28 6f 72 20 28 73 74 72 69 6e 67 70 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 | ess.(or.(stringp.value)......... |
| 1d00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 76 61 6c 75 65 20 27 | ...................(memq.value.' |
| 1d20 | 28 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (nil.t))........................ |
| 1d40 | 20 20 20 20 28 6e 75 6d 62 65 72 70 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ....(numberp.value)............. |
| 1d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 63 74 6f 72 70 20 76 61 6c 75 65 29 29 0a | ...............(vectorp.value)). |
| 1d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76 61 6c 75 65 20 60 28 71 | .................(setq.value.`(q |
| 1da0 | 75 6f 74 65 20 2c 76 61 6c 75 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 | uote.,value)))................(w |
| 1dc0 | 68 65 6e 20 6e 6f 70 72 6f 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 | hen.noprops..................(se |
| 1de0 | 74 71 20 76 61 6c 75 65 20 28 66 75 6e 63 61 6c 6c 20 61 73 79 6e 63 2d 76 61 72 69 61 62 6c 65 | tq.value.(funcall.async-variable |
| 1e00 | 73 2d 6e 6f 70 72 6f 70 73 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | s-noprops-function.............. |
| 1e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65 29 29 | .........................value)) |
| 1e40 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 6e 75 6c 6c | )................(when.(or.(null |
| 1e60 | 20 70 72 65 64 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .predicate)..................... |
| 1e80 | 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 70 72 65 64 69 63 61 74 65 20 73 79 6d 29 29 0a 20 20 | .....(funcall.predicate.sym))... |
| 1ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 69 6e 64 69 6e 67 73 20 28 63 | ...............(setq.bindings.(c |
| 1ec0 | 6f 6e 73 20 76 61 6c 75 65 20 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ons.value.bindings)............. |
| 1ee0 | 20 20 20 20 20 20 20 20 20 20 20 62 69 6e 64 69 6e 67 73 20 28 63 6f 6e 73 20 73 79 6d 20 62 69 | ...........bindings.(cons.sym.bi |
| 1f00 | 6e 64 69 6e 67 73 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 62 69 6e 64 69 6e 67 73 29 29 | ndings))))))).........bindings)) |
| 1f20 | 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 65 6e 76 69 72 | )..(defalias.'async-inject-envir |
| 1f40 | 6f 6e 6d 65 6e 74 20 27 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 29 0a | onment.'async-inject-variables). |
| 1f60 | 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 73 75 6c 74 20 28 66 75 6e | .(defun.async-handle-result.(fun |
| 1f80 | 63 20 72 65 73 75 6c 74 20 62 75 66 29 0a 20 20 28 69 66 20 28 6e 75 6c 6c 20 66 75 6e 63 29 0a | c.result.buf)...(if.(null.func). |
| 1fa0 | 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 2d | ......(progn.........(set.(make- |
| 1fc0 | 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 | local-variable.'async-callback-v |
| 1fe0 | 61 6c 75 65 29 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 | alue).result).........(set.(make |
| 2000 | 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- |
| 2020 | 76 61 6c 75 65 2d 73 65 74 29 20 74 29 29 0a 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 | value-set).t)).....(unwind-prote |
| 2040 | 63 74 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 6c 69 73 74 70 20 72 65 73 75 6c | ct.........(if.(and.(listp.resul |
| 2060 | 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 27 61 73 79 6e 63 2d 73 | t)..................(eq.'async-s |
| 2080 | 69 67 6e 61 6c 20 28 6e 74 68 20 30 20 72 65 73 75 6c 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 | ignal.(nth.0.result))).......... |
| 20a0 | 20 20 20 28 73 69 67 6e 61 6c 20 28 63 61 72 20 28 6e 74 68 20 31 20 72 65 73 75 6c 74 29 29 0a | ...(signal.(car.(nth.1.result)). |
| 20c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 6e 74 68 20 31 20 | ....................(cdr.(nth.1. |
| 20e0 | 72 65 73 75 6c 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 75 6e | result)))...........(funcall.fun |
| 2100 | 63 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 64 | c.result)).......(unless.async-d |
| 2120 | 65 62 75 67 0a 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 | ebug.........(kill-buffer.buf))) |
| 2140 | 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 77 68 65 6e 2d 64 6f 6e 65 20 28 70 72 6f 63 | ))..(defun.async-when-done.(proc |
| 2160 | 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 63 68 61 6e 67 65 29 0a 20 20 22 50 72 6f 63 65 73 73 20 73 | .&optional._change)..."Process.s |
| 2180 | 65 6e 74 69 6e 65 6c 20 75 73 65 64 20 74 6f 20 72 65 74 72 69 65 76 65 20 74 68 65 20 76 61 6c | entinel.used.to.retrieve.the.val |
| 21a0 | 75 65 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 2e 22 0a 20 20 28 77 | ue.from.the.child.process."...(w |
| 21c0 | 68 65 6e 20 28 65 71 20 27 65 78 69 74 20 28 70 72 6f 63 65 73 73 2d 73 74 61 74 75 73 20 70 72 | hen.(eq.'exit.(process-status.pr |
| 21e0 | 6f 63 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 | oc)).....(with-current-buffer.(p |
| 2200 | 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 | rocess-buffer.proc).......(let.( |
| 2220 | 28 61 73 79 6e 63 2d 63 75 72 72 65 6e 74 2d 70 72 6f 63 65 73 73 20 70 72 6f 63 29 29 0a 20 20 | (async-current-process.proc))... |
| 2240 | 20 20 20 20 20 20 28 69 66 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 | ......(if.(=.0.(process-exit-sta |
| 2260 | 74 75 73 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 61 73 79 6e 63 | tus.proc)).............(if.async |
| 2280 | 2d 63 61 6c 6c 62 61 63 6b 2d 66 6f 72 2d 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 | -callback-for-process........... |
| 22a0 | 20 20 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 | ......(if.async-callback........ |
| 22c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .............(prog1............. |
| 22e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 61 73 79 6e 63 2d 63 61 6c 6c 62 | ............(funcall.async-callb |
| 2300 | 61 63 6b 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ack.proc)....................... |
| 2320 | 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 | (unless.async-debug............. |
| 2340 | 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 65 20 6e 65 65 64 20 74 6f 20 63 68 65 63 6b 20 | ............;;.we.need.to.check. |
| 2360 | 74 68 69 73 20 62 65 63 61 75 73 65 20 74 68 65 6f 72 65 74 69 63 61 6c 6c 79 0a 20 20 20 20 20 | this.because.theoretically...... |
| 2380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 61 73 79 6e 63 2d 63 61 6c | ...................;;.`async-cal |
| 23a0 | 6c 62 61 63 6b 27 20 63 6f 75 6c 64 27 76 65 20 6b 69 6c 6c 65 64 20 69 74 20 61 6c 72 65 61 64 | lback'.could've.killed.it.alread |
| 23c0 | 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 | y.........................(when. |
| 23e0 | 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 | (buffer-live-p.(process-buffer.p |
| 2400 | 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | roc))........................... |
| 2420 | 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f | (kill-buffer.(process-buffer.pro |
| 2440 | 63 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d | c)))))...................(set.(m |
| 2460 | 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 |
| 2480 | 63 6b 2d 76 61 6c 75 65 29 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ck-value).proc)................. |
| 24a0 | 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 |
| 24c0 | 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 2d 73 65 74 29 20 74 29 29 0a 20 20 20 20 20 | nc-callback-value-set).t))...... |
| 24e0 | 20 20 20 20 20 20 20 20 20 3b 3b 20 4d 61 79 62 65 20 73 74 72 69 70 20 6f 75 74 20 75 6e 72 65 | .........;;.Maybe.strip.out.unre |
| 2500 | 61 64 61 62 6c 65 20 22 23 22 3b 20 54 68 65 79 20 61 72 65 20 72 65 70 6c 61 63 65 64 20 62 79 | adable."#";.They.are.replaced.by |
| 2520 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 6d 70 74 79 20 73 74 72 69 6e 67 20 75 | ...............;;.empty.string.u |
| 2540 | 6e 6c 65 73 73 20 74 68 65 79 20 61 72 65 20 70 72 65 66 69 78 69 6e 67 20 61 20 73 70 65 63 69 | nless.they.are.prefixing.a.speci |
| 2560 | 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 62 6a 65 63 74 20 6c 69 6b 65 20 | al...............;;.object.like. |
| 2580 | 61 20 6d 61 72 6b 65 72 2e 20 53 65 65 20 69 73 73 75 65 20 23 31 34 35 2e 0a 20 20 20 20 20 20 | a.marker..See.issue.#145........ |
| 25a0 | 20 20 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 | ........(widen)...............(g |
| 25c0 | 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))........... |
| 25e0 | 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ....(save-excursion............. |
| 2600 | 20 20 20 20 3b 3b 20 54 72 61 6e 73 66 6f 72 6d 20 6d 61 72 6b 65 72 73 20 69 6e 20 6c 69 73 74 | ....;;.Transform.markers.in.list |
| 2620 | 20 6c 69 6b 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 6d 61 72 6b 65 72 | .like.................;;.(marker |
| 2640 | 20 28 6d 6f 76 65 73 20 61 66 74 65 72 20 69 6e 73 65 72 74 69 6f 6e 29 20 61 74 20 32 33 33 38 | .(moves.after.insertion).at.2338 |
| 2660 | 20 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 65 73 74 5c 2e 6f 72 67 | .in.................;;.test\.org |
| 2680 | 29 20 73 6f 20 74 68 61 74 20 72 65 6d 61 70 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 20 | ).so.that.remap.text.properties. |
| 26a0 | 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 61 6e 20 | function.................;;.can. |
| 26c0 | 70 61 72 73 65 20 69 74 20 74 6f 20 72 65 73 74 69 74 75 74 65 20 6d 61 72 6b 65 72 2e 0a 20 20 | parse.it.to.restitute.marker.... |
| 26e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d | ..............(while.(re-search- |
| 2700 | 66 6f 72 77 61 72 64 20 22 23 3c 5c 5c 28 5b 5e 3e 5d 2a 5c 5c 29 3e 22 20 6e 69 6c 20 74 29 0a | forward."#<\\([^>]*\\)>".nil.t). |
| 2720 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 | ..................(replace-match |
| 2740 | 20 28 63 6f 6e 63 61 74 20 22 28 22 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 20 22 29 | .(concat."(".(match-string.1).") |
| 2760 | 22 29 20 74 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 | ").t.t)))...............(while.( |
| 2780 | 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 23 28 22 20 6e 69 6c 20 74 29 0a 20 20 | re-search-forward."#(".nil.t)... |
| 27a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 28 22 | ..............(replace-match."(" |
| 27c0 | 20 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 | .t.t))...............(goto-char. |
| 27e0 | 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 61 63 6b | (point-max))...............(back |
| 2800 | 77 61 72 64 2d 73 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 | ward-sexp)...............(let.(( |
| 2820 | 76 61 6c 75 65 20 28 72 65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a | value.(read.(current-buffer)))). |
| 2840 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 | ................(async-handle-re |
| 2860 | 73 75 6c 74 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 76 61 6c 75 65 20 28 63 75 72 72 65 | sult.async-callback.value.(curre |
| 2880 | 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 | nt-buffer))))...........(set.(ma |
| 28a0 | 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 | ke-local-variable.'async-callbac |
| 28c0 | 6b 2d 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 27 65 | k-value)................(list.'e |
| 28e0 | 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 | rror......................(forma |
| 2900 | 74 20 22 41 73 79 6e 63 20 70 72 6f 63 65 73 73 20 27 25 73 27 20 66 61 69 6c 65 64 20 77 69 74 | t."Async.process.'%s'.failed.wit |
| 2920 | 68 20 65 78 69 74 20 63 6f 64 65 20 25 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | h.exit.code.%d"................. |
| 2940 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 6e 61 6d 65 20 70 72 6f 63 29 | .............(process-name.proc) |
| 2960 | 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 29 29 29 29 0a 20 | .(process-exit-status.proc)))).. |
| 2980 | 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 | .........(set.(make-local-variab |
| 29a0 | 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 2d 73 65 74 29 20 74 29 | le.'async-callback-value-set).t) |
| 29c0 | 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 72 65 61 64 2d 66 72 6f 6d 2d 63 6c | )))))..(defun.async-read-from-cl |
| 29e0 | 69 65 6e 74 20 28 70 72 6f 63 20 73 74 72 69 6e 67 29 0a 20 20 22 50 72 6f 63 65 73 73 20 74 65 | ient.(proc.string)..."Process.te |
| 2a00 | 78 74 20 66 72 6f 6d 20 63 6c 69 65 6e 74 20 70 72 6f 63 65 73 73 2e 0a 0a 54 68 65 20 73 74 72 | xt.from.client.process...The.str |
| 2a20 | 69 6e 67 20 63 68 75 6e 6b 73 20 75 73 75 61 6c 6c 79 20 61 72 72 69 76 65 20 69 6e 20 6d 61 78 | ing.chunks.usually.arrive.in.max |
| 2a40 | 69 6d 75 6d 20 6f 66 20 34 30 39 36 20 62 79 74 65 73 2c 20 73 6f 20 61 0a 6c 6f 6e 67 20 63 6c | imum.of.4096.bytes,.so.a.long.cl |
| 2a60 | 69 65 6e 74 20 6d 65 73 73 61 67 65 20 6d 69 67 68 74 20 62 65 20 73 70 6c 69 74 20 69 6e 74 6f | ient.message.might.be.split.into |
| 2a80 | 20 6d 75 6c 74 69 70 6c 65 20 63 61 6c 6c 73 20 6f 66 20 74 68 69 73 0a 66 75 6e 63 74 69 6f 6e | .multiple.calls.of.this.function |
| 2aa0 | 2e 0a 0a 57 65 20 75 73 65 20 61 20 6d 61 72 6b 65 72 20 60 61 73 79 6e 63 2d 72 65 61 64 2d 6d | ...We.use.a.marker.`async-read-m |
| 2ac0 | 61 72 6b 65 72 27 20 74 6f 20 74 72 61 63 6b 20 74 68 65 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 | arker'.to.track.the.position.of. |
| 2ae0 | 74 68 65 0a 6c 61 73 74 73 20 63 6f 6d 70 6c 65 74 65 20 6c 69 6e 65 2e 20 20 45 76 65 72 79 20 | the.lasts.complete.line...Every. |
| 2b00 | 74 69 6d 65 20 77 65 20 67 65 74 20 6e 65 77 20 69 6e 70 75 74 2c 20 77 65 20 74 72 79 20 74 6f | time.we.get.new.input,.we.try.to |
| 2b20 | 20 6c 6f 6f 6b 0a 66 6f 72 20 6e 65 77 6c 69 6e 65 2c 20 61 6e 64 20 69 66 20 66 6f 75 6e 64 2c | .look.for.newline,.and.if.found, |
| 2b40 | 20 70 72 6f 63 65 73 73 20 74 68 65 20 65 6e 74 69 72 65 20 6c 69 6e 65 20 61 6e 64 20 62 75 6d | .process.the.entire.line.and.bum |
| 2b60 | 70 20 74 68 65 0a 6d 61 72 6b 65 72 20 70 6f 73 69 74 69 6f 6e 20 74 6f 20 74 68 65 20 65 6e 64 | p.the.marker.position.to.the.end |
| 2b80 | 20 6f 66 20 74 68 69 73 20 6e 65 78 74 20 6c 69 6e 65 2e 22 0a 20 20 28 77 69 74 68 2d 63 75 72 | .of.this.next.line."...(with-cur |
| 2ba0 | 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 | rent-buffer.(process-buffer.proc |
| 2bc0 | 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 74 72 61 6d 70 2d | ).....(when.(and.(boundp.'tramp- |
| 2be0 | 70 61 73 73 77 6f 72 64 2d 70 72 6f 6d 70 74 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 | password-prompt-regexp)......... |
| 2c00 | 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 74 72 61 6d 70 2d 70 61 73 73 77 | .......(string-match.tramp-passw |
| 2c20 | 6f 72 64 2d 70 72 6f 6d 70 74 2d 72 65 67 65 78 70 20 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 | ord-prompt-regexp.string))...... |
| 2c40 | 20 28 70 72 6f 63 65 73 73 2d 73 65 6e 64 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 70 72 6f | .(process-send-string........pro |
| 2c60 | 63 20 28 63 6f 6e 63 61 74 20 28 72 65 61 64 2d 70 61 73 73 77 64 20 28 6d 61 74 63 68 2d 73 74 | c.(concat.(read-passwd.(match-st |
| 2c80 | 72 69 6e 67 20 30 20 73 74 72 69 6e 67 29 29 20 22 5c 6e 22 29 29 29 0a 20 20 20 20 28 67 6f 74 | ring.0.string))."\n"))).....(got |
| 2ca0 | 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 28 73 61 76 65 2d 65 78 | o-char.(point-max)).....(save-ex |
| 2cc0 | 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 29 0a 0a | cursion.......(insert.string)).. |
| 2ce0 | 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 6e 22 20 | ....(while.(search-forward."\n". |
| 2d00 | 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 | nil.t).......(save-excursion.... |
| 2d20 | 20 20 20 20 20 28 73 61 76 65 2d 72 65 73 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 | .....(save-restriction.......... |
| 2d40 | 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 61 72 72 6f 77 2d 74 6f 2d 72 65 | .(widen)...........(narrow-to-re |
| 2d60 | 67 69 6f 6e 20 61 73 79 6e 63 2d 72 65 61 64 2d 6d 61 72 6b 65 72 20 28 70 6f 69 6e 74 29 29 0a | gion.async-read-marker.(point)). |
| 2d80 | 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 | ..........(goto-char.(point-min) |
| 2da0 | 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 6d 73 67 29 0a 20 20 20 20 20 20 20 20 20 | )...........(let.(msg).......... |
| 2dc0 | 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 | ...(condition-case.nil.......... |
| 2de0 | 20 20 20 20 20 20 20 3b 3b 20 49 74 20 69 73 20 73 61 66 65 20 74 6f 20 74 68 72 6f 77 20 65 72 | .......;;.It.is.safe.to.throw.er |
| 2e00 | 72 6f 72 73 20 69 6e 20 74 68 65 20 72 65 61 64 20 62 65 63 61 75 73 65 20 77 65 0a 20 20 20 20 | rors.in.the.read.because.we..... |
| 2e20 | 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 65 6e 64 20 6d 65 73 73 61 67 65 73 20 61 6c 77 | ............;;.send.messages.alw |
| 2e40 | 61 79 73 20 6f 6e 20 74 68 65 69 72 20 6f 77 6e 20 6c 69 6e 65 2c 20 61 6e 64 20 74 68 65 79 0a | ays.on.their.own.line,.and.they. |
| 2e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 72 65 20 61 6c 77 61 79 73 20 61 20 | ................;;.are.always.a. |
| 2e80 | 62 61 73 65 36 34 20 65 6e 63 6f 64 65 64 20 73 74 72 69 6e 67 2c 20 73 6f 20 61 20 6d 65 73 73 | base64.encoded.string,.so.a.mess |
| 2ea0 | 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 69 6c 6c 20 61 6c 77 61 | age.................;;.will.alwa |
| 2ec0 | 79 73 20 72 65 61 64 2e 20 20 57 65 20 77 69 6c 6c 20 61 6c 73 6f 20 69 67 6e 6f 72 65 20 74 68 | ys.read...We.will.also.ignore.th |
| 2ee0 | 65 20 72 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 66 20 74 68 69 | e.rest.................;;.of.thi |
| 2f00 | 73 20 6c 69 6e 65 20 73 69 6e 63 65 20 74 68 65 72 65 20 77 6f 6e 27 74 20 62 65 20 61 6e 79 74 | s.line.since.there.won't.be.anyt |
| 2f20 | 68 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 6e 74 65 72 65 73 74 | hing.................;;.interest |
| 2f40 | 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 | ing..................(while.(set |
| 2f60 | 71 20 6d 73 67 20 28 72 65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 | q.msg.(read.(current-buffer))).. |
| 2f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 73 67 2d 64 65 63 6f | .................(let.((msg-deco |
| 2fa0 | 64 65 64 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 | ded.(ignore-errors.(base64-decod |
| 2fc0 | 65 2d 73 74 72 69 6e 67 20 6d 73 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-string.msg))))................ |
| 2fe0 | 20 20 20 20 20 28 77 68 65 6e 20 6d 73 67 2d 64 65 63 6f 64 65 64 0a 20 20 20 20 20 20 20 20 20 | .....(when.msg-decoded.......... |
| 3000 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6d 73 67 2d 64 65 63 6f 64 65 64 20 28 | .............(setq.msg-decoded.( |
| 3020 | 63 61 72 20 28 72 65 61 64 2d 66 72 6f 6d 2d 73 74 72 69 6e 67 20 6d 73 67 2d 64 65 63 6f 64 65 | car.(read-from-string.msg-decode |
| 3040 | 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e | d))).......................(when |
| 3060 | 20 28 61 6e 64 20 28 6c 69 73 74 70 20 6d 73 67 2d 64 65 63 6f 64 65 64 29 0a 20 20 20 20 20 20 | .(and.(listp.msg-decoded)....... |
| 3080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e | ...........................(asyn |
| 30a0 | 63 2d 6d 65 73 73 61 67 65 2d 70 20 6d 73 67 2d 64 65 63 6f 64 65 64 29 0a 20 20 20 20 20 20 20 | c-message-p.msg-decoded)........ |
| 30c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 79 6e 63 2d | ..........................async- |
| 30e0 | 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | callback)....................... |
| 3100 | 20 20 28 66 75 6e 63 61 6c 6c 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 20 6d 73 67 2d 64 65 | ..(funcall.async-callback.msg-de |
| 3120 | 63 6f 64 65 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 | coded)))))...............;;.This |
| 3140 | 20 69 73 20 4f 4b 2c 20 77 65 20 72 65 61 63 68 65 64 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 | .is.OK,.we.reached.the.end.of.th |
| 3160 | 65 20 63 68 75 6e 6b 20 73 75 62 70 72 6f 63 65 73 73 20 73 65 6e 74 0a 20 20 20 20 20 20 20 20 | e.chunk.subprocess.sent......... |
| 3180 | 20 20 20 20 20 20 3b 3b 20 61 74 20 74 68 69 73 20 74 69 6d 65 2e 0a 20 20 20 20 20 20 20 20 20 | ......;;.at.this.time........... |
| 31a0 | 20 20 20 20 20 28 69 6e 76 61 6c 69 64 2d 72 65 61 64 2d 73 79 6e 74 61 78 20 74 29 0a 20 20 20 | .....(invalid-read-syntax.t).... |
| 31c0 | 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 2d 6f 66 2d 66 69 6c 65 20 74 29 29 29 0a 20 20 20 | ...........(end-of-file.t))).... |
| 31e0 | 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 | .......(goto-char.(point-max)).. |
| 3200 | 20 20 20 20 20 20 20 20 20 28 6d 6f 76 65 2d 6d 61 72 6b 65 72 20 61 73 79 6e 63 2d 72 65 61 64 | .........(move-marker.async-read |
| 3220 | 2d 6d 61 72 6b 65 72 20 28 70 6f 69 6e 74 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 | -marker.(point)))))))..(defun.as |
| 3240 | 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 74 72 | ync--receive-sexp.(&optional.str |
| 3260 | 65 61 6d 29 0a 20 20 3b 3b 20 46 49 58 4d 45 3a 20 57 68 79 20 75 73 65 20 60 75 74 66 2d 38 2d | eam)...;;.FIXME:.Why.use.`utf-8- |
| 3280 | 61 75 74 6f 27 20 69 6e 73 74 65 61 64 20 6f 66 20 60 75 74 66 2d 38 2d 75 6e 69 78 27 3f 20 20 | auto'.instead.of.`utf-8-unix'?.. |
| 32a0 | 54 68 69 73 20 69 73 0a 20 20 3b 3b 20 61 20 63 6f 6d 6d 75 6e 69 63 61 74 69 6f 6e 20 63 68 61 | This.is...;;.a.communication.cha |
| 32c0 | 6e 6e 65 6c 20 6f 76 65 72 20 77 68 69 63 68 20 77 65 20 68 61 76 65 20 63 6f 6d 70 6c 65 74 65 | nnel.over.which.we.have.complete |
| 32e0 | 20 63 6f 6e 74 72 6f 6c 2c 0a 20 20 3b 3b 20 73 6f 20 77 65 20 67 65 74 20 74 6f 20 63 68 6f 6f | .control,...;;.so.we.get.to.choo |
| 3300 | 73 65 20 65 78 61 63 74 6c 79 20 77 68 69 63 68 20 65 6e 63 6f 64 69 6e 67 20 61 6e 64 20 45 4f | se.exactly.which.encoding.and.EO |
| 3320 | 4c 20 77 65 20 75 73 65 2c 20 69 73 6e 27 74 0a 20 20 3b 3b 20 69 74 3f 0a 20 20 3b 3b 20 55 50 | L.we.use,.isn't...;;.it?...;;.UP |
| 3340 | 44 41 54 45 3a 20 57 65 20 75 73 65 20 6e 6f 77 20 60 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e | DATE:.We.use.now.`utf-8-emacs-un |
| 3360 | 69 78 27 20 69 6e 73 74 65 61 64 20 6f 66 20 60 75 74 66 2d 38 2d 61 75 74 6f 27 20 61 73 0a 20 | ix'.instead.of.`utf-8-auto'.as.. |
| 3380 | 20 3b 3b 20 72 65 63 6f 6d 6d 65 6e 64 65 64 20 69 6e 20 62 75 67 23 31 36 35 2e 0a 20 20 28 6c | .;;.recommended.in.bug#165....(l |
| 33a0 | 65 74 20 28 28 73 65 78 70 20 28 64 65 63 6f 64 65 2d 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 20 | et.((sexp.(decode-coding-string. |
| 33c0 | 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 72 65 61 64 20 73 74 72 65 | (base64-decode-string.(read.stre |
| 33e0 | 61 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | am))............................ |
| 3400 | 20 20 20 20 20 20 20 20 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 29 0a 20 20 20 | .........'utf-8-emacs-unix)).... |
| 3420 | 20 20 20 20 20 3b 3b 20 50 61 72 65 6e 74 20 65 78 70 65 63 74 73 20 55 54 46 2d 38 20 65 6e 63 | .....;;.Parent.expects.UTF-8.enc |
| 3440 | 6f 64 65 64 20 74 65 78 74 2e 0a 20 20 20 20 20 20 20 20 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 | oded.text..........(coding-syste |
| 3460 | 6d 2d 66 6f 72 2d 77 72 69 74 65 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 29 0a | m-for-write.'utf-8-emacs-unix)). |
| 3480 | 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 28 6d 65 73 | ....(if.async-debug.........(mes |
| 34a0 | 73 61 67 65 20 22 52 65 63 65 69 76 65 64 20 73 65 78 70 20 7b 7b 7b 25 73 7d 7d 7d 22 20 28 70 | sage."Received.sexp.{{{%s}}}".(p |
| 34c0 | 70 2d 74 6f 2d 73 74 72 69 6e 67 20 73 65 78 70 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 73 65 | p-to-string.sexp))).....(setq.se |
| 34e0 | 78 70 20 28 72 65 61 64 20 73 65 78 70 29 29 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 64 65 | xp.(read.sexp)).....(if.async-de |
| 3500 | 62 75 67 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 52 65 61 64 20 73 65 78 70 20 | bug.........(message."Read.sexp. |
| 3520 | 7b 7b 7b 25 73 7d 7d 7d 22 20 28 70 70 2d 74 6f 2d 73 74 72 69 6e 67 20 73 65 78 70 29 29 29 0a | {{{%s}}}".(pp-to-string.sexp))). |
| 3540 | 20 20 20 20 28 65 76 61 6c 20 73 65 78 70 20 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e | ....(eval.sexp.t)))..(defun.asyn |
| 3560 | 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 28 73 65 78 70 29 0a 20 20 28 6c 65 74 20 28 70 72 | c--insert-sexp.(sexp)...(let.(pr |
| 3580 | 69 6e 74 2d 6c 65 76 65 6c 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74 2d 6c 65 6e 67 74 68 0a 20 | int-level.........print-length.. |
| 35a0 | 20 20 20 20 20 20 20 28 70 72 69 6e 74 2d 65 73 63 61 70 65 2d 6e 6f 6e 61 73 63 69 69 20 74 29 | .......(print-escape-nonascii.t) |
| 35c0 | 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 74 2d 63 69 72 63 6c 65 20 74 29 0a 20 20 20 20 20 20 | .........(print-circle.t)....... |
| 35e0 | 20 20 3b 3b 20 46 69 78 20 62 75 67 23 31 35 33 20 69 6e 20 65 6d 61 63 73 2d 32 39 20 77 69 74 | ..;;.Fix.bug#153.in.emacs-29.wit |
| 3600 | 68 20 73 79 6d 62 6f 6c 27 73 20 70 6f 73 69 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 28 70 | h.symbol's.positions..........(p |
| 3620 | 72 69 6e 74 2d 73 79 6d 62 6f 6c 73 2d 62 61 72 65 20 74 29 29 0a 20 20 20 20 28 70 72 69 6e 31 | rint-symbols-bare.t)).....(prin1 |
| 3640 | 20 73 65 78 70 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 3b 3b 20 4a | .sexp.(current-buffer)).....;;.J |
| 3660 | 75 73 74 20 69 6e 20 63 61 73 65 20 74 68 65 20 73 74 72 69 6e 67 20 77 65 27 72 65 20 73 65 6e | ust.in.case.the.string.we're.sen |
| 3680 | 64 69 6e 67 20 6d 69 67 68 74 20 63 6f 6e 74 61 69 6e 20 45 4f 46 0a 20 20 20 20 28 65 6e 63 6f | ding.might.contain.EOF.....(enco |
| 36a0 | 64 65 2d 63 6f 64 69 6e 67 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f | de-coding-region.(point-min).(po |
| 36c0 | 69 6e 74 2d 6d 61 78 29 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 0a 20 20 20 20 | int-max).'utf-8-emacs-unix)..... |
| 36e0 | 28 62 61 73 65 36 34 2d 65 6e 63 6f 64 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e | (base64-encode-region.(point-min |
| 3700 | 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 74 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 | ).(point-max).t).....(goto-char. |
| 3720 | 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 20 28 69 6e 73 65 72 74 20 3f 5c 22 29 0a 20 20 20 20 28 67 | (point-min)).(insert.?\").....(g |
| 3740 | 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 20 28 69 6e 73 65 72 74 20 3f 5c | oto-char.(point-max)).(insert.?\ |
| 3760 | 22 20 3f 5c 6e 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 2d 74 72 61 6e 73 6d 69 74 | ".?\n)))..(defun.async--transmit |
| 3780 | 2d 73 65 78 70 20 28 70 72 6f 63 65 73 73 20 73 65 78 70 29 0a 20 20 28 77 69 74 68 2d 74 65 6d | -sexp.(process.sexp)...(with-tem |
| 37a0 | 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 | p-buffer.....(if.async-debug.... |
| 37c0 | 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 72 61 6e 73 6d 69 74 74 69 6e 67 20 73 65 78 70 | .....(message."Transmitting.sexp |
| 37e0 | 20 7b 7b 7b 25 73 7d 7d 7d 22 20 28 70 70 2d 74 6f 2d 73 74 72 69 6e 67 20 73 65 78 70 29 29 29 | .{{{%s}}}".(pp-to-string.sexp))) |
| 3800 | 0a 20 20 20 20 28 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 73 65 78 70 29 0a 20 | .....(async--insert-sexp.sexp).. |
| 3820 | 20 20 20 28 70 72 6f 63 65 73 73 2d 73 65 6e 64 2d 72 65 67 69 6f 6e 20 70 72 6f 63 65 73 73 20 | ...(process-send-region.process. |
| 3840 | 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 | (point-min).(point-max))))..(def |
| 3860 | 75 6e 20 61 73 79 6e 63 2d 62 61 74 63 68 2d 69 6e 76 6f 6b 65 20 28 29 0a 20 20 22 43 61 6c 6c | un.async-batch-invoke.()..."Call |
| 3880 | 65 64 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 20 45 6d 61 63 73 20 70 72 6f 63 65 73 73 27 | ed.from.the.child.Emacs.process' |
| 38a0 | 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 2e 22 0a 20 20 3b 3b 20 4d 61 6b 65 20 73 75 72 65 20 27 | .command.line."...;;.Make.sure.' |
| 38c0 | 6d 65 73 73 61 67 65 27 20 61 6e 64 20 27 70 72 69 6e 31 27 20 65 6e 63 6f 64 65 20 73 74 75 66 | message'.and.'prin1'.encode.stuf |
| 38e0 | 66 20 69 6e 20 55 54 46 2d 38 2c 20 61 73 20 70 61 72 65 6e 74 0a 20 20 3b 3b 20 70 72 6f 63 65 | f.in.UTF-8,.as.parent...;;.proce |
| 3900 | 73 73 20 65 78 70 65 63 74 73 2e 0a 20 20 28 6c 65 74 20 28 28 63 6f 64 69 6e 67 2d 73 79 73 74 | ss.expects....(let.((coding-syst |
| 3920 | 65 6d 2d 66 6f 72 2d 77 72 69 74 65 20 27 75 74 66 2d 38 2d 65 6d 61 63 73 2d 75 6e 69 78 29 0a | em-for-write.'utf-8-emacs-unix). |
| 3940 | 20 20 20 20 20 20 20 20 28 61 72 67 73 2d 6c 65 66 74 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d | ........(args-left.command-line- |
| 3960 | 61 72 67 73 2d 6c 65 66 74 29 29 0a 20 20 20 20 28 73 65 74 71 20 61 73 79 6e 63 2d 69 6e 2d 63 | args-left)).....(setq.async-in-c |
| 3980 | 68 69 6c 64 2d 65 6d 61 63 73 20 74 0a 20 20 20 20 20 20 20 20 20 20 64 65 62 75 67 2d 6f 6e 2d | hild-emacs.t...........debug-on- |
| 39a0 | 65 72 72 6f 72 20 61 73 79 6e 63 2d 64 65 62 75 67 0a 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d | error.async-debug...........comm |
| 39c0 | 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 73 2d 6c 65 66 74 20 6e 69 6c 29 0a 20 20 20 20 28 63 6f 6e | and-line-args-left.nil).....(con |
| 39e0 | 64 69 74 69 6f 6e 2d 63 61 73 65 2d 75 6e 6c 65 73 73 2d 64 65 62 75 67 20 65 72 72 0a 20 20 20 | dition-case-unless-debug.err.... |
| 3a00 | 20 20 20 20 20 28 6c 65 74 20 28 28 72 65 74 20 28 66 75 6e 63 61 6c 6c 0a 20 20 20 20 20 20 20 | .....(let.((ret.(funcall........ |
| 3a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 | .............(async--receive-sex |
| 3a40 | 70 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 73 65 6e 64 2d 6f 76 65 72 2d 70 69 70 65 0a 20 | p.(unless.async-send-over-pipe.. |
| 3a60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3a80 | 20 20 20 20 20 20 20 20 20 20 61 72 67 73 2d 6c 65 66 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 | ..........args-left)))))........ |
| 3aa0 | 20 20 20 3b 3b 20 54 68 65 20 6e 65 77 6c 69 6e 65 73 20 6d 61 6b 65 73 20 63 6c 69 65 6e 74 20 | ...;;.The.newlines.makes.client. |
| 3ac0 | 6d 65 73 73 61 67 65 73 20 6d 6f 72 65 20 72 6f 62 75 73 74 20 61 6e 64 20 61 6c 73 6f 0a 20 20 | messages.more.robust.and.also... |
| 3ae0 | 20 20 20 20 20 20 20 20 3b 3b 20 68 61 6e 64 6c 65 20 73 6f 6d 65 20 77 65 69 72 64 20 6c 69 6e | ........;;.handle.some.weird.lin |
| 3b00 | 65 2d 62 75 66 66 65 72 69 6e 67 20 69 73 73 75 65 73 20 6f 6e 20 77 69 6e 64 6f 77 73 2e 0a 20 | e-buffering.issues.on.windows... |
| 3b20 | 20 20 20 20 20 20 20 20 20 3b 3b 20 53 6f 6d 65 74 69 6d 65 73 2c 20 74 68 65 20 6c 61 73 74 20 | .........;;.Sometimes,.the.last. |
| 3b40 | 22 63 68 75 6e 6b 22 20 77 61 73 20 6e 6f 74 20 72 65 61 64 20 62 79 20 74 68 65 20 66 69 6c 74 | "chunk".was.not.read.by.the.filt |
| 3b60 | 65 72 2c 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 6f 20 61 20 6e 65 77 6c 69 6e 65 20 68 65 | er,...........;;.so.a.newline.he |
| 3b80 | 72 65 20 73 68 6f 75 6c 64 20 66 6f 72 63 65 20 61 20 62 75 66 66 65 72 20 66 6c 75 73 68 2e 0a | re.should.force.a.buffer.flush.. |
| 3ba0 | 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 | ..........(princ."\n").......... |
| 3bc0 | 20 28 70 72 69 6e 31 20 72 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c | .(prin1.ret)...........(princ."\ |
| 3be0 | 6e 22 29 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 0a 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a | n")).......(error........(progn. |
| 3c00 | 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 28 | .........(princ."\n")..........( |
| 3c20 | 70 72 69 6e 31 20 28 6c 69 73 74 20 27 61 73 79 6e 63 2d 73 69 67 6e 61 6c 20 65 72 72 29 29 0a | prin1.(list.'async-signal.err)). |
| 3c40 | 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 5c 6e 22 29 29 29 29 29 29 0a 0a 28 64 65 66 | .........(princ."\n"))))))..(def |
| 3c60 | 75 6e 20 61 73 79 6e 63 2d 72 65 61 64 79 20 28 66 75 74 75 72 65 29 0a 20 20 22 51 75 65 72 79 | un.async-ready.(future)..."Query |
| 3c80 | 20 61 20 46 55 54 55 52 45 20 74 6f 20 73 65 65 20 69 66 20 69 74 20 69 73 20 72 65 61 64 79 2e | .a.FUTURE.to.see.if.it.is.ready. |
| 3ca0 | 0a 0a 49 2e 65 2e 2c 20 69 66 20 6e 6f 20 62 6c 6f 63 6b 69 6e 67 20 77 6f 75 6c 64 20 72 65 73 | ..I.e.,.if.no.blocking.would.res |
| 3cc0 | 75 6c 74 20 66 72 6f 6d 20 61 20 63 61 6c 6c 20 74 6f 20 60 61 73 79 6e 63 2d 67 65 74 27 20 6f | ult.from.a.call.to.`async-get'.o |
| 3ce0 | 6e 20 74 68 61 74 20 46 55 54 55 52 45 2e 22 0a 20 20 28 61 6e 64 20 28 6d 65 6d 71 20 28 70 72 | n.that.FUTURE."...(and.(memq.(pr |
| 3d00 | 6f 63 65 73 73 2d 73 74 61 74 75 73 20 66 75 74 75 72 65 29 20 27 28 65 78 69 74 20 73 69 67 6e | ocess-status.future).'(exit.sign |
| 3d20 | 61 6c 29 29 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 70 72 6f 63 65 73 73 2d | al))........(let.((buf.(process- |
| 3d40 | 62 75 66 66 65 72 20 66 75 74 75 72 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 | buffer.future)))..........(if.(b |
| 3d60 | 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | uffer-live-p.buf)..............( |
| 3d80 | 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 | with-current-buffer.buf......... |
| 3da0 | 20 20 20 20 20 20 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 6b 2d 76 61 6c 75 65 2d 73 65 74 29 | .......async-callback-value-set) |
| 3dc0 | 0a 20 20 20 20 20 20 20 20 20 20 20 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d | ............t))))..(defun.async- |
| 3de0 | 77 61 69 74 20 28 66 75 74 75 72 65 29 0a 20 20 22 57 61 69 74 20 66 6f 72 20 46 55 54 55 52 45 | wait.(future)..."Wait.for.FUTURE |
| 3e00 | 20 74 6f 20 62 65 63 6f 6d 65 20 72 65 61 64 79 2e 22 0a 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 | .to.become.ready."...(while.(not |
| 3e20 | 20 28 61 73 79 6e 63 2d 72 65 61 64 79 20 66 75 74 75 72 65 29 29 0a 20 20 20 20 28 73 6c 65 65 | .(async-ready.future)).....(slee |
| 3e40 | 70 2d 66 6f 72 20 30 2e 30 35 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 67 65 74 20 | p-for.0.05)))..(defun.async-get. |
| 3e60 | 28 66 75 74 75 72 65 29 0a 20 20 22 47 65 74 20 74 68 65 20 76 61 6c 75 65 20 66 72 6f 6d 20 70 | (future)..."Get.the.value.from.p |
| 3e80 | 72 6f 63 65 73 73 20 46 55 54 55 52 45 20 77 68 65 6e 20 69 74 20 69 73 20 72 65 61 64 79 2e 0a | rocess.FUTURE.when.it.is.ready.. |
| 3ea0 | 46 55 54 55 52 45 20 69 73 20 72 65 74 75 72 6e 65 64 20 62 79 20 60 61 73 79 6e 63 2d 73 74 61 | FUTURE.is.returned.by.`async-sta |
| 3ec0 | 72 74 27 20 6f 72 20 60 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 27 20 77 68 65 | rt'.or.`async-start-process'.whe |
| 3ee0 | 6e 0a 69 74 73 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 6e 69 6c 2e 22 0a 20 20 28 61 6e | n.its.FINISH-FUNC.is.nil."...(an |
| 3f00 | 64 20 66 75 74 75 72 65 20 28 61 73 79 6e 63 2d 77 61 69 74 20 66 75 74 75 72 65 29 29 0a 20 20 | d.future.(async-wait.future))... |
| 3f20 | 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 |
| 3f40 | 65 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 | e))).....(when.(buffer-live-p.bu |
| 3f60 | 66 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 | f).......(with-current-buffer.bu |
| 3f80 | 66 0a 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 68 61 6e 64 6c 65 2d 72 65 73 75 6c 74 0a 20 | f.........(async-handle-result.. |
| 3fa0 | 20 20 20 20 20 20 20 20 23 27 69 64 65 6e 74 69 74 79 20 61 73 79 6e 63 2d 63 61 6c 6c 62 61 63 | ........#'identity.async-callbac |
| 3fc0 | 6b 2d 76 61 6c 75 65 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 29 0a 0a 28 | k-value.(current-buffer))))))..( |
| 3fe0 | 64 65 66 75 6e 20 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 70 20 28 76 61 6c 75 65 29 0a 20 20 | defun.async-message-p.(value)... |
| 4000 | 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 56 41 4c 55 45 20 69 73 20 61 6e 20 61 | "Return.non-nil.if.VALUE.is.an.a |
| 4020 | 73 79 6e 63 2e 65 6c 20 6d 65 73 73 61 67 65 20 70 61 63 6b 65 74 2e 22 0a 20 20 28 61 6e 64 20 | sync.el.message.packet."...(and. |
| 4040 | 28 6c 69 73 74 70 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 | (listp.value)........(plist-get. |
| 4060 | 76 61 6c 75 65 20 3a 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 | value.:async-message)))..(defun. |
| 4080 | 61 73 79 6e 63 2d 73 65 6e 64 20 28 70 72 6f 63 65 73 73 2d 6f 72 2d 6b 65 79 20 26 72 65 73 74 | async-send.(process-or-key.&rest |
| 40a0 | 20 61 72 67 73 29 0a 20 20 22 53 65 6e 64 20 74 68 65 20 67 69 76 65 6e 20 6d 65 73 73 61 67 65 | .args)..."Send.the.given.message |
| 40c0 | 20 74 6f 20 74 68 65 20 61 73 79 63 68 72 6f 6e 6f 75 73 20 63 68 69 6c 64 20 6f 72 20 70 61 72 | .to.the.asychronous.child.or.par |
| 40e0 | 65 6e 74 20 45 6d 61 63 73 2e 0a 0a 54 6f 20 73 65 6e 64 20 6d 65 73 73 61 67 65 73 20 66 72 6f | ent.Emacs...To.send.messages.fro |
| 4100 | 6d 20 74 68 65 20 70 61 72 65 6e 74 20 74 6f 20 61 20 63 68 69 6c 64 2c 20 50 52 4f 43 45 53 53 | m.the.parent.to.a.child,.PROCESS |
| 4120 | 2d 4f 52 2d 4b 45 59 20 69 73 0a 74 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 20 6f 62 6a | -OR-KEY.is.the.child.process.obj |
| 4140 | 65 63 74 2e 20 20 41 52 47 53 20 69 73 20 61 20 70 6c 69 73 74 2e 20 20 45 78 61 6d 70 6c 65 3a | ect...ARGS.is.a.plist...Example: |
| 4160 | 0a 0a 20 20 28 61 73 79 6e 63 2d 73 65 6e 64 20 70 72 6f 63 20 3a 6f 70 65 72 61 74 69 6f 6e 20 | ....(async-send.proc.:operation. |
| 4180 | 3a 6c 6f 61 64 2d 66 69 6c 65 20 3a 66 69 6c 65 20 5c 22 74 68 69 73 20 66 69 6c 65 5c 22 29 0a | :load-file.:file.\"this.file\"). |
| 41a0 | 0a 54 6f 20 73 65 6e 64 20 6d 65 73 73 61 67 65 73 20 66 72 6f 6d 20 74 68 65 20 63 68 69 6c 64 | .To.send.messages.from.the.child |
| 41c0 | 20 74 6f 20 74 68 65 20 70 61 72 65 6e 74 2c 20 50 52 4f 43 45 53 53 2d 4f 52 2d 4b 45 59 20 69 | .to.the.parent,.PROCESS-OR-KEY.i |
| 41e0 | 73 0a 74 68 65 20 66 69 72 73 74 20 6b 65 79 20 6f 66 20 74 68 65 20 70 6c 69 73 74 2c 20 41 52 | s.the.first.key.of.the.plist,.AR |
| 4200 | 47 53 20 69 73 20 61 20 76 61 6c 75 65 20 66 6f 6c 6c 6f 77 65 64 20 62 79 0a 6f 70 74 69 6f 6e | GS.is.a.value.followed.by.option |
| 4220 | 61 6c 6c 79 20 6d 6f 72 65 20 6b 65 79 2d 76 61 6c 75 65 20 70 61 69 72 73 2e 20 20 45 78 61 6d | ally.more.key-value.pairs...Exam |
| 4240 | 70 6c 65 3a 0a 0a 20 20 28 61 73 79 6e 63 2d 73 65 6e 64 20 3a 73 74 61 74 75 73 20 5c 22 66 69 | ple:....(async-send.:status.\"fi |
| 4260 | 6e 69 73 68 65 64 5c 22 20 3a 66 69 6c 65 2d 73 69 7a 65 20 31 32 33 29 22 0a 20 20 28 6c 65 74 | nished\".:file-size.123)"...(let |
| 4280 | 20 28 28 61 72 67 73 20 28 61 70 70 65 6e 64 20 61 72 67 73 20 27 28 3a 61 73 79 6e 63 2d 6d 65 | .((args.(append.args.'(:async-me |
| 42a0 | 73 73 61 67 65 20 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 61 73 79 6e 63 2d 69 6e 2d 63 68 69 | ssage.t)))).....(if.async-in-chi |
| 42c0 | 6c 64 2d 65 6d 61 63 73 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 70 72 69 6e 63 27 20 62 65 63 61 | ld-emacs.........;;.`princ'.beca |
| 42e0 | 75 73 65 20 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 61 6c 72 65 61 64 79 20 71 | use.async--insert-sexp.already.q |
| 4300 | 75 6f 74 65 73 20 65 76 65 72 79 74 68 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 | uotes.everything..........(princ |
| 4320 | 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 | ..........(with-temp-buffer..... |
| 4340 | 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 2d 69 6e 73 65 72 74 2d 73 65 78 70 20 28 63 6f 6e 73 | .......(async--insert-sexp.(cons |
| 4360 | 20 70 72 6f 63 65 73 73 2d 6f 72 2d 6b 65 79 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 | .process-or-key.args)).......... |
| 4380 | 20 20 3b 3b 20 61 6c 77 61 79 73 20 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 6f 6e 65 20 6d | ..;;.always.make.sure.that.one.m |
| 43a0 | 65 73 73 61 67 65 20 70 61 63 6b 61 67 65 20 68 61 73 20 69 74 73 20 6f 77 6e 0a 20 20 20 20 20 | essage.package.has.its.own...... |
| 43c0 | 20 20 20 20 20 20 3b 3b 20 6c 69 6e 65 20 61 73 20 74 68 65 72 65 20 63 61 6e 20 62 65 20 61 6e | ......;;.line.as.there.can.be.an |
| 43e0 | 79 20 72 61 6e 64 6f 6d 20 64 65 62 75 67 20 67 61 72 62 61 67 65 20 70 72 69 6e 74 65 64 0a 20 | y.random.debug.garbage.printed.. |
| 4400 | 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 62 6f 76 65 20 69 74 2e 0a 20 20 20 20 20 20 20 20 20 | ..........;;.above.it........... |
| 4420 | 20 20 28 63 6f 6e 63 61 74 20 22 5c 6e 22 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 | ..(concat."\n".(buffer-string))) |
| 4440 | 29 0a 20 20 20 20 20 20 28 61 73 79 6e 63 2d 2d 74 72 61 6e 73 6d 69 74 2d 73 65 78 70 20 70 72 | ).......(async--transmit-sexp.pr |
| 4460 | 6f 63 65 73 73 2d 6f 72 2d 6b 65 79 20 28 6c 69 73 74 20 27 71 75 6f 74 65 20 61 72 67 73 29 29 | ocess-or-key.(list.'quote.args)) |
| 4480 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 72 65 63 65 69 76 65 20 28 29 0a 20 20 22 | )))..(defun.async-receive.()..." |
| 44a0 | 52 65 63 65 69 76 65 20 6d 65 73 73 61 67 65 20 66 72 6f 6d 20 70 61 72 65 6e 74 20 45 6d 61 63 | Receive.message.from.parent.Emac |
| 44c0 | 73 2e 0a 0a 54 68 65 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 20 62 6c 6f 63 6b 73 20 75 6e 74 | s...The.child.process.blocks.unt |
| 44e0 | 69 6c 20 61 20 6d 65 73 73 61 67 65 20 69 73 20 72 65 63 65 69 76 65 64 2e 0a 0a 4d 65 73 73 61 | il.a.message.is.received...Messa |
| 4500 | 67 65 20 69 73 20 61 20 70 6c 69 73 74 20 77 69 74 68 20 6f 6e 65 20 6b 65 79 20 3a 61 73 79 6e | ge.is.a.plist.with.one.key.:asyn |
| 4520 | 63 2d 6d 65 73 73 61 67 65 20 73 65 74 20 74 6f 20 74 20 61 6c 77 61 79 73 0a 61 75 74 6f 6d 61 | c-message.set.to.t.always.automa |
| 4540 | 74 69 63 61 6c 6c 79 20 61 64 64 65 64 20 74 6f 20 73 69 67 6e 69 66 79 20 74 68 69 73 20 70 6c | tically.added.to.signify.this.pl |
| 4560 | 69 73 74 20 69 73 20 61 6e 20 61 73 79 6e 63 20 6d 65 73 73 61 67 65 2e 0a 0a 59 6f 75 20 63 61 | ist.is.an.async.message...You.ca |
| 4580 | 6e 20 75 73 65 20 60 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 70 27 20 74 6f 20 74 65 73 74 20 | n.use.`async-message-p'.to.test. |
| 45a0 | 69 66 20 74 68 65 20 70 61 79 6c 6f 61 64 20 77 61 73 20 61 0a 6d 65 73 73 61 67 65 2e 0a 0a 55 | if.the.payload.was.a.message...U |
| 45c0 | 73 65 0a 0a 20 20 20 28 6c 65 74 20 28 28 6d 73 67 20 28 61 73 79 6e 63 2d 72 65 63 65 69 76 65 | se.....(let.((msg.(async-receive |
| 45e0 | 29 29 29 20 2e 2e 2e 29 0a 0a 74 6f 20 72 65 61 64 20 61 6e 64 20 70 72 6f 63 65 73 73 20 61 20 | )))....)..to.read.and.process.a. |
| 4600 | 6d 65 73 73 61 67 65 2e 22 0a 20 20 28 61 73 79 6e 63 2d 2d 72 65 63 65 69 76 65 2d 73 65 78 70 | message."...(async--receive-sexp |
| 4620 | 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d | ))..;;;###autoload.(defun.async- |
| 4640 | 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 28 6e 61 6d 65 20 70 72 6f 67 72 61 6d 20 66 69 6e 69 | start-process.(name.program.fini |
| 4660 | 73 68 2d 66 75 6e 63 20 26 72 65 73 74 20 70 72 6f 67 72 61 6d 2d 61 72 67 73 29 0a 20 20 22 53 | sh-func.&rest.program-args)..."S |
| 4680 | 74 61 72 74 20 74 68 65 20 65 78 65 63 75 74 61 62 6c 65 20 50 52 4f 47 52 41 4d 20 61 73 79 6e | tart.the.executable.PROGRAM.asyn |
| 46a0 | 63 68 72 6f 6e 6f 75 73 6c 79 20 6e 61 6d 65 64 20 4e 41 4d 45 2e 20 20 53 65 65 20 60 61 73 79 | chronously.named.NAME...See.`asy |
| 46c0 | 6e 63 2d 73 74 61 72 74 27 2e 0a 50 52 4f 47 52 41 4d 20 69 73 20 70 61 73 73 65 64 20 50 52 4f | nc-start'..PROGRAM.is.passed.PRO |
| 46e0 | 47 52 41 4d 2d 41 52 47 53 2c 20 63 61 6c 6c 69 6e 67 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 77 | GRAM-ARGS,.calling.FINISH-FUNC.w |
| 4700 | 69 74 68 20 74 68 65 0a 70 72 6f 63 65 73 73 20 6f 62 6a 65 63 74 20 77 68 65 6e 20 64 6f 6e 65 | ith.the.process.object.when.done |
| 4720 | 2e 20 20 49 66 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 6e 69 6c 2c 20 74 68 65 20 66 75 | ...If.FINISH-FUNC.is.nil,.the.fu |
| 4740 | 74 75 72 65 0a 6f 62 6a 65 63 74 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 68 65 20 70 72 6f 63 | ture.object.will.return.the.proc |
| 4760 | 65 73 73 20 6f 62 6a 65 63 74 20 77 68 65 6e 20 74 68 65 20 70 72 6f 67 72 61 6d 20 69 73 0a 66 | ess.object.when.the.program.is.f |
| 4780 | 69 6e 69 73 68 65 64 2e 20 20 53 65 74 20 44 45 46 41 55 4c 54 2d 44 49 52 45 43 54 4f 52 59 20 | inished...Set.DEFAULT-DIRECTORY. |
| 47a0 | 74 6f 20 63 68 61 6e 67 65 20 50 52 4f 47 52 41 4d 27 73 20 63 75 72 72 65 6e 74 0a 77 6f 72 6b | to.change.PROGRAM's.current.work |
| 47c0 | 69 6e 67 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 62 75 66 20 28 67 | ing.directory."...(let*.((buf.(g |
| 47e0 | 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 28 63 6f 6e 63 61 74 20 22 2a 22 20 6e | enerate-new-buffer.(concat."*".n |
| 4800 | 61 6d 65 20 22 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 2d 65 72 72 20 28 67 65 | ame."*")))..........(buf-err.(ge |
| 4820 | 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 28 63 6f 6e 63 61 74 20 22 2a 22 20 6e 61 | nerate-new-buffer.(concat."*".na |
| 4840 | 6d 65 20 22 3a 65 72 72 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 20 28 6c 65 | me.":err*")))..........(proc.(le |
| 4860 | 74 20 28 28 70 72 6f 63 65 73 73 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 74 79 70 65 20 6e 69 6c 29 | t.((process-connection-type.nil) |
| 4880 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 70 72 6f 63 65 73 73 | )..................(make-process |
| 48a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 61 6d 65 20 6e 61 6d 65 0a 20 20 | ...................:name.name... |
| 48c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 | ................:buffer.buf..... |
| 48e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 64 65 72 72 20 62 75 66 2d 65 72 72 0a 20 20 | ..............:stderr.buf-err... |
| 4900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 61 6e 64 20 28 63 6f 6e 73 20 70 | ................:command.(cons.p |
| 4920 | 72 6f 67 72 61 6d 20 70 72 6f 67 72 61 6d 2d 61 72 67 73 29 29 29 29 29 0a 20 20 20 20 28 73 65 | rogram.program-args))))).....(se |
| 4940 | 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 0a 20 20 20 20 20 28 67 65 74 2d 62 75 66 | t-process-sentinel......(get-buf |
| 4960 | 66 65 72 2d 70 72 6f 63 65 73 73 20 62 75 66 2d 65 72 72 29 0a 20 20 20 20 20 28 6c 61 6d 62 64 | fer-process.buf-err)......(lambd |
| 4980 | 61 20 28 70 72 6f 63 20 5f 63 68 61 6e 67 65 29 0a 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 | a.(proc._change)........(unless. |
| 49a0 | 28 6f 72 20 61 73 79 6e 63 2d 64 65 62 75 67 20 28 70 72 6f 63 65 73 73 2d 6c 69 76 65 2d 70 20 | (or.async-debug.(process-live-p. |
| 49c0 | 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 70 72 | proc))..........(kill-buffer.(pr |
| 49e0 | 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 29 29 29 29 0a 20 20 20 20 28 77 69 74 68 | ocess-buffer.proc))))).....(with |
| 4a00 | 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 28 73 65 74 20 28 | -current-buffer.buf.......(set.( |
| 4a20 | 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 63 61 6c 6c 62 | make-local-variable.'async-callb |
| 4a40 | 61 63 6b 29 20 66 69 6e 69 73 68 2d 66 75 6e 63 29 0a 20 20 20 20 20 20 28 73 65 74 20 28 6d 61 | ack).finish-func).......(set.(ma |
| 4a60 | 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 61 73 79 6e 63 2d 72 65 61 64 2d 6d 61 | ke-local-variable.'async-read-ma |
| 4a80 | 72 6b 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 6d 61 72 6b 65 72 20 28 6d 61 | rker)............(set-marker.(ma |
| 4aa0 | 6b 65 2d 6d 61 72 6b 65 72 29 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 62 75 66 29 29 0a 20 20 20 | ke-marker).(point-min).buf)).... |
| 4ac0 | 20 20 20 28 73 65 74 2d 6d 61 72 6b 65 72 2d 69 6e 73 65 72 74 69 6f 6e 2d 74 79 70 65 20 61 73 | ...(set-marker-insertion-type.as |
| 4ae0 | 79 6e 63 2d 72 65 61 64 2d 6d 61 72 6b 65 72 20 6e 69 6c 29 0a 0a 20 20 20 20 20 20 28 73 65 74 | ync-read-marker.nil)........(set |
| 4b00 | 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 20 70 72 6f 63 20 23 27 61 73 79 6e 63 2d 77 | -process-sentinel.proc.#'async-w |
| 4b20 | 68 65 6e 2d 64 6f 6e 65 29 0a 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 66 69 6c | hen-done).......(set-process-fil |
| 4b40 | 74 65 72 20 70 72 6f 63 20 23 27 61 73 79 6e 63 2d 72 65 61 64 2d 66 72 6f 6d 2d 63 6c 69 65 6e | ter.proc.#'async-read-from-clien |
| 4b60 | 74 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 6e 61 6d 65 20 22 | t).......(unless.(string=.name." |
| 4b80 | 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 |
| 4ba0 | 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 |
| 4bc0 | 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 |
| 4be0 | 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 |
| 4c00 | 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. |
| 4c20 | 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 |
| 4c40 | 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 |
| 4c60 | 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 |
| 4c80 | 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 |
| 4ca0 | 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 |
| 4cc0 | 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 |
| 4ce0 | 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).. |
| 4d00 | 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 |
| 4d20 | 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."...;; |
| 4d40 | 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 |
| 4d60 | 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 |
| 4d80 | 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 |
| 4da0 | 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 |
| 4dc0 | 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")) |
| 4de0 | 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... |
| 4e00 | 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 |
| 4e20 | 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))))..... |
| 4e40 | 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" |
| 4e60 | 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"........... |
| 4e80 | 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........... |
| 4ea0 | 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 |
| 4ec0 | 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.............................. |
| 4ee0 | 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 |
| 4f00 | 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))......................... |
| 4f20 | 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))........... |
| 4f40 | 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>"))))).. |
| 4f60 | 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 |
| 4f80 | 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 |
| 4fa0 | 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 |
| 4fc0 | 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 |
| 4fe0 | 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 |
| 5000 | 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 |
| 5020 | 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... |
| 5040 | 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. |
| 5060 | 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.()....... |
| 5080 | 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\"). |
| 50a0 | 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).......... |
| 50c0 | 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. |
| 50e0 | 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 |
| 5100 | 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 |
| 5120 | 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 |
| 5140 | 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) |
| 5160 | 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 |
| 5180 | 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 |
| 51a0 | 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 |
| 51c0 | 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 |
| 51e0 | 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.` |
| 5200 | 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 |
| 5220 | 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 |
| 5240 | 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:...... |
| 5260 | 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 |
| 5280 | 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 |
| 52a0 | 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 |
| 52c0 | 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).... |
| 52e0 | 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 |
| 5300 | 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 |
| 5320 | 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. |
| 5340 | 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 |
| 5360 | 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 |
| 5380 | 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... |
| 53a0 | 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 |
| 53c0 | 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 |
| 53e0 | 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.... |
| 5400 | 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.()...... |
| 5420 | 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. |
| 5440 | 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\").................... |
| 5460 | 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)................. |
| 5480 | 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.\ |
| 54a0 | 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\ |
| 54c0 | 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 |
| 54e0 | 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. |
| 5500 | 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\"............. |
| 5520 | 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. |
| 5540 | 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 |
| 5560 | 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 |
| 5580 | 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,. |
| 55a0 | 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. |
| 55c0 | 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 |
| 55e0 | 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 |
| 5600 | 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 |
| 5620 | 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 |
| 5640 | 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 |
| 5660 | 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 |
| 5680 | 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). |
| 56a0 | 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. |
| 56c0 | 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 |
| 56e0 | 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 |
| 5700 | 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 |
| 5720 | 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 |
| 5740 | 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. |
| 5760 | 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 |
| 5780 | 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 |
| 57a0 | 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. |
| 57c0 | 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 |
| 57e0 | 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 |
| 5800 | 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 |
| 5820 | 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 |
| 5840 | 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 |
| 5860 | 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 |
| 5880 | 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 |
| 58a0 | 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 |
| 58c0 | 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 |
| 58e0 | 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. |
| 5900 | 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 |
| 5920 | 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 |
| 5940 | 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 |
| 5960 | 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 |
| 5980 | 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. |
| 59a0 | 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'.". |
| 59c0 | 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)....... |
| 59e0 | 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 |
| 5a00 | 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.......... |
| 5a20 | 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 |
| 5a40 | 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 |
| 5a60 | 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 |
| 5a80 | 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 |
| 5aa0 | 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.............. |
| 5ac0 | 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 |
| 5ae0 | 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.................. |
| 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 69 6e 76 6f 63 | ...........................invoc |
| 5b20 | 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))............... |
| 5b40 | 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.................. |
| 5b60 | 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.( |
| 5b80 | 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)) |
| 5ba0 | 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 |
| 5bc0 | 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 |
| 5be0 | 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) |
| 5c00 | 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 |
| 5c20 | 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 |
| 5c40 | 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 |
| 5c60 | 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 |
| 5c80 | 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 |
| 5ca0 | 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 |
| 5cc0 | 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)).....( |
| 5ce0 | 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)....... |
| 5d00 | 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....... |
| 5d20 | 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 |
| 5d40 | 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).......................... |
| 5d60 | 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..................... |
| 5d80 | 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 |
| 5da0 | 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 |
| 5dc0 | 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 |
| 5de0 | 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 |
| 5e00 | 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 |
| 5e20 | 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))...... |
| 5e40 | 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 |
| 5e60 | 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 |
| 5e80 | 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)....( |
| 5ea0 | 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 |
| 5ec0 | 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 |
| 5ee0 | 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 |
| 5f00 | 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- |
| 5f20 | 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)... |
| 5f40 | 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 |
| 5f60 | 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 |
| 5f80 | 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).............. |
| 5fa0 | 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)))))..... |
| 5fc0 | 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........... |
| 5fe0 | 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 |
| 6000 | 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) |
| 6020 | 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 |
| 6040 | 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 |
| 6060 | 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....... |
| 6080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 60a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 60c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 60e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 61a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 61c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 61e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6200 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 64 69 72 65 64 2d 61 73 79 6e 63 2e 65 6c 00 00 00 00 00 00 | async-1.9.8/dired-async.el...... |
| 6220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6260 | 00 00 00 00 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 |
| 6280 | 30 30 35 31 30 32 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 30 33 30 00 20 30 00 00 00 | 0051021.00000000000.014030..0... |
| 62a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 62c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 62e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6300 | 00 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................... |
| 6320 | 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................... |
| 6340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 63a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 63c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 63e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6400 | 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 |
| 6420 | 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 |
| 6440 | 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 |
| 6460 | 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 |
| 6480 | 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 |
| 64a0 | 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>.;;....... |
| 64c0 | 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 |
| 64e0 | 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 |
| 6500 | 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 |
| 6520 | 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..; |
| 6540 | 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; |
| 6560 | 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. |
| 6580 | 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. |
| 65a0 | 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 |
| 65c0 | 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 |
| 65e0 | 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 |
| 6600 | 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. |
| 6620 | 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 |
| 6640 | 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 |
| 6660 | 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,.; |
| 6680 | 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 |
| 66a0 | 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 |
| 66c0 | 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 |
| 66e0 | 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 |
| 6700 | 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. |
| 6720 | 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 |
| 6740 | 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 |
| 6760 | 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 |
| 6780 | 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 |
| 67a0 | 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/> |
| 67c0 | 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 |
| 67e0 | 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 |
| 6800 | 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 |
| 6820 | 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 |
| 6840 | 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 |
| 6860 | 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. |
| 6880 | 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 |
| 68a0 | 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 |
| 68c0 | 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:. |
| 68e0 | 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)..;; |
| 6900 | 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 |
| 6920 | 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. |
| 6940 | 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). |
| 6960 | 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 |
| 6980 | 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 |
| 69a0 | 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. |
| 69c0 | 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 |
| 69e0 | 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." |
| 6a00 | 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 |
| 6a20 | 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.. |
| 6a40 | 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 |
| 6a60 | 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\\)- |
| 6a80 | 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 |
| 6aa0 | 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 |
| 6ac0 | 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 |
| 6ae0 | 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 |
| 6b00 | 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. |
| 6b20 | 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 |
| 6b40 | 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 |
| 6b60 | 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'.". |
| 6b80 | 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. |
| 6ba0 | 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 |
| 6bc0 | 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 |
| 6be0 | 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 |
| 6c00 | 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). |
| 6c20 | 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 |
| 6c40 | 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.................... |
| 6c60 | 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 |
| 6c80 | 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)............ |
| 6ca0 | 20 20 20 20 20 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 |
| 6cc0 | 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 |
| 6ce0 | 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 |
| 6d00 | 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 |
| 6d20 | 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 |
| 6d40 | 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 |
| 6d60 | 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 |
| 6d80 | 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 |
| 6da0 | 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 |
| 6dc0 | 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."...: |
| 6de0 | 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 |
| 6e00 | 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 |
| 6e20 | 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 |
| 6e40 | 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 |
| 6e60 | 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 |
| 6e80 | 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 |
| 6ea0 | 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 65 64 2d 61 73 | ype.'integer)..(defface.dired-as |
| 6ec0 | 79 6e 63 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 27 28 28 74 20 28 3a 66 6f 72 65 67 72 6f 75 6e | ync-message.....'((t.(:foregroun |
| 6ee0 | 64 20 22 79 65 6c 6c 6f 77 22 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 6d | d."yellow")))..."Face.used.for.m |
| 6f00 | 6f 64 65 2d 6c 69 6e 65 20 6d 65 73 73 61 67 65 2e 22 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 | ode-line.message.")..(defface.di |
| 6f20 | 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c 75 72 65 73 0a 20 20 20 20 27 28 28 74 20 28 3a 66 6f | red-async-failures.....'((t.(:fo |
| 6f40 | 72 65 67 72 6f 75 6e 64 20 22 72 65 64 22 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 | reground."red")))..."Face.used.f |
| 6f60 | 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 |
| 6f80 | 65 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 27 | e.dired-async-mode-message.....' |
| 6fa0 | 28 28 74 20 28 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 47 6f 6c 64 22 29 29 29 0a 20 20 22 46 61 | ((t.(:foreground."Gold")))..."Fa |
| 6fc0 | 63 65 20 75 73 65 64 20 66 6f 72 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d 6f 64 65 6c 69 | ce.used.for.`dired-async--modeli |
| 6fe0 | 6e 65 2d 6d 6f 64 65 27 20 6c 69 67 68 74 65 72 2e 22 29 0a 0a 28 64 65 66 69 6e 65 2d 6d 69 6e | ne-mode'.lighter.")..(define-min |
| 7000 | 6f 72 2d 6d 6f 64 65 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f | or-mode.dired-async--modeline-mo |
| 7020 | 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 |
| 7040 | 20 61 73 79 6e 63 20 70 72 6f 63 65 73 73 20 72 75 6e 2e 22 0a 20 20 3a 67 6c 6f 62 61 6c 20 74 | .async.process.run."...:global.t |
| 7060 | 0a 20 20 3a 6c 69 67 68 74 65 72 20 28 3a 65 76 61 6c 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 | ...:lighter.(:eval.(propertize.( |
| 7080 | 66 6f 72 6d 61 74 20 22 20 5b 25 73 20 41 73 79 6e 63 20 6a 6f 62 28 73 29 20 72 75 6e 6e 69 6e | format.".[%s.Async.job(s).runnin |
| 70a0 | 67 5d 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g]"............................. |
| 70c0 | 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 | ..........(length.(dired-async-p |
| 70e0 | 72 6f 63 65 73 73 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rocesses)))..................... |
| 7100 | 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 | ..........'face.'dired-async-mod |
| 7120 | 65 2d 6d 65 73 73 61 67 65 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 64 69 72 65 64 2d 61 73 79 6e | e-message))...(unless.dired-asyn |
| 7140 | 63 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f 64 65 0a 20 20 20 20 28 6c 65 74 20 28 28 76 69 73 69 | c--modeline-mode.....(let.((visi |
| 7160 | 62 6c 65 2d 62 65 6c 6c 20 74 29 29 20 28 64 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 | ble-bell.t)).(ding))))..(defun.d |
| 7180 | 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 6d 65 73 73 61 67 65 20 28 74 65 | ired-async-mode-line-message.(te |
| 71a0 | 78 74 20 66 61 63 65 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 4e 6f 74 69 66 79 20 65 6e | xt.face.&rest.args)..."Notify.en |
| 71c0 | 64 20 6f 66 20 6f 70 65 72 61 74 69 6f 6e 20 69 6e 20 60 6d 6f 64 65 2d 6c 69 6e 65 27 2e 22 0a | d.of.operation.in.`mode-line'.". |
| 71e0 | 20 20 28 6d 65 73 73 61 67 65 20 6e 69 6c 29 0a 20 20 28 6c 65 74 20 28 28 6d 6f 64 65 2d 6c 69 | ..(message.nil)...(let.((mode-li |
| 7200 | 6e 65 2d 66 6f 72 6d 61 74 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ne-format.(concat............... |
| 7220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 22 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 | .............".".(propertize.... |
| 7240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 | .............................(if |
| 7260 | 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .args........................... |
| 7280 | 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 66 6f 72 6d 61 74 20 74 65 78 74 20 61 | ..........(apply.#'format.text.a |
| 72a0 | 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rgs)............................ |
| 72c0 | 20 20 20 20 20 20 20 74 65 78 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .......text).................... |
| 72e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 66 61 63 65 29 29 29 29 0a 20 20 20 20 | .............'face.face))))..... |
| 7300 | 28 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75 70 64 61 74 65 29 0a 20 20 20 20 28 73 69 | (force-mode-line-update).....(si |
| 7320 | 74 2d 66 6f 72 20 33 29 0a 20 20 20 20 28 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75 70 | t-for.3).....(force-mode-line-up |
| 7340 | 64 61 74 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f 63 | date)))..(defun.dired-async-proc |
| 7360 | 65 73 73 65 73 20 28 29 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 70 20 69 6e 20 28 70 72 | esses.()...(cl-loop.for.p.in.(pr |
| 7380 | 6f 63 65 73 73 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 70 72 6f | ocess-list)............when.(pro |
| 73a0 | 63 65 73 73 2d 67 65 74 20 70 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f 63 65 73 73 29 | cess-get.p.'dired-async-process) |
| 73c0 | 0a 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 70 29 29 0a 0a 28 64 65 66 75 6e 20 | ............collect.p))..(defun. |
| 73e0 | 64 69 72 65 64 2d 61 73 79 6e 63 2d 6b 69 6c 6c 2d 70 72 6f 63 65 73 73 20 28 29 0a 20 20 28 69 | dired-async-kill-process.()...(i |
| 7400 | 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 70 72 6f 63 65 73 73 65 73 20 | nteractive)...(let*.((processes. |
| 7420 | 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f 63 65 73 73 65 73 29 29 0a 20 20 20 20 20 20 20 | (dired-async-processes))........ |
| 7440 | 20 20 28 70 72 6f 63 20 28 63 61 72 20 28 6c 61 73 74 20 70 72 6f 63 65 73 73 65 73 29 29 29 29 | ..(proc.(car.(last.processes)))) |
| 7460 | 0a 20 20 20 20 28 61 6e 64 20 70 72 6f 63 20 28 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 70 | .....(and.proc.(delete-process.p |
| 7480 | 72 6f 63 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 3e 20 28 6c 65 6e 67 74 68 20 70 72 6f | roc)).....(unless.(>.(length.pro |
| 74a0 | 63 65 73 73 65 73 29 20 31 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d | cesses).1).......(dired-async--m |
| 74c0 | 6f 64 65 6c 69 6e 65 2d 6d 6f 64 65 20 2d 31 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 | odeline-mode.-1))))..(defun.dire |
| 74e0 | 64 2d 61 73 79 6e 63 2d 61 66 74 65 72 2d 66 69 6c 65 2d 63 72 65 61 74 65 20 28 74 6f 74 61 6c | d-async-after-file-create.(total |
| 7500 | 20 6f 70 65 72 61 74 69 6f 6e 20 66 61 69 6c 75 72 65 73 20 73 6b 69 70 70 65 64 29 0a 20 20 22 | .operation.failures.skipped)..." |
| 7520 | 43 61 6c 6c 62 61 63 6b 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 66 6f 72 20 6f 70 65 72 61 | Callback.function.used.for.opera |
| 7540 | 74 69 6f 6e 20 68 61 6e 64 6c 65 64 20 62 79 20 60 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 | tion.handled.by.`dired-create-fi |
| 7560 | 6c 65 27 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 70 72 6f | le'."...(unless.(dired-async-pro |
| 7580 | 63 65 73 73 65 73 29 0a 20 20 20 20 3b 3b 20 54 75 72 6e 20 6f 66 66 20 6d 6f 64 65 2d 6c 69 6e | cesses).....;;.Turn.off.mode-lin |
| 75a0 | 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 0a 20 20 20 20 3b 3b 20 6f 6e 6c 79 20 77 68 65 6e 20 | e.notification.....;;.only.when. |
| 75c0 | 6c 61 73 74 20 70 72 6f 63 65 73 73 20 65 6e 64 2e 0a 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 | last.process.end......(dired-asy |
| 75e0 | 6e 63 2d 2d 6d 6f 64 65 6c 69 6e 65 2d 6d 6f 64 65 20 2d 31 29 29 0a 20 20 28 77 68 65 6e 20 6f | nc--modeline-mode.-1))...(when.o |
| 7600 | 70 65 72 61 74 69 6f 6e 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 | peration.....(if.(file-exists-p. |
| 7620 | 64 69 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 28 70 | dired-async-log-file).........(p |
| 7640 | 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 28 67 | rogn...........(pop-to-buffer.(g |
| 7660 | 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 64 69 72 65 64 2d 6c 6f 67 2d 62 75 66 66 65 | et-buffer-create.dired-log-buffe |
| 7680 | 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d | r))...........(goto-char.(point- |
| 76a0 | 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 6e 68 69 62 69 74 2d 72 65 | max))...........(setq.inhibit-re |
| 76c0 | 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 45 72 | ad-only.t)...........(insert."Er |
| 76e0 | 72 6f 72 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 | ror:.")...........(insert-file-c |
| 7700 | 6f 6e 74 65 6e 74 73 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 | ontents.dired-async-log-file)... |
| 7720 | 20 20 20 20 20 20 20 20 28 73 70 65 63 69 61 6c 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 | ........(special-mode).......... |
| 7740 | 20 28 73 68 72 69 6e 6b 2d 77 69 6e 64 6f 77 2d 69 66 2d 6c 61 72 67 65 72 2d 74 68 61 6e 2d 62 | .(shrink-window-if-larger-than-b |
| 7760 | 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 64 69 | uffer)...........(delete-file.di |
| 7780 | 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 29 0a 20 20 20 20 20 20 28 72 75 6e 2d | red-async-log-file)).......(run- |
| 77a0 | 77 69 74 68 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 30 2e 31 20 6e 69 6c 0a 20 20 20 20 20 20 | with-timer........0.1.nil....... |
| 77c0 | 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 46 69 72 73 74 20 73 65 | .(lambda.()..........;;.First.se |
| 77e0 | 6e 64 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 73 2e 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e | nd.error.messages...........(con |
| 7800 | 64 20 28 66 61 69 6c 75 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e | d.(failures.................(fun |
| 7820 | 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 66 75 6e 63 74 69 6f | call.dired-async-message-functio |
| 7840 | 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 73 20 66 | n.........................."%s.f |
| 7860 | 61 69 6c 65 64 20 66 6f 72 20 25 64 20 6f 66 20 25 64 20 66 69 6c 65 25 73 20 2d 2d 20 53 65 65 | ailed.for.%d.of.%d.file%s.--.See |
| 7880 | 20 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 | .*Dired.log*.buffer"............ |
| 78a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c 75 | ..............'dired-async-failu |
| 78c0 | 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 | res..........................(ca |
| 78e0 | 72 20 6f 70 65 72 61 74 69 6f 6e 29 20 28 6c 65 6e 67 74 68 20 66 61 69 6c 75 72 65 73 29 0a 20 | r.operation).(length.failures).. |
| 7900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 74 61 6c 20 28 64 | ........................total.(d |
| 7920 | 69 72 65 64 2d 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 | ired-plural-s.total))).......... |
| 7940 | 20 20 20 20 20 20 28 73 6b 69 70 70 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ......(skipped.................( |
| 7960 | 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 66 75 6e 63 | funcall.dired-async-message-func |
| 7980 | 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 | tion.........................."% |
| 79a0 | 73 3a 20 25 64 20 6f 66 20 25 64 20 66 69 6c 65 25 73 20 73 6b 69 70 70 65 64 20 2d 2d 20 53 65 | s:.%d.of.%d.file%s.skipped.--.Se |
| 79c0 | 65 20 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 | e.*Dired.log*.buffer"........... |
| 79e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c | ...............'dired-async-fail |
| 7a00 | 75 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 | ures..........................(c |
| 7a20 | 61 72 20 6f 70 65 72 61 74 69 6f 6e 29 20 28 6c 65 6e 67 74 68 20 73 6b 69 70 70 65 64 29 20 74 | ar.operation).(length.skipped).t |
| 7a40 | 6f 74 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 | otal..........................(d |
| 7a60 | 69 72 65 64 2d 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 | ired-plural-s.total))))......... |
| 7a80 | 20 28 77 68 65 6e 20 64 69 72 65 64 2d 62 75 66 66 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 | .(when.dired-buffers............ |
| 7aa0 | 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 5f 66 20 2e 20 62 29 20 69 6e 20 64 69 72 65 64 2d 62 | (cl-loop.for.(_f...b).in.dired-b |
| 7ac0 | 75 66 66 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 | uffers.....................when. |
| 7ae0 | 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (buffer-live-p.b)............... |
| 7b00 | 20 20 20 20 20 20 64 6f 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 0a | ......do.(with-current-buffer.b. |
| 7b20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 | .........................(when.( |
| 7b40 | 61 6e 64 20 28 6e 6f 74 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 65 66 61 75 6c 74 2d | and.(not.(file-remote-p.default- |
| 7b60 | 64 69 72 65 63 74 6f 72 79 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | directory.nil.t))............... |
| 7b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 65 78 69 73 | ......................(file-exis |
| 7ba0 | 74 73 2d 70 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 | ts-p.default-directory))........ |
| 7bc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 | ....................(revert-buff |
| 7be0 | 65 72 20 6e 69 6c 20 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 46 69 6e 61 6c 6c | er.nil.t)))))..........;;.Finall |
| 7c00 | 79 20 73 65 6e 64 20 74 68 65 20 73 75 63 63 65 73 73 20 6d 65 73 73 61 67 65 2e 0a 20 20 20 20 | y.send.the.success.message...... |
| 7c20 | 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 | .....(funcall.dired-async-messag |
| 7c40 | 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 41 73 | e-function..................."As |
| 7c60 | 79 6e 63 68 72 6f 6e 6f 75 73 20 25 73 20 6f 66 20 25 73 20 6f 6e 20 25 73 20 66 69 6c 65 25 73 | ynchronous.%s.of.%s.on.%s.file%s |
| 7c80 | 20 64 6f 6e 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d | .done"...................'dired- |
| 7ca0 | 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | async-message................... |
| 7cc0 | 28 63 61 72 20 6f 70 65 72 61 74 69 6f 6e 29 20 28 63 61 64 72 20 6f 70 65 72 61 74 69 6f 6e 29 | (car.operation).(cadr.operation) |
| 7ce0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 74 61 6c 20 28 64 69 72 65 64 2d | ...................total.(dired- |
| 7d00 | 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 | plural-s.total)))))))..(defun.di |
| 7d20 | 72 65 64 2d 61 73 79 6e 63 2d 6d 61 79 62 65 2d 6b 69 6c 6c 2d 66 74 70 20 28 29 0a 20 20 22 52 | red-async-maybe-kill-ftp.()..."R |
| 7d40 | 65 74 75 72 6e 20 61 20 66 6f 72 6d 20 74 6f 20 6b 69 6c 6c 20 66 74 70 20 70 72 6f 63 65 73 73 | eturn.a.form.to.kill.ftp.process |
| 7d60 | 20 69 6e 20 63 68 69 6c 64 20 65 6d 61 63 73 2e 22 0a 20 20 28 71 75 6f 74 65 0a 20 20 20 28 70 | .in.child.emacs."...(quote....(p |
| 7d80 | 72 6f 67 6e 0a 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 20 20 20 20 | rogn......(require.'cl-lib)..... |
| 7da0 | 20 28 6c 65 74 20 28 28 62 75 66 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 62 20 69 6e 20 28 62 | .(let.((buf.(cl-loop.for.b.in.(b |
| 7dc0 | 75 66 66 65 72 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | uffer-list)..................... |
| 7de0 | 20 20 20 20 20 74 68 65 72 65 69 73 20 28 61 6e 64 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 0a | .....thereis.(and.(string-match. |
| 7e00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7e20 | 20 20 20 20 20 20 20 22 5c 5c 60 5c 5c 2a 66 74 70 2e 2a 22 0a 20 20 20 20 20 20 20 20 20 20 20 | ......."\\`\\*ftp.*"............ |
| 7e40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 | ............................(buf |
| 7e60 | 66 65 72 2d 6e 61 6d 65 20 62 29 29 20 62 29 29 29 29 0a 20 20 20 20 20 20 20 28 77 68 65 6e 20 | fer-name.b)).b))))........(when. |
| 7e80 | 62 75 66 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 29 29 29 0a 0a 28 64 65 66 | buf.(kill-buffer.buf))))))..(def |
| 7ea0 | 73 75 62 73 74 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 28 | subst.dired-async--directory-p.( |
| 7ec0 | 61 74 74 72 69 62 75 74 65 73 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 | attributes)..."Return.non-nil.if |
| 7ee0 | 20 41 54 54 52 49 42 55 54 45 53 20 69 73 20 66 6f 72 20 61 20 64 69 72 65 63 74 6f 72 79 2e 0a | .ATTRIBUTES.is.for.a.directory.. |
| 7f00 | 53 65 65 20 60 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 27 2e 22 0a 20 20 3b 3b 20 43 61 6e | See.`file-attributes'."...;;.Can |
| 7f20 | 20 61 6c 73 6f 20 62 65 20 61 20 73 74 72 69 6e 67 20 66 6f 72 20 73 79 6d 6c 69 6e 6b 73 2c 20 | .also.be.a.string.for.symlinks,. |
| 7f40 | 73 6f 20 63 68 65 63 6b 20 66 6f 72 20 74 20 65 78 70 6c 69 63 69 74 6c 79 2e 0a 20 20 28 65 71 | so.check.for.t.explicitly....(eq |
| 7f60 | 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 74 79 70 65 20 61 74 74 72 69 62 75 74 65 73 | .(file-attribute-type.attributes |
| 7f80 | 29 20 74 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 61 | ).t))..(defsubst.dired-async--sa |
| 7fa0 | 6d 65 2d 64 65 76 69 63 65 2d 70 20 28 66 31 20 66 32 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f | me-device-p.(f1.f2)..."Return.no |
| 7fc0 | 6e 2d 6e 69 6c 20 69 66 20 46 31 20 61 6e 64 20 46 32 20 68 61 76 65 20 74 68 65 20 73 61 6d 65 | n-nil.if.F1.and.F2.have.the.same |
| 7fe0 | 20 64 65 76 69 63 65 20 6e 75 6d 62 65 72 2e 22 0a 20 20 3b 3b 20 66 69 6c 65 2d 61 74 74 72 69 | .device.number."...;;.file-attri |
| 8000 | 62 75 74 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 65 72 20 6d 61 79 20 62 65 20 61 20 63 6f 6e 73 | bute-device-number.may.be.a.cons |
| 8020 | 20 63 65 6c 6c 2c 20 73 6f 20 75 73 65 20 65 71 75 61 6c 20 66 6f 72 0a 20 20 3b 3b 20 74 65 73 | .cell,.so.use.equal.for...;;.tes |
| 8040 | 74 69 6e 67 20 28 53 65 65 20 45 6d 61 63 73 20 62 75 67 2f 35 38 34 34 36 29 2e 0a 20 20 28 65 | ting.(See.Emacs.bug/58446)....(e |
| 8060 | 71 75 61 6c 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 | qual.(file-attribute-device-numb |
| 8080 | 65 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 31 29 29 0a 20 20 20 20 20 20 20 | er.(file-attributes.f1))........ |
| 80a0 | 20 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 65 72 20 | ..(file-attribute-device-number. |
| 80c0 | 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 32 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | (file-attributes.f2))))..(defun. |
| 80e0 | 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 70 20 28 66 69 6c 65 29 | dired-async--small-file-p.(file) |
| 8100 | 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 46 49 4c 45 20 69 73 20 63 6f | ..."Return.non-nil.if.FILE.is.co |
| 8120 | 6e 73 69 64 65 72 65 64 20 73 6d 61 6c 6c 2e 0a 0a 46 69 6c 65 20 69 73 20 63 6f 6e 73 69 64 65 | nsidered.small...File.is.conside |
| 8140 | 72 65 64 20 73 6d 61 6c 6c 20 69 66 20 69 74 20 73 69 7a 65 20 69 73 20 73 6d 61 6c 6c 65 72 20 | red.small.if.it.size.is.smaller. |
| 8160 | 74 68 61 6e 0a 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 6d 61 78 | than.`dired-async-small-file-max |
| 8180 | 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 61 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 | '."...(let.((a.(file-attributes. |
| 81a0 | 66 69 6c 65 29 29 29 0a 20 20 20 20 3b 3b 20 44 69 72 65 63 74 6f 72 69 65 73 20 61 72 65 20 61 | file))).....;;.Directories.are.a |
| 81c0 | 6c 77 61 79 73 20 6c 61 72 67 65 20 73 69 6e 63 65 20 77 65 20 63 61 6e 27 74 20 65 61 73 69 6c | lways.large.since.we.can't.easil |
| 81e0 | 79 20 66 69 67 75 72 65 20 6f 75 74 0a 20 20 20 20 3b 3b 20 74 68 65 69 72 20 74 6f 74 61 6c 20 | y.figure.out.....;;.their.total. |
| 8200 | 73 69 7a 65 2e 0a 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 64 69 72 65 64 2d 61 73 79 6e 63 | size......(and.(not.(dired-async |
| 8220 | 2d 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 61 29 29 0a 20 20 20 20 20 20 20 20 20 28 3c 20 28 66 | --directory-p.a))..........(<.(f |
| 8240 | 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 73 69 7a 65 20 61 29 20 64 69 72 65 64 2d 61 73 79 6e | ile-attribute-size.a).dired-asyn |
| 8260 | 63 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 | c-small-file-max))))..(defun.dir |
| 8280 | 65 64 2d 61 73 79 6e 63 2d 2d 73 6b 69 70 2d 61 73 79 6e 63 2d 70 20 28 66 69 6c 65 2d 63 72 65 | ed-async--skip-async-p.(file-cre |
| 82a0 | 61 74 6f 72 20 66 69 6c 65 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 29 0a 20 20 22 52 | ator.file.name-constructor)..."R |
| 82c0 | 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 77 65 20 73 68 6f 75 6c 64 20 73 6b 69 70 20 | eturn.non-nil.if.we.should.skip. |
| 82e0 | 61 73 79 6e 63 20 66 6f 72 20 46 49 4c 45 2e 0a 53 65 65 20 60 64 69 72 65 64 2d 63 72 65 61 74 | async.for.FILE..See.`dired-creat |
| 8300 | 65 2d 66 69 6c 65 73 27 20 66 6f 72 20 46 49 4c 45 2d 43 52 45 41 54 4f 52 20 61 6e 64 20 4e 41 | e-files'.for.FILE-CREATOR.and.NA |
| 8320 | 4d 45 2d 43 4f 4e 53 54 52 55 43 54 4f 52 2e 22 0a 20 20 3b 3b 20 53 6b 69 70 20 61 73 79 6e 63 | ME-CONSTRUCTOR."...;;.Skip.async |
| 8340 | 20 66 6f 72 20 73 6d 61 6c 6c 20 66 69 6c 65 73 2e 0a 20 20 28 6f 72 20 28 64 69 72 65 64 2d 61 | .for.small.files....(or.(dired-a |
| 8360 | 73 79 6e 63 2d 2d 73 6d 61 6c 6c 2d 66 69 6c 65 2d 70 20 66 69 6c 65 29 0a 20 20 20 20 20 20 3b | sync--small-file-p.file).......; |
| 8380 | 3b 20 41 6c 73 6f 20 73 6b 69 70 20 61 73 79 6e 63 20 66 6f 72 20 73 61 6d 65 20 64 65 76 69 63 | ;.Also.skip.async.for.same.devic |
| 83a0 | 65 20 72 65 6e 61 6d 65 73 2e 0a 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 66 69 6c 65 2d 63 | e.renames........(and.(eq.file-c |
| 83c0 | 72 65 61 74 6f 72 20 27 64 69 72 65 64 2d 72 65 6e 61 6d 65 2d 66 69 6c 65 29 0a 20 20 20 20 20 | reator.'dired-rename-file)...... |
| 83e0 | 20 20 20 20 20 20 28 6c 65 74 20 28 28 6e 65 77 20 28 66 75 6e 63 61 6c 6c 20 6e 61 6d 65 2d 63 | ......(let.((new.(funcall.name-c |
| 8400 | 6f 6e 73 74 72 75 63 74 6f 72 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | onstructor.file))).............. |
| 8420 | 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 61 6d 65 2d 64 65 76 69 63 65 2d 70 20 66 69 6c 65 | (dired-async--same-device-p.file |
| 8440 | 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 6e 65 77 29 29 29 29 29 29 0a | .(file-name-directory.new)))))). |
| 8460 | 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6d 61 72 74 2d 63 72 65 61 74 | .(defun.dired-async--smart-creat |
| 8480 | 65 2d 66 69 6c 65 73 20 28 6f 6c 64 2d 66 75 6e 63 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 0a 20 | e-files.(old-func.file-creator.. |
| 84a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 84c0 | 20 20 20 20 20 20 20 6f 70 65 72 61 74 69 6f 6e 20 66 6e 2d 6c 69 73 74 20 6e 61 6d 65 2d 63 6f | .......operation.fn-list.name-co |
| 84e0 | 6e 73 74 72 75 63 74 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nstructor....................... |
| 8500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 6d 61 72 6b | ..................&optional.mark |
| 8520 | 65 72 2d 63 68 61 72 29 0a 20 20 22 41 72 6f 75 6e 64 20 61 64 76 69 63 65 20 66 6f 72 20 60 64 | er-char)..."Around.advice.for.`d |
| 8540 | 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 27 2e 0a 55 73 65 73 20 61 73 79 6e 63 20 6c | ired-create-files'..Uses.async.l |
| 8560 | 69 6b 65 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 27 20 62 | ike.`dired-async-create-files'.b |
| 8580 | 75 74 20 73 6b 69 70 73 20 63 65 72 74 61 69 6e 20 66 61 73 74 0a 63 61 73 65 73 20 69 66 20 60 | ut.skips.certain.fast.cases.if.` |
| 85a0 | 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6b 69 70 2d 66 61 73 74 27 20 69 73 20 6e 6f 6e 2d 6e 69 | dired-async-skip-fast'.is.non-ni |
| 85c0 | 6c 2e 22 0a 20 20 28 6c 65 74 20 28 61 73 79 6e 63 2d 6c 69 73 74 20 71 75 69 63 6b 2d 6c 69 73 | l."...(let.(async-list.quick-lis |
| 85e0 | 74 29 0a 20 20 20 20 28 69 66 20 28 6f 72 20 28 65 71 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 | t).....(if.(or.(eq.file-creator. |
| 8600 | 27 62 61 63 6b 75 70 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 20 | 'backup-file).............(null. |
| 8620 | 64 69 72 65 64 2d 61 73 79 6e 63 2d 73 6b 69 70 2d 66 61 73 74 29 29 0a 20 20 20 20 20 20 20 20 | dired-async-skip-fast))......... |
| 8640 | 28 73 65 74 71 20 61 73 79 6e 63 2d 6c 69 73 74 20 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 | (setq.async-list.fn-list)....... |
| 8660 | 28 64 6f 6c 69 73 74 20 28 6f 6c 64 20 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 28 69 | (dolist.(old.fn-list).........(i |
| 8680 | 66 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6b 69 70 2d 61 73 79 6e 63 2d 70 20 66 69 6c | f.(dired-async--skip-async-p.fil |
| 86a0 | 65 2d 63 72 65 61 74 6f 72 20 6f 6c 64 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 29 0a | e-creator.old.name-constructor). |
| 86c0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6f 6c 64 20 71 75 69 63 6b 2d 6c 69 73 74 | ............(push.old.quick-list |
| 86e0 | 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6f 6c 64 20 61 73 79 6e 63 2d 6c 69 73 74 | )...........(push.old.async-list |
| 8700 | 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 61 73 79 6e 63 2d 6c 69 73 74 0a 20 20 20 20 20 20 | )))).....(when.async-list....... |
| 8720 | 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 20 20 20 | (dired-async-create-files....... |
| 8740 | 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 6f 70 65 72 61 74 69 6f 6e 20 28 6e 72 65 76 65 72 73 | .file-creator.operation.(nrevers |
| 8760 | 65 20 61 73 79 6e 63 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 | e.async-list)........name-constr |
| 8780 | 75 63 74 6f 72 20 6d 61 72 6b 65 72 2d 63 68 61 72 29 29 0a 20 20 20 20 28 77 68 65 6e 20 71 75 | uctor.marker-char)).....(when.qu |
| 87a0 | 69 63 6b 2d 6c 69 73 74 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 6f 6c 64 2d 66 75 6e 63 | ick-list.......(funcall.old-func |
| 87c0 | 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 6f 70 65 72 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 | .file-creator.operation......... |
| 87e0 | 20 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 71 75 69 63 6b 2d 6c 69 73 74 29 20 6e 61 6d | .......(nreverse.quick-list).nam |
| 8800 | 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 20 6d 61 72 6b 65 72 2d 63 68 61 72 29 29 29 29 0a 0a 28 | e-constructor.marker-char))))..( |
| 8820 | 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 61 62 6f 72 74 2d 69 66 2d 66 69 6c 65 | defun.dired-async--abort-if-file |
| 8840 | 2d 74 6f 6f 2d 6c 61 72 67 65 20 28 73 69 7a 65 20 6f 70 2d 74 79 70 65 20 66 69 6c 65 6e 61 6d | -too-large.(size.op-type.filenam |
| 8860 | 65 29 0a 20 20 22 49 66 20 66 69 6c 65 20 53 49 5a 45 20 6c 61 72 67 65 72 20 74 68 61 6e 20 60 | e)..."If.file.SIZE.larger.than.` |
| 8880 | 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 68 72 65 73 68 6f 6c 64 27 2c 20 61 | large-file-warning-threshold',.a |
| 88a0 | 6c 6c 6f 77 20 75 73 65 72 20 74 6f 20 61 62 6f 72 74 2e 0a 53 61 6d 65 20 61 73 20 60 61 62 6f | llow.user.to.abort..Same.as.`abo |
| 88c0 | 72 74 2d 69 66 2d 66 69 6c 65 2d 74 6f 6f 2d 6c 61 72 67 65 27 20 62 75 74 20 77 69 74 68 6f 75 | rt-if-file-too-large'.but.withou |
| 88e0 | 74 20 75 73 65 72 2d 65 72 72 6f 72 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 6c 61 72 67 | t.user-error."...(when.(and.larg |
| 8900 | 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 68 72 65 73 68 6f 6c 64 20 73 69 7a 65 0a 09 20 | e-file-warning-threshold.size... |
| 8920 | 20 20 20 20 28 3e 20 73 69 7a 65 20 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 | ....(>.size.large-file-warning-t |
| 8940 | 68 72 65 73 68 6f 6c 64 29 29 0a 20 20 20 20 28 66 69 6c 65 73 2d 2d 61 73 6b 2d 75 73 65 72 2d | hreshold)).....(files--ask-user- |
| 8960 | 61 62 6f 75 74 2d 6c 61 72 67 65 2d 66 69 6c 65 0a 20 20 20 20 20 73 69 7a 65 20 6f 70 2d 74 79 | about-large-file......size.op-ty |
| 8980 | 70 65 20 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 76 61 72 20 6f 76 65 72 | pe.filename.nil)))..(defvar.over |
| 89a0 | 77 72 69 74 65 2d 71 75 65 72 79 29 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d | write-query).(defun.dired-async- |
| 89c0 | 63 72 65 61 74 65 2d 66 69 6c 65 73 20 28 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 6f 70 65 72 61 | create-files.(file-creator.opera |
| 89e0 | 74 69 6f 6e 20 66 6e 2d 6c 69 73 74 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 0a 20 20 | tion.fn-list.name-constructor... |
| 8a00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 8a20 | 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 6d 61 72 6b 65 72 2d 63 68 | ............&optional._marker-ch |
| 8a40 | 61 72 29 0a 20 20 22 53 61 6d 65 20 61 73 20 60 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 6c | ar)..."Same.as.`dired-create-fil |
| 8a60 | 65 73 27 20 62 75 74 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 2e 0a 0a 53 65 65 20 60 64 69 72 65 | es'.but.asynchronous...See.`dire |
| 8a80 | 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 27 20 66 6f 72 20 74 68 65 20 62 65 68 61 76 69 6f 72 | d-create-files'.for.the.behavior |
| 8aa0 | 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 2e 22 0a 20 20 28 73 65 74 71 20 6f 76 65 72 77 72 69 74 | .of.arguments."...(setq.overwrit |
| 8ac0 | 65 2d 71 75 65 72 79 20 6e 69 6c 29 0a 20 20 28 6c 65 74 20 28 28 74 6f 74 61 6c 20 28 6c 65 6e | e-query.nil)...(let.((total.(len |
| 8ae0 | 67 74 68 20 66 6e 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 66 61 69 6c 75 72 65 73 20 61 | gth.fn-list)).........failures.a |
| 8b00 | 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 20 73 6b 69 70 70 65 64 20 63 61 6c 6c 62 61 63 6b 0a 20 20 | sync-fn-list.skipped.callback... |
| 8b20 | 20 20 20 20 20 20 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 68 20 63 72 65 61 74 65 2d | ......async-quiet-switch.create- |
| 8b40 | 64 69 72 29 0a 20 20 20 20 28 6c 65 74 20 28 74 6f 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 | dir).....(let.(to).......(dolist |
| 8b60 | 20 28 66 72 6f 6d 20 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 6f | .(from.fn-list).........(setq.to |
| 8b80 | 20 28 66 75 6e 63 61 6c 6c 20 6e 61 6d 65 2d 63 6f 6e 73 74 72 75 63 74 6f 72 20 66 72 6f 6d 29 | .(funcall.name-constructor.from) |
| 8ba0 | 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 65 71 75 61 6c 20 74 6f 20 66 72 6f | ).........(if.(and.(equal.to.fro |
| 8bc0 | 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 20 28 65 71 20 66 69 | m)..................(null.(eq.fi |
| 8be0 | 6c 65 2d 63 72 65 61 74 6f 72 20 27 62 61 63 6b 75 70 2d 66 69 6c 65 29 29 29 0a 20 20 20 20 20 | le-creator.'backup-file)))...... |
| 8c00 | 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 | .......(progn...............(set |
| 8c20 | 71 20 74 6f 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6c | q.to.nil)...............(dired-l |
| 8c40 | 6f 67 20 22 43 61 6e 6e 6f 74 20 25 73 20 74 6f 20 73 61 6d 65 20 66 69 6c 65 3a 20 25 73 5c 6e | og."Cannot.%s.to.same.file:.%s\n |
| 8c60 | 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 77 6e | "..........................(down |
| 8c80 | 63 61 73 65 20 6f 70 65 72 61 74 69 6f 6e 29 20 66 72 6f 6d 29 29 29 0a 20 20 20 20 20 20 20 20 | case.operation).from)))......... |
| 8ca0 | 28 69 66 20 28 6e 6f 74 20 74 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 | (if.(not.to).............(setq.s |
| 8cc0 | 6b 69 70 70 65 64 20 28 63 6f 6e 73 20 28 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 76 | kipped.(cons.(dired-make-relativ |
| 8ce0 | 65 20 66 72 6f 6d 29 20 73 6b 69 70 70 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 | e.from).skipped))...........(let |
| 8d00 | 2a 20 28 28 6f 76 65 72 77 72 69 74 65 20 28 61 6e 64 20 28 6e 75 6c 6c 20 28 65 71 20 66 69 6c | *.((overwrite.(and.(null.(eq.fil |
| 8d20 | 65 2d 63 72 65 61 74 6f 72 20 27 62 61 63 6b 75 70 2d 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 | e-creator.'backup-file))........ |
| 8d40 | 20 20 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- |
| 8d60 | 65 78 69 73 74 73 2d 70 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | exists-p.to))).................. |
| 8d80 | 28 64 69 72 65 64 2d 6f 76 65 72 77 72 69 74 65 2d 63 6f 6e 66 69 72 6d 65 64 20 3b 20 66 6f 72 | (dired-overwrite-confirmed.;.for |
| 8da0 | 20 64 69 72 65 64 2d 68 61 6e 64 6c 65 2d 6f 76 65 72 77 72 69 74 65 0a 20 20 20 20 20 20 20 20 | .dired-handle-overwrite......... |
| 8dc0 | 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 6f 76 65 72 77 72 69 74 65 0a 20 20 20 20 20 20 20 | ..........(and.overwrite........ |
| 8de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 68 65 6c 70 2d 66 6f 72 6d | ................(let.((help-form |
| 8e00 | 20 60 28 66 6f 72 6d 61 74 20 22 5c 0a 54 79 70 65 20 53 50 43 20 6f 72 20 60 79 27 20 74 6f 20 | .`(format."\.Type.SPC.or.`y'.to. |
| 8e20 | 6f 76 65 72 77 72 69 74 65 20 66 69 6c 65 20 60 25 73 27 2c 0a 44 45 4c 20 6f 72 20 60 6e 27 20 | overwrite.file.`%s',.DEL.or.`n'. |
| 8e40 | 74 6f 20 73 6b 69 70 20 74 6f 20 6e 65 78 74 2c 0a 45 53 43 20 6f 72 20 60 71 27 20 74 6f 20 6e | to.skip.to.next,.ESC.or.`q'.to.n |
| 8e60 | 6f 74 20 6f 76 65 72 77 72 69 74 65 20 61 6e 79 20 6f 66 20 74 68 65 20 72 65 6d 61 69 6e 69 6e | ot.overwrite.any.of.the.remainin |
| 8e80 | 67 20 66 69 6c 65 73 2c 0a 60 21 27 20 74 6f 20 6f 76 65 72 77 72 69 74 65 20 61 6c 6c 20 72 65 | g.files,.`!'.to.overwrite.all.re |
| 8ea0 | 6d 61 69 6e 69 6e 67 20 66 69 6c 65 73 20 77 69 74 68 20 6e 6f 20 6d 6f 72 65 20 71 75 65 73 74 | maining.files.with.no.more.quest |
| 8ec0 | 69 6f 6e 73 2e 22 20 2c 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ions.".,to)))................... |
| 8ee0 | 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 71 75 65 72 79 20 27 6f 76 65 72 77 72 69 74 65 2d 71 | .......(dired-query.'overwrite-q |
| 8f00 | 75 65 72 79 20 22 4f 76 65 72 77 72 69 74 65 20 60 25 73 27 3f 22 20 74 6f 29 29 29 29 29 0a 20 | uery."Overwrite.`%s'?".to))))).. |
| 8f20 | 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 48 61 6e 64 6c 65 20 74 68 65 20 60 64 69 72 65 64 2d | ...........;;.Handle.the.`dired- |
| 8f40 | 63 6f 70 79 2d 66 69 6c 65 27 20 66 69 6c 65 2d 63 72 65 61 74 6f 72 20 73 70 65 63 69 61 6c 6c | copy-file'.file-creator.speciall |
| 8f60 | 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 65 6e 20 63 6f 70 79 69 6e 67 20 61 20 | y.............;;.When.copying.a. |
| 8f80 | 64 69 72 65 63 74 6f 72 79 20 74 6f 20 61 6e 6f 74 68 65 72 20 64 69 72 65 63 74 6f 72 79 20 6f | directory.to.another.directory.o |
| 8fa0 | 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 6f 73 73 69 62 6c 79 20 74 6f 20 69 74 73 | r.............;;.possibly.to.its |
| 8fc0 | 65 6c 66 20 6f 72 20 6f 6e 65 20 6f 66 20 69 74 73 20 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 | elf.or.one.of.its.subdirectories |
| 8fe0 | 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 2e 67 20 22 7e 2f 66 6f 6f 2f 22 20 3d 3e | ..............;;.e.g."~/foo/".=> |
| 9000 | 20 22 7e 2f 74 65 73 74 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 72 20 22 7e 2f | ."~/test/".............;;.or."~/ |
| 9020 | 66 6f 6f 2f 22 20 3d 3e 22 7e 2f 66 6f 6f 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 | foo/".=>"~/foo/".............;;. |
| 9040 | 6f 72 20 22 7e 2f 66 6f 6f 2f 20 3d 3e 20 7e 2f 66 6f 6f 2f 62 61 72 2f 22 29 0a 20 20 20 20 20 | or."~/foo/.=>.~/foo/bar/")...... |
| 9060 | 20 20 20 20 20 20 20 3b 3b 20 49 6e 20 74 68 69 73 20 63 61 73 65 20 74 68 65 20 27 6e 61 6d 65 | .......;;.In.this.case.the.'name |
| 9080 | 2d 63 6f 6e 73 74 72 75 63 74 6f 72 27 20 68 61 76 65 20 73 65 74 20 74 68 65 20 64 65 73 74 69 | -constructor'.have.set.the.desti |
| 90a0 | 6e 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 4f 20 74 6f 20 22 7e 2f 74 | nation.............;;.TO.to."~/t |
| 90c0 | 65 73 74 2f 66 6f 6f 22 20 62 65 63 61 75 73 65 20 74 68 65 20 6f 6c 64 20 65 6d 61 63 73 32 33 | est/foo".because.the.old.emacs23 |
| 90e0 | 20 62 65 68 61 76 69 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 66 20 60 63 6f 70 | .behavior.............;;.of.`cop |
| 9100 | 79 2d 64 69 72 65 63 74 6f 72 79 27 20 77 61 73 20 74 6f 20 6e 6f 74 20 63 72 65 61 74 65 20 74 | y-directory'.was.to.not.create.t |
| 9120 | 68 65 20 73 75 62 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 | he.subdirectory.............;;.a |
| 9140 | 6e 64 20 69 6e 73 74 65 61 64 20 63 6f 70 79 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 2e 0a 20 20 | nd.instead.copy.the.contents.... |
| 9160 | 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 69 74 68 20 74 68 65 20 6e 65 77 20 62 65 68 61 76 69 | ..........;;.With.the.new.behavi |
| 9180 | 6f 72 20 6f 66 20 60 63 6f 70 79 2d 64 69 72 65 63 74 6f 72 79 27 0a 20 20 20 20 20 20 20 20 20 | or.of.`copy-directory'.......... |
| 91a0 | 20 20 20 3b 3b 20 28 73 69 6d 69 6c 61 72 20 74 6f 20 74 68 65 20 60 63 70 27 20 73 68 65 6c 6c | ...;;.(similar.to.the.`cp'.shell |
| 91c0 | 20 63 6f 6d 6d 61 6e 64 29 20 77 65 20 64 6f 6e 27 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b | .command).we.don't.............; |
| 91e0 | 3b 20 6e 65 65 64 20 73 75 63 68 20 61 20 63 6f 6e 73 74 72 75 63 74 69 6f 6e 20 6f 66 20 74 68 | ;.need.such.a.construction.of.th |
| 9200 | 65 20 74 61 72 67 65 74 20 64 69 72 65 63 74 6f 72 79 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 | e.target.directory,............. |
| 9220 | 3b 3b 20 73 6f 20 6d 6f 64 69 66 79 20 74 68 65 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 54 4f 20 | ;;.so.modify.the.destination.TO. |
| 9240 | 74 6f 20 22 7e 2f 74 65 73 74 2f 22 20 69 6e 73 74 65 61 64 20 6f 66 20 22 7e 2f 74 65 73 74 2f | to."~/test/".instead.of."~/test/ |
| 9260 | 66 6f 6f 2f 22 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 73 74 6e 61 | foo/"..............(let.((destna |
| 9280 | 6d 65 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 74 6f 29 29 29 0a 20 20 | me.(file-name-directory.to)))... |
| 92a0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 66 69 6c 65 2d 64 69 72 | ............(when.(and.(file-dir |
| 92c0 | 65 63 74 6f 72 79 2d 70 20 66 72 6f 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ectory-p.from).................. |
| 92e0 | 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 74 6f 29 0a 20 20 | ........(file-directory-p.to)... |
| 9300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 66 69 6c 65 2d | .......................(eq.file- |
| 9320 | 63 72 65 61 74 6f 72 20 27 64 69 72 65 64 2d 63 6f 70 79 2d 66 69 6c 65 29 29 0a 20 20 20 20 20 | creator.'dired-copy-file))...... |
| 9340 | 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 6f 20 64 65 73 74 6e 61 6d 65 29 29 0a 20 | ...........(setq.to.destname)).. |
| 9360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 44 45 53 54 4e 41 4d 45 20 69 73 20 61 | .............;;.If.DESTNAME.is.a |
| 9380 | 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 6f 66 20 46 52 4f 4d 2c 20 6e 6f 74 20 61 20 73 79 6d | .subdirectory.of.FROM,.not.a.sym |
| 93a0 | 6c 69 6e 6b 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 74 68 65 20 6d | link,...............;;.and.the.m |
| 93c0 | 65 74 68 6f 64 20 69 6e 20 75 73 65 20 69 73 20 63 6f 70 79 69 6e 67 2c 20 73 69 67 6e 61 6c 20 | ethod.in.use.is.copying,.signal. |
| 93e0 | 61 6e 20 65 72 72 6f 72 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 | an.error................(and.(eq |
| 9400 | 20 74 20 28 63 61 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 64 65 73 74 6e 61 6d | .t.(car.(file-attributes.destnam |
| 9420 | 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 66 69 6c 65 | e)))....................(eq.file |
| 9440 | 2d 63 72 65 61 74 6f 72 20 27 64 69 72 65 64 2d 63 6f 70 79 2d 66 69 6c 65 29 0a 20 20 20 20 20 | -creator.'dired-copy-file)...... |
| 9460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 69 6e 2d 64 69 72 65 63 74 6f 72 79 | ..............(file-in-directory |
| 9480 | 2d 70 20 64 65 73 74 6e 61 6d 65 20 66 72 6f 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -p.destname.from)............... |
| 94a0 | 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 63 6f 70 79 20 60 25 73 27 20 69 6e | .....(error."Cannot.copy.`%s'.in |
| 94c0 | 74 6f 20 69 74 73 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 60 25 73 27 22 0a 20 20 20 20 20 20 | to.its.subdirectory.`%s'"....... |
| 94e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 72 6f 6d 20 74 6f 29 29 29 0a 20 | ....................from.to))).. |
| 9500 | 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 6b 69 70 20 66 69 6c 65 20 69 66 20 69 74 20 69 73 | ...........;;.Skip.file.if.it.is |
| 9520 | 20 74 6f 6f 20 6c 61 72 67 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 | .too.large..............(if.(and |
| 9540 | 20 28 6d 65 6d 62 65 72 20 6f 70 65 72 61 74 69 6f 6e 20 27 28 22 43 6f 70 79 22 20 22 52 65 6e | .(member.operation.'("Copy"."Ren |
| 9560 | 61 6d 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 | ame"))......................(eq. |
| 9580 | 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 61 62 6f 72 74 2d 69 66 2d 66 69 6c 65 2d 74 6f 6f 2d | (dired-async--abort-if-file-too- |
| 95a0 | 6c 61 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | large........................... |
| 95c0 | 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 73 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 | (file-attribute-size............ |
| 95e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 | ................(file-attributes |
| 9600 | 20 28 66 69 6c 65 2d 74 72 75 65 6e 61 6d 65 20 66 72 6f 6d 29 29 29 0a 20 20 20 20 20 20 20 20 | .(file-truename.from)))......... |
| 9620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 77 6e 63 61 73 65 20 6f 70 65 72 | ..................(downcase.oper |
| 9640 | 61 74 69 6f 6e 29 20 66 72 6f 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ation).from).................... |
| 9660 | 20 20 20 20 20 20 27 61 62 6f 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ......'abort)).................( |
| 9680 | 70 75 73 68 20 66 72 6f 6d 20 73 6b 69 70 70 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | push.from.skipped).............. |
| 96a0 | 20 28 69 66 20 6f 76 65 72 77 72 69 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(if.overwrite.................. |
| 96c0 | 20 28 6f 72 20 28 61 6e 64 20 64 69 72 65 64 2d 6f 76 65 72 77 72 69 74 65 2d 63 6f 6e 66 69 72 | .(or.(and.dired-overwrite-confir |
| 96e0 | 6d 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | med............................( |
| 9700 | 70 75 73 68 20 28 63 6f 6e 73 20 66 72 6f 6d 20 74 6f 29 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 | push.(cons.from.to).async-fn-lis |
| 9720 | 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e | t)).......................(progn |
| 9740 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 | .........................(push.( |
| 9760 | 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 76 65 20 66 72 6f 6d 29 20 66 61 69 6c 75 72 | dired-make-relative.from).failur |
| 9780 | 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 | es).........................(dir |
| 97a0 | 65 64 2d 6c 6f 67 20 22 25 73 20 60 25 73 27 20 74 6f 20 60 25 73 27 20 66 61 69 6c 65 64 5c 6e | ed-log."%s.`%s'.to.`%s'.failed\n |
| 97c0 | 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "............................... |
| 97e0 | 20 20 20 20 20 6f 70 65 72 61 74 69 6f 6e 20 66 72 6f 6d 20 74 6f 29 29 29 0a 20 20 20 20 20 20 | .....operation.from.to)))....... |
| 9800 | 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 66 72 6f 6d 20 74 6f 29 20 61 | ..........(push.(cons.from.to).a |
| 9820 | 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 46 69 78 20 | sync-fn-list)))))).......;;.Fix. |
| 9840 | 74 72 61 6d 70 20 69 73 73 75 65 20 23 38 30 20 77 69 74 68 20 65 6d 61 63 73 2d 32 36 2c 20 75 | tramp.issue.#80.with.emacs-26,.u |
| 9860 | 73 65 20 22 2d 71 22 20 6f 6e 6c 79 20 77 68 65 6e 20 6e 65 65 64 65 64 2e 0a 20 20 20 20 20 20 | se."-q".only.when.needed........ |
| 9880 | 28 73 65 74 71 20 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 68 0a 20 20 20 20 20 20 20 | (setq.async-quiet-switch........ |
| 98a0 | 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 74 72 61 6d 70 2d 63 61 63 | .....(if.(and.(boundp.'tramp-cac |
| 98c0 | 68 65 2d 72 65 61 64 2d 70 65 72 73 69 73 74 65 6e 74 2d 64 61 74 61 29 0a 20 20 20 20 20 20 20 | he-read-persistent-data)........ |
| 98e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 20 20 20 | ..............async-fn-list..... |
| 9900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 5f | .................(cl-loop.for.(_ |
| 9920 | 66 72 6f 6d 20 2e 20 74 6f 29 20 69 6e 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 20 20 20 | from...to).in.async-fn-list..... |
| 9940 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 72 65 69 | ..........................therei |
| 9960 | 73 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 | s.(file-remote-p.to))).......... |
| 9980 | 20 20 20 20 20 20 20 22 2d 71 22 20 22 2d 51 22 29 29 0a 20 20 20 20 20 20 3b 3b 20 57 68 65 6e | ......."-q"."-Q")).......;;.When |
| 99a0 | 20 66 61 69 6c 75 72 65 73 20 68 61 76 65 20 62 65 65 6e 20 70 72 69 6e 74 65 64 20 74 6f 20 64 | .failures.have.been.printed.to.d |
| 99c0 | 69 72 65 64 20 6c 6f 67 20 61 64 64 20 74 68 65 20 64 61 74 65 20 61 74 20 62 6f 62 2e 0a 20 20 | ired.log.add.the.date.at.bob.... |
| 99e0 | 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 66 61 69 6c 75 72 65 73 20 73 6b 69 70 70 65 64 29 20 | ....(when.(or.failures.skipped). |
| 9a00 | 28 64 69 72 65 64 2d 6c 6f 67 20 74 29 29 0a 20 20 20 20 20 20 3b 3b 20 57 68 65 6e 20 61 73 79 | (dired-log.t)).......;;.When.asy |
| 9a20 | 6e 63 2d 66 6e 2d 6c 69 73 74 20 69 73 20 65 6d 70 74 79 20 74 68 61 74 27 73 20 6d 65 61 6e 20 | nc-fn-list.is.empty.that's.mean. |
| 9a40 | 6f 6e 6c 79 20 6f 6e 65 20 66 69 6c 65 0a 20 20 20 20 20 20 3b 3b 20 68 61 64 20 74 6f 20 62 65 | only.one.file.......;;.had.to.be |
| 9a60 | 20 63 6f 70 69 65 64 20 61 6e 64 20 75 73 65 72 20 66 69 6e 61 6c 6c 79 20 61 6e 73 77 65 72 20 | .copied.and.user.finally.answer. |
| 9a80 | 4e 4f 2e 0a 20 20 20 20 20 20 3b 3b 20 49 6e 20 74 68 69 73 20 63 61 73 65 20 61 73 79 6e 63 20 | NO........;;.In.this.case.async. |
| 9aa0 | 70 72 6f 63 65 73 73 20 77 69 6c 6c 20 6e 65 76 65 72 20 73 74 61 72 74 20 61 6e 64 20 63 61 6c | process.will.never.start.and.cal |
| 9ac0 | 6c 62 61 63 6b 0a 20 20 20 20 20 20 3b 3b 20 77 69 6c 6c 20 68 61 76 65 20 6e 6f 20 63 68 61 6e | lback.......;;.will.have.no.chan |
| 9ae0 | 63 65 20 74 6f 20 72 75 6e 2c 20 73 6f 20 6e 6f 74 69 66 79 20 66 61 69 6c 75 72 65 73 20 68 65 | ce.to.run,.so.notify.failures.he |
| 9b00 | 72 65 2e 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a | re........(unless.async-fn-list. |
| 9b20 | 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 66 61 69 6c 75 72 65 73 0a 20 20 20 20 20 20 20 20 | ........(cond.(failures......... |
| 9b40 | 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 | .......(funcall.dired-async-mess |
| 9b60 | 61 67 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | age-function.................... |
| 9b80 | 20 20 20 20 20 22 25 73 20 66 61 69 6c 65 64 20 66 6f 72 20 25 64 20 6f 66 20 25 64 20 66 69 6c | ....."%s.failed.for.%d.of.%d.fil |
| 9ba0 | 65 25 73 20 2d 2d 20 53 65 65 20 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 | e%s.--.See.*Dired.log*.buffer".. |
| 9bc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 | .......................'dired-as |
| 9be0 | 79 6e 63 2d 66 61 69 6c 75 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ync-failures.................... |
| 9c00 | 20 20 20 20 20 6f 70 65 72 61 74 69 6f 6e 20 28 6c 65 6e 67 74 68 20 66 61 69 6c 75 72 65 73 29 | .....operation.(length.failures) |
| 9c20 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 74 61 6c 20 28 | .........................total.( |
| 9c40 | 64 69 72 65 64 2d 70 6c 75 72 61 6c 2d 73 20 74 6f 74 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 | dired-plural-s.total)))......... |
| 9c60 | 20 20 20 20 20 20 28 73 6b 69 70 70 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 | ......(skipped................(f |
| 9c80 | 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 65 73 73 61 67 65 2d 66 75 6e 63 74 | uncall.dired-async-message-funct |
| 9ca0 | 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 73 3a | ion........................."%s: |
| 9cc0 | 20 25 64 20 6f 66 20 25 64 20 66 69 6c 65 25 73 20 73 6b 69 70 70 65 64 20 2d 2d 20 53 65 65 20 | .%d.of.%d.file%s.skipped.--.See. |
| 9ce0 | 2a 44 69 72 65 64 20 6c 6f 67 2a 20 62 75 66 66 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 | *Dired.log*.buffer"............. |
| 9d00 | 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 66 61 69 6c 75 72 65 | ............'dired-async-failure |
| 9d20 | 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 70 65 72 61 74 | s.........................operat |
| 9d40 | 69 6f 6e 20 28 6c 65 6e 67 74 68 20 73 6b 69 70 70 65 64 29 20 74 6f 74 61 6c 0a 20 20 20 20 20 | ion.(length.skipped).total...... |
| 9d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 70 6c 75 72 61 6c | ...................(dired-plural |
| 9d80 | 2d 73 20 74 6f 74 61 6c 29 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 53 65 74 75 70 20 63 61 6c | -s.total))))).......;;.Setup.cal |
| 9da0 | 6c 62 61 63 6b 2e 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 | lback........(setq.callback..... |
| 9dc0 | 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 67 6e 6f | ........(lambda.(&optional._igno |
| 9de0 | 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 61 | re)...............(dired-async-a |
| 9e00 | 66 74 65 72 2d 66 69 6c 65 2d 63 72 65 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | fter-file-create................ |
| 9e20 | 74 6f 74 61 6c 20 28 6c 69 73 74 20 6f 70 65 72 61 74 69 6f 6e 20 28 6c 65 6e 67 74 68 20 61 73 | total.(list.operation.(length.as |
| 9e40 | 79 6e 63 2d 66 6e 2d 6c 69 73 74 29 29 20 66 61 69 6c 75 72 65 73 20 73 6b 69 70 70 65 64 29 0a | ync-fn-list)).failures.skipped). |
| 9e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d 20 28 64 6f | ..............(when.(string=.(do |
| 9e80 | 77 6e 63 61 73 65 20 6f 70 65 72 61 74 69 6f 6e 29 20 22 72 65 6e 61 6d 65 22 29 0a 20 20 20 20 | wncase.operation)."rename")..... |
| 9ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 66 69 6c 65 20 2e | ............(cl-loop.for.(file.. |
| 9ec0 | 20 74 6f 29 20 69 6e 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 | .to).in.async-fn-list........... |
| 9ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 62 66 20 3d 20 28 67 65 74 2d 66 69 6c | ...............for.bf.=.(get-fil |
| 9f00 | 65 2d 62 75 66 66 65 72 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-buffer.file).................. |
| 9f20 | 20 20 20 20 20 20 20 20 66 6f 72 20 64 65 73 74 70 20 3d 20 28 66 69 6c 65 2d 65 78 69 73 74 73 | ........for.destp.=.(file-exists |
| 9f40 | 2d 70 20 74 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -p.to).......................... |
| 9f60 | 64 6f 20 28 61 6e 64 20 62 66 20 64 65 73 74 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | do.(and.bf.destp................ |
| 9f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d | ..................(with-current- |
| 9fa0 | 62 75 66 66 65 72 20 62 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | buffer.bf....................... |
| 9fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6e | .............(set-visited-file-n |
| 9fe0 | 61 6d 65 20 74 6f 20 74 20 74 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 | ame.to.t.t))))))).......(let.((d |
| a000 | 69 72 70 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 74 6f 29 29 0a 20 20 20 20 20 | irp.(file-directory-p.to))...... |
| a020 | 20 20 20 20 20 20 20 28 64 65 73 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 | .......(dest.(file-name-director |
| a040 | 79 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 6f 75 6e 64 70 20 27 64 | y.to))).........(when.(boundp.'d |
| a060 | 69 72 65 64 2d 63 72 65 61 74 65 2d 64 65 73 74 69 6e 61 74 69 6f 6e 2d 64 69 72 73 29 0a 20 20 | ired-create-destination-dirs)... |
| a080 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 72 65 61 74 65 2d 64 69 72 0a 20 20 20 20 20 20 20 | ........(setq.create-dir........ |
| a0a0 | 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 73 65 20 64 69 72 65 64 2d 63 72 65 61 74 65 2d 64 | .........(cl-case.dired-create-d |
| a0c0 | 65 73 74 69 6e 61 74 69 6f 6e 2d 64 69 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | estination-dirs................. |
| a0e0 | 20 20 28 61 6c 77 61 79 73 20 27 61 6c 77 61 79 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(always.'always).............. |
| a100 | 20 20 20 20 20 28 61 73 6b 20 28 61 6e 64 20 28 6e 75 6c 6c 20 64 69 72 70 29 0a 20 20 20 20 20 | .....(ask.(and.(null.dirp)...... |
| a120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 20 28 66 69 | .......................(null.(fi |
| a140 | 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 64 65 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 | le-directory-p.dest))........... |
| a160 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 79 2d 6f 72 2d 6e 2d 70 20 28 66 6f 72 | ..................(y-or-n-p.(for |
| a180 | 6d 61 74 20 22 43 72 65 61 74 65 20 64 69 72 65 63 74 6f 72 79 20 60 25 73 27 3f 20 22 20 64 65 | mat."Create.directory.`%s'?.".de |
| a1a0 | 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 61 6c | st)))........................'al |
| a1c0 | 77 61 79 73 29 29 29 29 29 29 0a 20 20 20 20 3b 3b 20 53 74 61 72 74 20 61 73 79 6e 63 20 70 72 | ways)))))).....;;.Start.async.pr |
| a1e0 | 6f 63 65 73 73 2e 0a 20 20 20 20 28 77 68 65 6e 20 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 0a 20 | ocess......(when.async-fn-list.. |
| a200 | 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 70 75 74 0a 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d | .....(process-put........(async- |
| a220 | 73 74 61 72 74 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | start.`(lambda.()............... |
| a240 | 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 20 28 72 65 71 75 | .........(require.'cl-lib).(requ |
| a260 | 69 72 65 20 27 64 69 72 65 64 2d 61 75 78 29 20 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d | ire.'dired-aux).(require.'dired- |
| a280 | 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e | x)........................,(asyn |
| a2a0 | 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 65 | c-inject-variables.dired-async-e |
| a2c0 | 6e 76 2d 76 61 72 69 61 62 6c 65 73 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 | nv-variables-regexp)............ |
| a2e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 20 23 27 66 69 6c 65 73 2d | ............(advice-add.#'files- |
| a300 | 2d 61 73 6b 2d 75 73 65 72 2d 61 62 6f 75 74 2d 6c 61 72 67 65 2d 66 69 6c 65 0a 20 20 20 20 20 | -ask-user-about-large-file...... |
| a320 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f | ..............................:o |
| a340 | 76 65 72 72 69 64 65 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 61 72 67 73 29 20 6e 69 6c | verride.(lambda.(&rest.args).nil |
| a360 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 | ))........................(let.( |
| a380 | 28 64 69 72 65 64 2d 72 65 63 75 72 73 69 76 65 2d 63 6f 70 69 65 73 20 28 71 75 6f 74 65 20 61 | (dired-recursive-copies.(quote.a |
| a3a0 | 6c 77 61 79 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | lways))......................... |
| a3c0 | 20 20 20 20 20 28 64 69 72 65 64 2d 63 6f 70 79 2d 70 72 65 73 65 72 76 65 2d 74 69 6d 65 0a 20 | .....(dired-copy-preserve-time.. |
| a3e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 64 69 | .............................,di |
| a400 | 72 65 64 2d 63 6f 70 79 2d 70 72 65 73 65 72 76 65 2d 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 | red-copy-preserve-time)......... |
| a420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 63 72 65 61 | .....................(dired-crea |
| a440 | 74 65 2d 64 65 73 74 69 6e 61 74 69 6f 6e 2d 64 69 72 73 20 27 2c 63 72 65 61 74 65 2d 64 69 72 | te-destination-dirs.',create-dir |
| a460 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 | )..............................a |
| a480 | 75 74 68 2d 73 6f 75 72 63 65 2d 73 61 76 65 2d 62 65 68 61 76 69 6f 72 29 0a 20 20 20 20 20 20 | uth-source-save-behavior)....... |
| a4a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6f 76 65 72 77 72 69 | ...................(setq.overwri |
| a4c0 | 74 65 2d 62 61 63 6b 75 70 2d 71 75 65 72 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 | te-backup-query.nil)............ |
| a4e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 6e 6c 69 6e 65 20 60 62 61 63 6b 75 70 2d | ..............;;.Inline.`backup- |
| a500 | 66 69 6c 65 27 20 61 73 20 6c 6f 6e 67 20 61 73 20 69 74 20 69 73 20 6e 6f 74 0a 20 20 20 20 20 | file'.as.long.as.it.is.not...... |
| a520 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 76 61 69 6c 61 62 6c 65 | ....................;;.available |
| a540 | 20 69 6e 20 65 6d 61 63 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .in.emacs....................... |
| a560 | 20 20 20 20 28 64 65 66 61 6c 69 61 73 20 27 62 61 63 6b 75 70 2d 66 69 6c 65 0a 20 20 20 20 20 | ....(defalias.'backup-file...... |
| a580 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 61 6d 65 20 66 65 | ......................;;.Same.fe |
| a5a0 | 61 74 75 72 65 20 61 73 20 22 63 70 20 2d 66 20 2d 2d 62 61 63 6b 75 70 3d 6e 75 6d 62 65 72 65 | ature.as."cp.-f.--backup=numbere |
| a5c0 | 64 20 66 72 6f 6d 20 74 6f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d.from.to"...................... |
| a5e0 | 20 20 20 20 20 20 3b 3b 20 53 79 6d 6c 69 6e 6b 73 20 61 72 65 20 63 6f 70 69 65 64 20 61 73 20 | ......;;.Symlinks.are.copied.as. |
| a600 | 66 69 6c 65 20 66 72 6f 6d 20 73 6f 75 72 63 65 20 75 6e 6c 69 6b 65 0a 20 20 20 20 20 20 20 20 | file.from.source.unlike......... |
| a620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 64 69 72 65 64 2d 63 6f 70 | ...................;;.`dired-cop |
| a640 | 79 2d 66 69 6c 65 27 20 77 68 69 63 68 20 69 73 20 73 61 6d 65 20 61 73 20 63 70 20 2d 64 2e 0a | y-file'.which.is.same.as.cp.-d.. |
| a660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 69 | ...........................;;.Di |
| a680 | 72 65 63 74 6f 72 69 65 73 20 61 72 65 20 6f 6d 69 74 74 65 64 2e 0a 20 20 20 20 20 20 20 20 20 | rectories.are.omitted........... |
| a6a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 66 72 6f 6d 20 | ..................(lambda.(from. |
| a6c0 | 74 6f 20 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | to.ok).......................... |
| a6e0 | 20 20 20 20 28 63 6f 6e 64 20 28 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 66 72 6f | ....(cond.((file-directory-p.fro |
| a700 | 6d 29 20 28 69 67 6e 6f 72 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | m).(ignore)).................... |
| a720 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6c 65 74 20 28 28 63 6f 75 6e 74 20 | ................(t.(let.((count. |
| a740 | 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 0))............................. |
| a760 | 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6c 65 74 20 28 28 61 74 74 72 73 20 | ............(while.(let.((attrs. |
| a780 | 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 | (file-attributes.to))).......... |
| a7a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a7c0 | 20 20 20 20 20 20 20 20 28 61 6e 64 20 61 74 74 72 73 20 28 6e 75 6c 6c 20 28 6e 74 68 20 30 20 | ........(and.attrs.(null.(nth.0. |
| a7e0 | 61 74 74 72 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | attrs))))....................... |
| a800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 63 6f 75 | ....................(cl-incf.cou |
| a820 | 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nt)............................. |
| a840 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 6f 20 28 63 6f 6e 63 61 74 20 28 | ..............(setq.to.(concat.( |
| a860 | 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 76 65 72 73 69 6f 6e 73 20 74 6f 29 0a 20 20 20 20 | file-name-sans-versions.to)..... |
| a880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a8a0 | 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." |
| a8c0 | 2e 7e 25 73 7e 22 20 63 6f 75 6e 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .~%s~".count)))))............... |
| a8e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 | ........................(conditi |
| a900 | 6f 6e 2d 63 61 73 65 20 65 72 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | on-case.err..................... |
| a920 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 70 79 2d 66 69 6c 65 | ......................(copy-file |
| a940 | 20 66 72 6f 6d 20 74 6f 20 6f 6b 20 64 69 72 65 64 2d 63 6f 70 79 2d 70 72 65 73 65 72 76 65 2d | .from.to.ok.dired-copy-preserve- |
| a960 | 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | time)........................... |
| a980 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 64 61 74 65 2d 65 72 72 6f 72 0a 20 | ..............(file-date-error.. |
| a9a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a9c0 | 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6c 6f 67 20 22 43 61 6e 27 74 20 73 65 74 20 64 61 | ........(dired-log."Can't.set.da |
| a9e0 | 74 65 20 6f 6e 20 25 73 3a 5c 6e 25 73 5c 6e 22 20 66 72 6f 6d 20 65 72 72 29 29 29 29 29 29 29 | te.on.%s:\n%s\n".from.err))))))) |
| aa00 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4e 6f 77 | ..........................;;.Now |
| aa20 | 20 72 75 6e 20 74 68 65 20 46 49 4c 45 2d 43 52 45 41 54 4f 52 20 66 75 6e 63 74 69 6f 6e 20 6f | .run.the.FILE-CREATOR.function.o |
| aa40 | 6e 20 66 69 6c 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | n.files......................... |
| aa60 | 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 66 6e 20 3d 20 28 71 75 6f 74 65 20 2c 66 69 6c | ..(cl-loop.with.fn.=.(quote.,fil |
| aa80 | 65 2d 63 72 65 61 74 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-creator)...................... |
| aaa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 66 72 6f 6d 20 2e 20 64 65 73 74 29 20 69 | .............for.(from...dest).i |
| aac0 | 6e 20 28 71 75 6f 74 65 20 2c 61 73 79 6e 63 2d 66 6e 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 | n.(quote.,async-fn-list)........ |
| aae0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 63 | ...........................do.(c |
| ab00 | 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 65 72 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ondition-case.err............... |
| ab20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 | ...........................(func |
| ab40 | 61 6c 6c 20 66 6e 20 66 72 6f 6d 20 64 65 73 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | all.fn.from.dest.t)............. |
| ab60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 | ...........................(file |
| ab80 | 2d 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -error.......................... |
| aba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6c 6f 67 20 22 25 73 3a 20 25 | ...............(dired-log."%s:.% |
| abc0 | 73 5c 6e 22 20 28 63 61 72 20 65 72 72 29 20 28 63 64 72 20 65 72 72 29 29 0a 20 20 20 20 20 20 | s\n".(car.err).(cdr.err))....... |
| abe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| ac00 | 20 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..nil)))........................ |
| ac20 | 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 64 69 72 65 64 2d 6c 6f 67 2d 62 75 | ..(when.(get-buffer.dired-log-bu |
| ac40 | 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ffer)........................... |
| ac60 | 20 28 64 69 72 65 64 2d 6c 6f 67 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(dired-log.t).................. |
| ac80 | 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 64 | ..........(with-current-buffer.d |
| aca0 | 69 72 65 64 2d 6c 6f 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ired-log-buffer................. |
| acc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e | .............(write-region.(poin |
| ace0 | 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | t-min).(point-max).............. |
| ad00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 64 | ..............................,d |
| ad20 | 69 72 65 64 2d 61 73 79 6e 63 2d 6c 6f 67 2d 66 69 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 | ired-async-log-file))))......... |
| ad40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 61 79 | ...............,(dired-async-may |
| ad60 | 62 65 2d 6b 69 6c 6c 2d 66 74 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | be-kill-ftp))................... |
| ad80 | 20 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d | ..callback)........'dired-async- |
| ada0 | 70 72 6f 63 65 73 73 20 74 29 0a 20 20 20 20 20 20 3b 3b 20 52 75 6e 20 6d 6f 64 65 2d 6c 69 6e | process.t).......;;.Run.mode-lin |
| adc0 | 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 77 68 69 6c 65 20 70 72 6f 63 65 73 73 20 72 75 | e.notifications.while.process.ru |
| ade0 | 6e 6e 69 6e 67 2e 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 6d 6f 64 65 6c | nning........(dired-async--model |
| ae00 | 69 6e 65 2d 6d 6f 64 65 20 31 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 70 | ine-mode.1).......(message."%s.p |
| ae20 | 72 6f 63 65 65 64 69 6e 67 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 2e 2e 22 20 6f 70 65 | roceeding.asynchronously...".ope |
| ae40 | 72 61 74 69 6f 6e 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 77 64 69 72 65 64 2d 75 73 65 2d 69 | ration))))..(defvar.wdired-use-i |
| ae60 | 6e 74 65 72 61 63 74 69 76 65 2d 72 65 6e 61 6d 65 29 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d | nteractive-rename).(defun.dired- |
| ae80 | 61 73 79 6e 63 2d 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 73 20 28 6f 6c 64 2d 66 6e 20 | async-wdired-do-renames.(old-fn. |
| aea0 | 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 3b 3b 20 50 65 72 68 61 70 73 20 61 20 62 65 74 74 65 | &rest.args)...;;.Perhaps.a.bette |
| aec0 | 72 20 66 69 78 20 77 6f 75 6c 64 20 62 65 20 74 6f 20 61 73 6b 20 66 6f 72 20 72 65 6e 61 6d 69 | r.fix.would.be.to.ask.for.renami |
| aee0 | 6e 67 20 42 45 46 4f 52 45 20 73 74 61 72 74 69 6e 67 0a 20 20 3b 3b 20 4f 4c 44 2d 46 4e 20 77 | ng.BEFORE.starting...;;.OLD-FN.w |
| af00 | 68 65 6e 20 60 77 64 69 72 65 64 2d 75 73 65 2d 69 6e 74 65 72 61 63 74 69 76 65 2d 72 65 6e 61 | hen.`wdired-use-interactive-rena |
| af20 | 6d 65 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 20 20 46 6f 72 20 6e 6f 77 0a 20 20 3b 3b 20 6a 75 | me'.is.non-nil...For.now...;;.ju |
| af40 | 73 74 20 62 69 6e 64 20 69 74 20 74 6f 20 6e 69 6c 20 74 6f 20 65 6e 73 75 72 65 20 6e 6f 20 71 | st.bind.it.to.nil.to.ensure.no.q |
| af60 | 75 65 73 74 69 6f 6e 73 20 77 69 6c 6c 20 62 65 20 61 73 6b 65 64 20 62 65 74 77 65 65 6e 0a 20 | uestions.will.be.asked.between.. |
| af80 | 20 3b 3b 20 65 61 63 68 20 72 65 6e 61 6d 65 2e 0a 20 20 28 6c 65 74 20 28 77 64 69 72 65 64 2d | .;;.each.rename....(let.(wdired- |
| afa0 | 75 73 65 2d 69 6e 74 65 72 61 63 74 69 76 65 2d 72 65 6e 61 6d 65 29 0a 20 20 20 20 28 61 70 70 | use-interactive-rename).....(app |
| afc0 | 6c 79 20 6f 6c 64 2d 66 6e 20 61 72 67 73 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 | ly.old-fn.args)))..;;;###autoloa |
| afe0 | 64 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 64 69 72 65 64 2d 61 73 79 6e 63 | d.(define-minor-mode.dired-async |
| b000 | 2d 6d 6f 64 65 0a 20 20 22 44 6f 20 64 69 72 65 64 20 61 63 74 69 6f 6e 73 20 61 73 79 6e 63 68 | -mode..."Do.dired.actions.asynch |
| b020 | 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 3a 6c 69 67 68 74 65 72 20 64 69 72 65 64 2d 61 73 79 6e | ronously."...:lighter.dired-asyn |
| b040 | 63 2d 6d 6f 64 65 2d 6c 69 67 68 74 65 72 0a 20 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 69 66 | c-mode-lighter...:global.t...(if |
| b060 | 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 | .dired-async-mode.......(progn.. |
| b080 | 20 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 20 27 64 69 72 65 64 2d 63 72 65 61 74 65 | .......(advice-add.'dired-create |
| b0a0 | 2d 66 69 6c 65 73 20 3a 61 72 6f 75 6e 64 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 73 6d | -files.:around.#'dired-async--sm |
| b0c0 | 61 72 74 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 28 61 64 76 69 63 | art-create-files).........(advic |
| b0e0 | 65 2d 61 64 64 20 27 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 73 20 3a 61 72 6f 75 6e 64 | e-add.'wdired-do-renames.:around |
| b100 | 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 73 | .#'dired-async-wdired-do-renames |
| b120 | 29 29 0a 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 72 65 6d 6f | )).....(progn.......(advice-remo |
| b140 | 76 65 20 27 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 20 23 27 64 69 72 65 64 2d 61 | ve.'dired-create-files.#'dired-a |
| b160 | 73 79 6e 63 2d 2d 73 6d 61 72 74 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 | sync--smart-create-files)....... |
| b180 | 28 61 64 76 69 63 65 2d 72 65 6d 6f 76 65 20 27 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 | (advice-remove.'wdired-do-rename |
| b1a0 | 73 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 77 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 | s.#'dired-async-wdired-do-rename |
| b1c0 | 73 29 29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 77 69 | s))))..(defmacro.dired-async--wi |
| b1e0 | 74 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 20 28 26 72 65 73 74 20 62 6f 64 | th-async-create-files.(&rest.bod |
| b200 | 79 29 0a 20 20 22 45 76 61 6c 75 61 74 65 20 42 4f 44 59 20 77 69 74 68 20 e2 80 98 64 69 72 65 | y)..."Evaluate.BODY.with....dire |
| b220 | 64 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 e2 80 99 20 73 65 74 20 74 6f 20 e2 80 98 64 69 72 65 | d-create-files....set.to....dire |
| b240 | 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 e2 80 99 2e 22 0a 20 20 28 64 65 63 | d-async-create-files...."...(dec |
| b260 | 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 30 29 29 0a 20 20 60 28 63 6c 2d 6c 65 74 66 20 28 28 28 | lare.(indent.0))...`(cl-letf.((( |
| b280 | 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 64 69 72 65 64 2d 63 72 65 61 74 65 2d 66 69 | symbol-function.'dired-create-fi |
| b2a0 | 6c 65 73 29 20 23 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 29 | les).#'dired-async-create-files) |
| b2c0 | 29 0a 20 20 20 20 20 2c 40 62 6f 64 79 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a | )......,@body))..;;;###autoload. |
| b2e0 | 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 63 6f 70 79 20 28 26 6f 70 74 | (defun.dired-async-do-copy.(&opt |
| b300 | 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 64 69 72 65 64 2d 64 6f 2d 63 6f | ional.arg)..."Run....dired-do-co |
| b320 | 70 79 e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 | py....asynchronously."...(intera |
| b340 | 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 77 69 74 68 2d | ctive."P")...(dired-async--with- |
| b360 | 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 28 64 69 72 65 64 2d 64 6f 2d | async-create-files....(dired-do- |
| b380 | 63 6f 70 79 20 61 72 67 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 | copy.arg)))..;;;###autoload.(def |
| b3a0 | 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 73 79 6d 6c 69 6e 6b 20 28 26 6f 70 74 69 | un.dired-async-do-symlink.(&opti |
| b3c0 | 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 64 69 72 65 64 2d 64 6f 2d 73 79 6d | onal.arg)..."Run....dired-do-sym |
| b3e0 | 6c 69 6e 6b e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a 20 20 28 69 6e 74 65 | link....asynchronously."...(inte |
| b400 | 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 61 73 79 6e 63 2d 2d 77 69 74 | ractive."P")...(dired-async--wit |
| b420 | 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 28 64 69 72 65 64 2d 64 | h-async-create-files....(dired-d |
| b440 | 6f 2d 73 79 6d 6c 69 6e 6b 20 61 72 67 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 | o-symlink.arg)))..;;;###autoload |
| b460 | 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 68 61 72 64 6c 69 6e 6b 20 | .(defun.dired-async-do-hardlink. |
| b480 | 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 64 69 72 65 64 2d | (&optional.arg)..."Run....dired- |
| b4a0 | 64 6f 2d 68 61 72 64 6c 69 6e 6b e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 22 0a | do-hardlink....asynchronously.". |
| b4c0 | 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 61 73 79 | ..(interactive."P")...(dired-asy |
| b4e0 | 6e 63 2d 2d 77 69 74 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a 20 20 20 28 | nc--with-async-create-files....( |
| b500 | 64 69 72 65 64 2d 64 6f 2d 68 61 72 64 6c 69 6e 6b 20 61 72 67 29 29 29 0a 0a 3b 3b 3b 23 23 23 | dired-do-hardlink.arg)))..;;;### |
| b520 | 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 61 73 79 6e 63 2d 64 6f 2d 72 | autoload.(defun.dired-async-do-r |
| b540 | 65 6e 61 6d 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 75 6e 20 e2 80 98 | ename.(&optional.arg)..."Run.... |
| b560 | 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 e2 80 99 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c | dired-do-rename....asynchronousl |
| b580 | 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 | y."...(interactive."P")...(dired |
| b5a0 | 2d 61 73 79 6e 63 2d 2d 77 69 74 68 2d 61 73 79 6e 63 2d 63 72 65 61 74 65 2d 66 69 6c 65 73 0a | -async--with-async-create-files. |
| b5c0 | 20 20 20 28 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 20 61 72 67 29 29 29 0a 0a 28 70 72 6f | ...(dired-do-rename.arg)))..(pro |
| b5e0 | 76 69 64 65 20 27 64 69 72 65 64 2d 61 73 79 6e 63 29 0a 0a 3b 3b 3b 20 64 69 72 65 64 2d 61 73 | vide.'dired-async)..;;;.dired-as |
| b600 | 79 6e 63 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ync.el.ends.here................ |
| 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 67 69 74 68 75 62 2f 00 00 00 00 00 00 00 00 00 00 00 00 | async-1.9.8/.github/............ |
| b820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b860 | 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 |
| b880 | 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 36 34 35 00 20 35 00 00 00 | 0000000.00000000000.012645..5... |
| b8a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b8c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b8e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b900 | 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................... |
| b920 | 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................... |
| b940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b9a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b9c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b9e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba00 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 67 69 74 68 75 62 2f 77 6f 72 6b 66 6c 6f 77 73 2f 00 00 | async-1.9.8/.github/workflows/.. |
| ba20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba60 | 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 |
| ba80 | 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 37 30 32 00 20 35 00 00 00 | 0000000.00000000000.014702..5... |
| baa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb00 | 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................... |
| bb20 | 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................... |
| bb40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bbc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bbe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc00 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 67 69 74 68 75 62 2f 77 6f 72 6b 66 6c 6f 77 73 2f 74 65 | async-1.9.8/.github/workflows/te |
| bc20 | 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.......................... |
| bc40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc60 | 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 |
| bc80 | 30 30 30 32 35 37 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 34 31 36 00 20 30 00 00 00 | 0002576.00000000000.016416..0... |
| bca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bcc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd00 | 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................... |
| bd20 | 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................... |
| bd40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bda0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bdc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bde0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| be00 | 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 |
| be20 | 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 |
| be40 | 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 |
| be60 | 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 |
| be80 | 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 |
| bea0 | 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 |
| bec0 | 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.}}. |
| bee0 | 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 |
| bf00 | 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:.[ |
| bf20 | 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 |
| bf40 | 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 |
| bf60 | 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'.......... |
| bf80 | 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'.... |
| bfa0 | 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. |
| bfc0 | 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'........... |
| bfe0 | 2d 20 27 32 38 2e 32 27 0a 20 20 20 20 20 20 20 20 20 20 2d 20 73 6e 61 70 73 68 6f 74 0a 0a 20 | -.'28.2'...........-.snapshot... |
| c000 | 20 20 20 73 74 65 70 73 3a 0a 20 20 20 20 2d 20 75 73 65 73 3a 20 61 63 74 69 6f 6e 73 2f 63 68 | ...steps:.....-.uses:.actions/ch |
| c020 | 65 63 6b 6f 75 74 40 76 33 0a 0a 20 20 20 20 2d 20 75 73 65 73 3a 20 6a 63 73 30 39 30 32 31 38 | eckout@v3......-.uses:.jcs090218 |
| c040 | 2f 73 65 74 75 70 2d 65 6d 61 63 73 40 6d 61 73 74 65 72 0a 20 20 20 20 20 20 77 69 74 68 3a 0a | /setup-emacs@master.......with:. |
| c060 | 20 20 20 20 20 20 20 20 76 65 72 73 69 6f 6e 3a 20 24 7b 7b 20 6d 61 74 72 69 78 2e 65 6d 61 63 | ........version:.${{.matrix.emac |
| c080 | 73 2d 76 65 72 73 69 6f 6e 20 7d 7d 0a 0a 20 20 20 20 2d 20 75 73 65 73 3a 20 65 6d 61 63 73 2d | s-version.}}......-.uses:.emacs- |
| c0a0 | 65 61 73 6b 2f 73 65 74 75 70 2d 65 61 73 6b 40 6d 61 73 74 65 72 0a 20 20 20 20 20 20 77 69 74 | eask/setup-eask@master.......wit |
| c0c0 | 68 3a 0a 20 20 20 20 20 20 20 20 76 65 72 73 69 6f 6e 3a 20 27 73 6e 61 70 73 68 6f 74 27 0a 0a | h:.........version:.'snapshot'.. |
| c0e0 | 20 20 20 20 2d 20 6e 61 6d 65 3a 20 57 6f 72 6b 61 72 6f 75 6e 64 20 66 6f 72 20 45 6d 61 63 73 | ....-.name:.Workaround.for.Emacs |
| c100 | 20 32 37 2e 32 27 73 20 57 69 6e 64 6f 77 73 20 62 75 69 6c 64 20 66 72 6f 6d 20 47 4e 55 20 46 | .27.2's.Windows.build.from.GNU.F |
| c120 | 54 50 0a 20 20 20 20 20 20 69 66 3a 20 24 7b 7b 20 72 75 6e 6e 65 72 2e 6f 73 20 3d 3d 20 27 57 | TP.......if:.${{.runner.os.==.'W |
| c140 | 69 6e 64 6f 77 73 27 20 26 26 20 63 6f 6e 74 61 69 6e 73 28 66 72 6f 6d 4a 73 6f 6e 28 27 5b 22 | indows'.&&.contains(fromJson('[" |
| c160 | 32 36 2e 31 22 2c 20 22 32 36 2e 32 22 2c 20 22 32 36 2e 33 22 2c 20 22 32 37 2e 31 22 2c 20 22 | 26.1",."26.2",."26.3",."27.1",." |
| c180 | 32 37 2e 32 22 5d 27 29 2c 20 6d 61 74 72 69 78 2e 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 29 20 | 27.2"]'),.matrix.emacs-version). |
| c1a0 | 7d 7d 0a 20 20 20 20 20 20 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 67 63 69 20 63 65 72 74 | }}.......run:.|.........gci.cert |
| c1c0 | 3a 5c 4c 6f 63 61 6c 4d 61 63 68 69 6e 65 5c 52 6f 6f 74 5c 44 41 43 39 30 32 34 46 35 34 44 38 | :\LocalMachine\Root\DAC9024F54D8 |
| c1e0 | 46 36 44 46 39 34 39 33 35 46 42 31 37 33 32 36 33 38 43 41 36 41 44 37 37 43 31 33 0a 20 20 20 | F6DF94935FB1732638CA6AD77C13.... |
| c200 | 20 20 20 20 20 67 63 69 20 63 65 72 74 3a 5c 4c 6f 63 61 6c 4d 61 63 68 69 6e 65 5c 52 6f 6f 74 | .....gci.cert:\LocalMachine\Root |
| c220 | 5c 44 41 43 39 30 32 34 46 35 34 44 38 46 36 44 46 39 34 39 33 35 46 42 31 37 33 32 36 33 38 43 | \DAC9024F54D8F6DF94935FB1732638C |
| c240 | 41 36 41 44 37 37 43 31 33 20 7c 20 52 65 6d 6f 76 65 2d 49 74 65 6d 0a 0a 20 20 20 20 2d 20 6e | A6AD77C13.|.Remove-Item......-.n |
| c260 | 61 6d 65 3a 20 49 6e 73 74 61 6c 6c 20 64 65 70 65 6e 64 65 6e 63 69 65 73 0a 20 20 20 20 20 20 | ame:.Install.dependencies....... |
| c280 | 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 69 6e 73 74 61 6c 6c 2d 64 65 70 73 | run:.|.........eask.install-deps |
| c2a0 | 20 2d 2d 64 65 76 0a 0a 20 20 20 20 2d 20 6e 61 6d 65 3a 20 52 75 6e 20 62 75 74 74 65 72 63 75 | .--dev......-.name:.Run.buttercu |
| c2c0 | 70 0a 20 20 20 20 20 20 74 69 6d 65 6f 75 74 2d 6d 69 6e 75 74 65 73 3a 20 31 0a 20 20 20 20 20 | p.......timeout-minutes:.1...... |
| c2e0 | 20 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 74 65 73 74 20 62 75 74 74 65 72 | .run:.|.........eask.test.butter |
| c300 | 63 75 70 0a 0a 20 20 20 20 2d 20 6e 61 6d 65 3a 20 52 75 6e 20 74 65 73 74 73 0a 20 20 20 20 20 | cup......-.name:.Run.tests...... |
| c320 | 20 72 75 6e 3a 20 7c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 63 6c 65 61 6e 20 61 6c 6c 0a 20 | .run:.|.........eask.clean.all.. |
| c340 | 20 20 20 20 20 20 20 65 61 73 6b 20 70 61 63 6b 61 67 65 0a 20 20 20 20 20 20 20 20 65 61 73 6b | .......eask.package.........eask |
| c360 | 20 69 6e 73 74 61 6c 6c 0a 20 20 20 20 20 20 20 20 65 61 73 6b 20 63 6f 6d 70 69 6c 65 0a 00 00 | .install.........eask.compile... |
| c380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c3a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c3c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c3e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c400 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 00 00 00 00 00 00 | async-1.9.8/.dir-locals.el...... |
| c420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c460 | 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 |
| c480 | 30 30 30 30 36 36 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 37 34 34 00 20 30 00 00 00 | 0000664.00000000000.013744..0... |
| c4a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c4c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c4e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c500 | 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................... |
| c520 | 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................... |
| c540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c5a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c5c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c5e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c600 | 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.;; |
| c620 | 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 |
| c640 | 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"). |
| c660 | 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 |
| c680 | 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.?#?\\ |
| c6a0 | 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. |
| c6c0 | 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]+\\( |
| c6e0 | 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]+\\)?\\)\\)")..........( |
| c700 | 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 |
| c720 | 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 |
| c740 | 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 |
| c760 | 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 |
| c780 | 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- |
| c7a0 | 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))))............. |
| c7c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c7e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c800 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2e 65 6c 00 00 00 | async-1.9.8/async-bytecomp.el... |
| c820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c860 | 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 |
| c880 | 30 30 32 31 37 36 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 37 32 00 20 30 00 00 00 | 0021760.00000000000.014572..0... |
| c8a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c8c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c8e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c900 | 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................... |
| c920 | 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................... |
| c940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c9a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c9c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c9e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ca00 | 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 |
| ca20 | 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.-*- |
| ca40 | 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 |
| ca60 | 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 |
| ca80 | 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:. |
| caa0 | 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 |
| cac0 | 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. |
| cae0 | 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 |
| cb00 | 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 |
| cb20 | 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 |
| cb40 | 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 |
| cb60 | 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 |
| cb80 | 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 |
| cba0 | 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. |
| cbc0 | 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.; |
| cbe0 | 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,. |
| cc00 | 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, |
| cc20 | 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 |
| cc40 | 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 |
| cc60 | 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 |
| cc80 | 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 |
| cca0 | 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 |
| ccc0 | 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 |
| cce0 | 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. |
| cd00 | 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 |
| cd20 | 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 |
| cd40 | 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 |
| cd60 | 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. |
| cd80 | 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 |
| cda0 | 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 |
| cdc0 | 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 |
| cde0 | 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 |
| ce00 | 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 |
| ce20 | 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 |
| ce40 | 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 |
| ce60 | 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 |
| ce80 | 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 |
| cea0 | 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. |
| cec0 | 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 |
| cee0 | 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 |
| cf00 | 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. |
| cf20 | 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.;; |
| cf40 | 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 |
| cf60 | 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 |
| cf80 | 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 |
| cfa0 | 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..;;.;; |
| cfc0 | 20 20 4e 42 3a 20 54 68 69 73 20 70 61 63 6b 61 67 65 20 69 73 20 61 64 76 69 63 69 6e 67 20 74 | ..NB:.This.package.is.advicing.t |
| cfe0 | 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'.. |
| d000 | 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 |
| d020 | 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 |
| d040 | 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 |
| d060 | 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 |
| d080 | 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 |
| d0a0 | 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 |
| d0c0 | 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 |
| d0e0 | 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 |
| d100 | 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 |
| d120 | 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. |
| d140 | 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. |
| d160 | 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 |
| d180 | 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 |
| d1a0 | 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 |
| d1c0 | 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 |
| d1e0 | 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. |
| d200 | 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 |
| d220 | 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...... |
| d240 | 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". |
| d260 | 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))) |
| d280 | 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 |
| d2a0 | 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 |
| d2c0 | 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 |
| d2e0 | 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 |
| d300 | 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 |
| d320 | 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 |
| d340 | 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 |
| d360 | 73 79 6e 63 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 61 | sync.")..;;;###autoload.(defun.a |
| d380 | 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 28 64 | sync-byte-recompile-directory.(d |
| d3a0 | 69 72 65 63 74 6f 72 79 20 26 6f 70 74 69 6f 6e 61 6c 20 71 75 69 65 74 29 0a 20 20 22 43 6f 6d | irectory.&optional.quiet)..."Com |
| d3c0 | 70 69 6c 65 20 61 6c 6c 20 2a 2e 65 6c 20 66 69 6c 65 73 20 69 6e 20 44 49 52 45 43 54 4f 52 59 | pile.all.*.el.files.in.DIRECTORY |
| d3e0 | 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 41 6c 6c 20 2a 2e 65 6c 63 20 66 69 6c 65 73 | .asynchronously..All.*.elc.files |
| d400 | 20 61 72 65 20 73 79 73 74 65 6d 61 74 69 63 61 6c 6c 79 20 64 65 6c 65 74 65 64 20 62 65 66 6f | .are.systematically.deleted.befo |
| d420 | 72 65 20 70 72 6f 63 65 65 64 69 6e 67 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 | re.proceeding."...(cl-loop.with. |
| d440 | 64 69 72 20 3d 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 64 69 72 65 63 74 6f 72 79 | dir.=.(directory-files.directory |
| d460 | 20 74 20 22 5c 5c 2e 65 6c 63 5c 5c 27 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 75 6e 6c 65 73 | .t."\\.elc\\'")............unles |
| d480 | 73 20 64 69 72 20 72 65 74 75 72 6e 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 | s.dir.return.nil............for. |
| d4a0 | 66 20 69 6e 20 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 66 69 6c 65 2d 65 | f.in.dir............when.(file-e |
| d4c0 | 78 69 73 74 73 2d 70 20 66 29 20 64 6f 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 66 29 29 0a 20 | xists-p.f).do.(delete-file.f)).. |
| d4e0 | 20 3b 3b 20 45 6e 73 75 72 65 20 61 73 79 6e 63 20 69 73 20 72 65 6c 6f 61 64 65 64 20 77 68 65 | .;;.Ensure.async.is.reloaded.whe |
| d500 | 6e 20 61 73 79 6e 63 2e 65 6c 63 20 69 73 20 64 65 6c 65 74 65 64 2e 0a 20 20 3b 3b 20 54 68 69 | n.async.elc.is.deleted....;;.Thi |
| d520 | 73 20 68 61 70 70 65 6e 20 77 68 65 6e 20 72 65 63 6f 6d 70 69 6c 69 6e 67 20 69 74 73 20 6f 77 | s.happen.when.recompiling.its.ow |
| d540 | 6e 20 64 69 72 65 63 74 6f 72 79 2e 0a 20 20 28 6c 6f 61 64 20 22 61 73 79 6e 63 22 29 0a 20 20 | n.directory....(load."async")... |
| d560 | 28 6c 65 74 20 28 28 63 61 6c 6c 2d 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 | (let.((call-back..........(lambd |
| d580 | 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 | a.(&optional._ignore)........... |
| d5a0 | 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 | .(if.(file-exists-p.async-byte-c |
| d5c0 | 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ompile-log-file)................ |
| d5e0 | 28 6c 65 74 20 28 28 62 75 66 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 79 | (let.((buf.(get-buffer-create.by |
| d600 | 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 | te-compile-log-buffer))......... |
| d620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .............(n.0))............. |
| d640 | 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 | .....(with-current-buffer.buf... |
| d660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 | .................(goto-char.(poi |
| d680 | 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 | nt-max))....................(let |
| d6a0 | 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 20 | .((inhibit-read-only.t))........ |
| d6c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 | ..............(insert-file-conte |
| d6e0 | 6e 74 73 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 | nts.async-byte-compile-log-file) |
| d700 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 69 6c 61 74 69 | ......................(compilati |
| d720 | 6f 6e 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 | on-mode))....................(di |
| d740 | 73 70 6c 61 79 2d 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | splay-buffer.buf)............... |
| d760 | 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d | .....(delete-file.async-byte-com |
| d780 | 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | pile-log-file).................. |
| d7a0 | 20 20 28 75 6e 6c 65 73 73 20 71 75 69 65 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(unless.quiet................. |
| d7c0 | 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 | .....(save-excursion............ |
| d7e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 | ............(goto-char.(point-mi |
| d800 | 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c | n))........................(whil |
| d820 | 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 2e 2a 3a 45 72 72 6f 72 3a | e.(re-search-forward."^.*:Error: |
| d840 | 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ".nil.t)........................ |
| d860 | 20 20 28 63 6c 2d 69 6e 63 66 20 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(cl-incf.n)))................. |
| d880 | 20 20 20 20 20 28 69 66 20 28 3e 20 6e 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .....(if.(>.n.0)................ |
| d8a0 | 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 46 61 69 6c 65 64 20 74 6f 20 63 6f | ..........(message."Failed.to.co |
| d8c0 | 6d 70 69 6c 65 20 25 64 20 66 69 6c 65 73 20 69 6e 20 64 69 72 65 63 74 6f 72 79 20 60 25 73 27 | mpile.%d.files.in.directory.`%s' |
| d8e0 | 22 20 6e 20 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ".n.directory).................. |
| d900 | 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 69 72 65 63 74 6f 72 79 20 60 25 73 27 20 63 | ......(message."Directory.`%s'.c |
| d920 | 6f 6d 70 69 6c 65 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 77 61 72 6e | ompiled.asynchronously.with.warn |
| d940 | 69 6e 67 73 22 20 64 69 72 65 63 74 6f 72 79 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ings".directory)))))............ |
| d960 | 20 20 28 75 6e 6c 65 73 73 20 71 75 69 65 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ..(unless.quiet................( |
| d980 | 6d 65 73 73 61 67 65 20 22 44 69 72 65 63 74 6f 72 79 20 60 25 73 27 20 63 6f 6d 70 69 6c 65 64 | message."Directory.`%s'.compiled |
| d9a0 | 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 73 75 63 63 65 73 73 22 20 64 69 | .asynchronously.with.success".di |
| d9c0 | 72 65 63 74 6f 72 79 29 29 29 29 29 29 0a 20 20 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 | rectory)))))).....(async-start.. |
| d9e0 | 20 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 | ....`(lambda.().........(require |
| da00 | 20 27 62 79 74 65 63 6f 6d 70 29 0a 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 | .'bytecomp).........,(async-inje |
| da20 | 63 74 2d 76 61 72 69 61 62 6c 65 73 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 6c 6f 61 64 | ct-variables.async-bytecomp-load |
| da40 | 2d 76 61 72 69 61 62 6c 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 | -variable-regexp).........(let.( |
| da60 | 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 | (default-directory.(file-name-as |
| da80 | 2d 64 69 72 65 63 74 6f 72 79 20 2c 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 | -directory.,directory))......... |
| daa0 | 20 20 20 20 20 20 65 72 72 6f 72 2d 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 64 64 | ......error-data)...........(add |
| dac0 | 2d 74 6f 2d 6c 69 73 74 20 27 6c 6f 61 64 2d 70 61 74 68 20 64 65 66 61 75 6c 74 2d 64 69 72 65 | -to-list.'load-path.default-dire |
| dae0 | 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 | ctory)...........(byte-recompile |
| db00 | 2d 64 69 72 65 63 74 6f 72 79 20 2c 64 69 72 65 63 74 6f 72 79 20 30 20 74 29 0a 20 20 20 20 20 | -directory.,directory.0.t)...... |
| db20 | 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 79 74 65 2d 63 6f 6d 70 | .....(when.(get-buffer.byte-comp |
| db40 | 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 | ile-log-buffer).............(set |
| db60 | 71 20 65 72 72 6f 72 2d 64 61 74 61 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 | q.error-data.(with-current-buffe |
| db80 | 72 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 | r.byte-compile-log-buffer....... |
| dba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 | .........................(buffer |
| dbc0 | 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 2d | -substring-no-properties.(point- |
| dbe0 | 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | min).(point-max))))............. |
| dc00 | 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 65 72 72 6f 72 2d 64 61 74 61 20 22 22 29 0a | (unless.(string=.error-data.""). |
| dc20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 2c 61 | ..............(with-temp-file.,a |
| dc40 | 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 0a 20 20 20 20 20 | sync-byte-compile-log-file...... |
| dc60 | 20 20 20 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 | ...........(erase-buffer)....... |
| dc80 | 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 65 72 72 6f 72 2d 64 61 74 61 29 29 29 29 | ..........(insert.error-data)))) |
| dca0 | 29 29 0a 20 20 20 20 20 63 61 6c 6c 2d 62 61 63 6b 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 71 | ))......call-back).....(unless.q |
| dcc0 | 75 69 65 74 20 28 6d 65 73 73 61 67 65 20 22 53 74 61 72 74 65 64 20 63 6f 6d 70 69 6c 69 6e 67 | uiet.(message."Started.compiling |
| dce0 | 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 64 69 72 65 63 74 6f 72 79 20 25 73 22 20 64 69 | .asynchronously.directory.%s".di |
| dd00 | 72 65 63 74 6f 72 79 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 61 72 63 | rectory))))..(defvar.package-arc |
| dd20 | 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 61 | hive-contents).(defvar.package-a |
| dd40 | 6c 69 73 74 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 61 63 6b 61 67 65 2d | list).(declare-function.package- |
| dd60 | 64 65 73 63 2d 72 65 71 73 20 22 70 61 63 6b 61 67 65 2e 65 6c 22 20 28 63 6c 2d 78 29 29 0a 0a | desc-reqs."package.el".(cl-x)).. |
| dd80 | 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 2d 67 65 74 2d 70 61 63 6b 61 | (defun.async-bytecomp--get-packa |
| dda0 | 67 65 2d 64 65 70 73 20 28 70 6b 67 73 29 0a 20 20 3b 3b 20 53 61 6d 65 20 61 73 20 60 70 61 63 | ge-deps.(pkgs)...;;.Same.as.`pac |
| ddc0 | 6b 61 67 65 2d 2d 67 65 74 2d 64 65 70 73 27 20 62 75 74 20 70 61 72 73 65 20 69 6e 73 74 65 61 | kage--get-deps'.but.parse.instea |
| dde0 | 64 20 60 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 27 0a 20 20 3b | d.`package-archive-contents'...; |
| de00 | 3b 20 62 65 63 61 75 73 65 20 50 4b 47 20 69 73 20 6e 6f 74 20 61 6c 72 65 61 64 79 20 69 6e 73 | ;.because.PKG.is.not.already.ins |
| de20 | 74 61 6c 6c 65 64 20 61 6e 64 20 6e 6f 74 20 70 72 65 73 65 6e 74 20 69 6e 20 60 70 61 63 6b 61 | talled.and.not.present.in.`packa |
| de40 | 67 65 2d 61 6c 69 73 74 27 2e 0a 20 20 3b 3b 20 48 6f 77 65 76 65 72 20 66 61 6c 6c 62 61 63 6b | ge-alist'....;;.However.fallback |
| de60 | 20 74 6f 20 60 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 27 20 69 6e 20 63 61 73 65 20 50 4b 47 20 | .to.`package-alist'.in.case.PKG. |
| de80 | 6e 6f 20 6d 6f 72 65 20 70 72 65 73 65 6e 74 0a 20 20 3b 3b 20 69 6e 20 60 70 61 63 6b 61 67 65 | no.more.present...;;.in.`package |
| dea0 | 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 27 20 64 75 65 20 74 6f 20 6d 6f 64 69 66 69 | -archive-contents'.due.to.modifi |
| dec0 | 63 61 74 69 6f 6e 20 74 6f 20 60 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 73 27 2e 0a 20 20 | cation.to.`package-archives'.... |
| dee0 | 3b 3b 20 53 65 65 20 69 73 73 75 65 20 23 35 38 2e 0a 20 20 28 6c 65 74 20 28 28 73 65 65 6e 20 | ;;.See.issue.#58....(let.((seen. |
| df00 | 27 28 29 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 70 6b 67 73 0a 20 20 20 20 20 20 28 6c 65 74 | '())).....(while.pkgs.......(let |
| df20 | 20 28 28 70 6b 67 20 28 70 6f 70 20 70 6b 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c | .((pkg.(pop.pkgs))).........(unl |
| df40 | 65 73 73 20 28 6d 65 6d 71 20 70 6b 67 20 73 65 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c | ess.(memq.pkg.seen)...........(l |
| df60 | 65 74 20 28 28 70 6b 67 2d 64 65 73 63 20 28 63 61 64 72 20 28 6f 72 20 28 61 73 73 71 20 70 6b | et.((pkg-desc.(cadr.(or.(assq.pk |
| df80 | 67 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 20 20 | g.package-archive-contents)..... |
| dfa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| dfc0 | 28 61 73 73 71 20 70 6b 67 20 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 29 29 29 29 29 0a 20 20 20 | (assq.pkg.package-alist))))).... |
| dfe0 | 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 6b 67 2d 64 65 73 63 0a 20 20 20 20 20 20 20 20 | .........(when.pkg-desc......... |
| e000 | 20 20 20 20 20 20 28 70 75 73 68 20 70 6b 67 20 73 65 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 | ......(push.pkg.seen)........... |
| e020 | 20 20 20 20 28 73 65 74 71 20 70 6b 67 73 20 28 61 70 70 65 6e 64 20 28 6d 61 70 63 61 72 20 23 | ....(setq.pkgs.(append.(mapcar.# |
| e040 | 27 63 61 72 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 72 65 71 73 20 70 6b 67 2d 64 65 73 63 | 'car.(package-desc-reqs.pkg-desc |
| e060 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )).............................. |
| e080 | 20 20 20 20 70 6b 67 73 29 29 29 29 29 29 29 0a 20 20 20 20 73 65 65 6e 29 29 0a 0a 28 64 65 66 | ....pkgs))))))).....seen))..(def |
| e0a0 | 75 6e 20 61 73 79 6e 63 2d 2d 70 61 63 6b 61 67 65 2d 63 6f 6d 70 69 6c 65 20 28 6f 72 69 67 2d | un.async--package-compile.(orig- |
| e0c0 | 66 75 6e 20 70 6b 67 2d 64 65 73 63 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 28 6c 65 74 20 | fun.pkg-desc.&rest.args)...(let. |
| e0e0 | 28 28 63 75 72 2d 70 61 63 6b 61 67 65 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 6e 61 6d 65 | ((cur-package.(package-desc-name |
| e100 | 20 70 6b 67 2d 64 65 73 63 29 29 0a 20 20 20 20 20 20 20 20 28 70 6b 67 2d 64 69 72 20 28 70 61 | .pkg-desc)).........(pkg-dir.(pa |
| e120 | 63 6b 61 67 65 2d 64 65 73 63 2d 64 69 72 20 70 6b 67 2d 64 65 73 63 29 29 29 0a 20 20 20 20 28 | ckage-desc-dir.pkg-desc))).....( |
| e140 | 69 66 20 28 6f 72 20 28 6d 65 6d 62 65 72 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c | if.(or.(member.async-bytecomp-al |
| e160 | 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 20 27 28 74 20 61 6c 6c 20 28 61 6c 6c 29 29 29 0a 20 | lowed-packages.'(t.all.(all))).. |
| e180 | 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 63 75 72 2d 70 61 63 6b 61 67 65 20 28 61 73 | ...........(memq.cur-package.(as |
| e1a0 | 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 2d 67 65 74 2d 70 61 63 6b 61 67 65 2d 64 65 70 73 0a 20 | ync-bytecomp--get-package-deps.. |
| e1c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 73 | ..............................as |
| e1e0 | 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 29 29 29 | ync-bytecomp-allowed-packages))) |
| e200 | 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 49 58 | .........(progn...........;;.FIX |
| e220 | 4d 45 3a 20 57 68 79 20 64 6f 20 77 65 20 75 73 65 20 28 65 71 20 63 75 72 2d 70 61 63 6b 61 67 | ME:.Why.do.we.use.(eq.cur-packag |
| e240 | 65 20 27 61 73 79 6e 63 29 20 6f 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 | e.'async).once...........;;.and. |
| e260 | 28 73 74 72 69 6e 67 3d 20 63 75 72 2d 70 61 63 6b 61 67 65 20 22 61 73 79 6e 63 22 29 20 61 66 | (string=.cur-package."async").af |
| e280 | 74 65 72 77 61 72 64 73 3f 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 63 75 | terwards?...........(when.(eq.cu |
| e2a0 | 72 2d 70 61 63 6b 61 67 65 20 27 61 73 79 6e 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 | r-package.'async).............(f |
| e2c0 | 6d 61 6b 75 6e 62 6f 75 6e 64 20 27 61 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 | makunbound.'async-byte-recompile |
| e2e0 | 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 64 64 20 74 6f | -directory))...........;;.Add.to |
| e300 | 20 60 6c 6f 61 64 2d 70 61 74 68 27 20 74 68 65 20 6c 61 74 65 73 74 20 76 65 72 73 69 6f 6e 20 | .`load-path'.the.latest.version. |
| e320 | 6f 66 20 61 73 79 6e 63 20 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 6c 6f 61 64 | of.async.and...........;;.reload |
| e340 | 20 69 74 20 77 68 65 6e 20 72 65 69 6e 73 74 61 6c 6c 69 6e 67 20 61 73 79 6e 63 2e 0a 20 20 20 | .it.when.reinstalling.async..... |
| e360 | 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d 20 63 75 72 2d 70 61 63 6b 61 67 | .......(when.(string=.cur-packag |
| e380 | 65 20 22 61 73 79 6e 63 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 70 75 73 68 6e | e."async").............(cl-pushn |
| e3a0 | 65 77 20 70 6b 67 2d 64 69 72 20 6c 6f 61 64 2d 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 | ew.pkg-dir.load-path)........... |
| e3c0 | 20 20 28 6c 6f 61 64 20 22 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 22 29 29 0a 20 20 20 20 20 | ..(load."async-bytecomp"))...... |
| e3e0 | 20 20 20 20 20 3b 3b 20 60 61 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 6c 65 2d 64 69 | .....;;.`async-byte-recompile-di |
| e400 | 72 65 63 74 6f 72 79 27 20 77 69 6c 6c 20 61 64 64 20 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 | rectory'.will.add.directory..... |
| e420 | 20 20 20 20 20 20 3b 3b 20 61 73 20 6e 65 65 64 65 64 20 74 6f 20 60 6c 6f 61 64 2d 70 61 74 68 | ......;;.as.needed.to.`load-path |
| e440 | 27 2e 0a 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 62 79 74 65 2d 72 65 63 6f 6d 70 69 | '............(async-byte-recompi |
| e460 | 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 64 69 72 20 70 | le-directory.(package-desc-dir.p |
| e480 | 6b 67 2d 64 65 73 63 29 20 74 29 29 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 6f 72 69 67 2d 66 | kg-desc).t)).......(apply.orig-f |
| e4a0 | 75 6e 20 70 6b 67 2d 64 65 73 63 20 61 72 67 73 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f | un.pkg-desc.args))))..;;;###auto |
| e4c0 | 6c 6f 61 64 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 61 73 79 6e 63 2d 62 79 | load.(define-minor-mode.async-by |
| e4e0 | 74 65 63 6f 6d 70 2d 70 61 63 6b 61 67 65 2d 6d 6f 64 65 0a 20 20 22 42 79 74 65 20 63 6f 6d 70 | tecomp-package-mode..."Byte.comp |
| e500 | 69 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 70 61 63 6b 61 67 65 73 20 69 6e 73 74 | ile.asynchronously.packages.inst |
| e520 | 61 6c 6c 65 64 20 77 69 74 68 20 70 61 63 6b 61 67 65 2e 65 6c 2e 0a 41 73 79 6e 63 20 63 6f 6d | alled.with.package.el..Async.com |
| e540 | 70 69 6c 61 74 69 6f 6e 20 6f 66 20 70 61 63 6b 61 67 65 73 20 63 61 6e 20 62 65 20 63 6f 6e 74 | pilation.of.packages.can.be.cont |
| e560 | 72 6f 6c 6c 65 64 20 62 79 0a 60 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c 6c 6f 77 65 | rolled.by.`async-bytecomp-allowe |
| e580 | 64 2d 70 61 63 6b 61 67 65 73 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 61 73 79 6e 63 0a 20 20 | d-packages'."...:group.'async... |
| e5a0 | 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 69 66 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 70 | :global.t...(if.async-bytecomp-p |
| e5c0 | 61 63 6b 61 67 65 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 20 27 70 | ackage-mode.......(advice-add.'p |
| e5e0 | 61 63 6b 61 67 65 2d 2d 63 6f 6d 70 69 6c 65 20 3a 61 72 6f 75 6e 64 20 23 27 61 73 79 6e 63 2d | ackage--compile.:around.#'async- |
| e600 | 2d 70 61 63 6b 61 67 65 2d 63 6f 6d 70 69 6c 65 29 0a 20 20 20 20 28 61 64 76 69 63 65 2d 72 65 | -package-compile).....(advice-re |
| e620 | 6d 6f 76 65 20 27 70 61 63 6b 61 67 65 2d 2d 63 6f 6d 70 69 6c 65 20 23 27 61 73 79 6e 63 2d 2d | move.'package--compile.#'async-- |
| e640 | 70 61 63 6b 61 67 65 2d 63 6f 6d 70 69 6c 65 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f | package-compile)))..;;;###autolo |
| e660 | 61 64 0a 28 64 65 66 75 6e 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 66 69 6c | ad.(defun.async-byte-compile-fil |
| e680 | 65 20 28 66 69 6c 65 29 0a 20 20 22 42 79 74 65 20 63 6f 6d 70 69 6c 65 20 4c 69 73 70 20 63 6f | e.(file)..."Byte.compile.Lisp.co |
| e6a0 | 64 65 20 46 49 4c 45 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 0a 53 61 6d 65 20 61 73 | de.FILE.asynchronously...Same.as |
| e6c0 | 20 60 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 66 69 6c 65 27 20 62 75 74 20 61 73 79 6e 63 68 72 | .`byte-compile-file'.but.asynchr |
| e6e0 | 6f 6e 6f 75 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 66 46 69 6c 65 3a 20 22 | onous."...(interactive."fFile:." |
| e700 | 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6c 6c 2d 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 28 6c | )...(let.((call-back..........(l |
| e720 | 61 6d 62 64 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 | ambda.(&optional._ignore)....... |
| e740 | 20 20 20 20 20 28 6c 65 74 20 28 28 62 6e 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 | .....(let.((bn.(file-name-nondir |
| e760 | 65 63 74 6f 72 79 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 | ectory.file)))..............(if. |
| e780 | 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c | (file-exists-p.async-byte-compil |
| e7a0 | 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 | e-log-file)..................(le |
| e7c0 | 74 20 28 28 62 75 66 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 79 74 65 2d | t.((buf.(get-buffer-create.byte- |
| e7e0 | 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | compile-log-buffer))............ |
| e800 | 20 20 20 20 20 20 20 20 20 20 20 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ............start).............. |
| e820 | 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 | ......(with-current-buffer.buf.. |
| e840 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 | ....................(goto-char.( |
| e860 | 73 65 74 71 20 73 74 61 72 74 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 | setq.start.(point-max)))........ |
| e880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 | ..............(let.((inhibit-rea |
| e8a0 | 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d-only.t))...................... |
| e8c0 | 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 61 73 79 6e 63 2d 62 79 | ..(insert-file-contents.async-by |
| e8e0 | 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 | te-compile-log-file)............ |
| e900 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 6d 6f 64 65 29 29 0a | ............(compilation-mode)). |
| e920 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 62 75 | .....................(display-bu |
| e940 | 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ffer.buf)......................( |
| e960 | 64 65 6c 65 74 65 2d 66 69 6c 65 20 61 73 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c | delete-file.async-byte-compile-l |
| e980 | 6f 67 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | og-file)......................(s |
| e9a0 | 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ave-excursion................... |
| e9c0 | 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 20 | .....(goto-char.start).......... |
| e9e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 | ..............(if.(re-search-for |
| ea00 | 77 61 72 64 20 22 5e 2e 2a 3a 45 72 72 6f 72 3a 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 | ward."^.*:Error:".nil.t)........ |
| ea20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 46 61 | ....................(message."Fa |
| ea40 | 69 6c 65 64 20 74 6f 20 63 6f 6d 70 69 6c 65 20 60 25 73 27 22 20 62 6e 29 0a 20 20 20 20 20 20 | iled.to.compile.`%s'".bn)....... |
| ea60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 60 25 73 | ...................(message."`%s |
| ea80 | 27 20 63 6f 6d 70 69 6c 65 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 77 | '.compiled.asynchronously.with.w |
| eaa0 | 61 72 6e 69 6e 67 73 22 20 62 6e 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | arnings".bn)))))................ |
| eac0 | 28 6d 65 73 73 61 67 65 20 22 60 25 73 27 20 63 6f 6d 70 69 6c 65 64 20 61 73 79 6e 63 68 72 6f | (message."`%s'.compiled.asynchro |
| eae0 | 6e 6f 75 73 6c 79 20 77 69 74 68 20 73 75 63 63 65 73 73 22 20 62 6e 29 29 29 29 29 29 0a 20 20 | nously.with.success".bn))))))... |
| eb00 | 20 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a | ..(async-start......`(lambda.(). |
| eb20 | 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 62 79 74 65 63 6f 6d 70 29 0a 20 20 20 20 | ........(require.'bytecomp)..... |
| eb40 | 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 6c 65 73 20 61 73 79 | ....,(async-inject-variables.asy |
| eb60 | 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 6c 6f 61 64 2d 76 61 72 69 61 62 6c 65 2d 72 65 67 65 78 70 | nc-bytecomp-load-variable-regexp |
| eb80 | 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f | ).........(let.((default-directo |
| eba0 | 72 79 20 2c 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 29 29 | ry.,(file-name-directory.file))) |
| ebc0 | 0a 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 6c 6f 61 64 2d 70 61 | ...........(add-to-list.'load-pa |
| ebe0 | 74 68 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 | th.default-directory)........... |
| ec00 | 28 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 66 69 6c 65 20 2c 66 69 6c 65 29 0a 20 20 20 20 20 20 | (byte-compile-file.,file)....... |
| ec20 | 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 79 74 65 2d 63 6f 6d 70 69 | ....(when.(get-buffer.byte-compi |
| ec40 | 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | le-log-buffer).............(setq |
| ec60 | 20 65 72 72 6f 72 2d 64 61 74 61 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 | .error-data.(with-current-buffer |
| ec80 | 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 | .byte-compile-log-buffer........ |
| eca0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d | ........................(buffer- |
| ecc0 | 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 2d 6d | substring-no-properties.(point-m |
| ece0 | 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | in).(point-max)))).............( |
| ed00 | 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 65 72 72 6f 72 2d 64 61 74 61 20 22 22 29 0a 20 | unless.(string=.error-data."").. |
| ed20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 2c 61 73 | .............(with-temp-file.,as |
| ed40 | 79 6e 63 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 66 69 6c 65 0a 20 20 20 20 20 20 | ync-byte-compile-log-file....... |
| ed60 | 20 20 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 | ..........(erase-buffer)........ |
| ed80 | 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 65 72 72 6f 72 2d 64 61 74 61 29 29 29 29 29 | .........(insert.error-data))))) |
| eda0 | 29 0a 20 20 20 20 20 63 61 6c 6c 2d 62 61 63 6b 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 61 | )......call-back)))..(provide.'a |
| edc0 | 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 29 0a 0a 3b 3b 3b 20 61 73 79 6e 63 2d 62 79 74 65 63 6f | sync-bytecomp)..;;;.async-byteco |
| ede0 | 6d 70 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | mp.el.ends.here................. |
| ee00 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 73 6d 74 70 6d 61 69 6c 2d 61 73 79 6e 63 2e 65 6c 00 00 00 | async-1.9.8/smtpmail-async.el... |
| ee20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ee40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ee60 | 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 |
| ee80 | 30 30 30 34 36 36 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 30 34 00 20 30 00 00 00 | 0004666.00000000000.014604..0... |
| eea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| eec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| eee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ef00 | 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................... |
| ef20 | 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................... |
| ef40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ef60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ef80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| efa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| efc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| efe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f000 | 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 |
| f020 | 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 |
| f040 | 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.-*- |
| f060 | 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 |
| f080 | 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...;;. |
| f0a0 | 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 |
| f0c0 | 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 |
| f0e0 | 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 |
| f100 | 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 |
| f120 | 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 |
| f140 | 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 |
| f160 | 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 |
| f180 | 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. |
| f1a0 | 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.; |
| f1c0 | 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,. |
| f1e0 | 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, |
| f200 | 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 |
| f220 | 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 |
| f240 | 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 |
| f260 | 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 |
| f280 | 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 |
| f2a0 | 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 |
| f2c0 | 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. |
| f2e0 | 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 |
| f300 | 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 |
| f320 | 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 |
| f340 | 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. |
| f360 | 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 |
| f380 | 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 |
| f3a0 | 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 |
| f3c0 | 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 |
| f3e0 | 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:.;; |
| f400 | 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). |
| f420 | 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 |
| f440 | 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.;;..... |
| f460 | 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.' |
| f480 | 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 |
| f4a0 | 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 |
| f4c0 | 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 |
| f4e0 | 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 |
| f500 | 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 |
| f520 | 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)..( |
| f540 | 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 |
| f560 | 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. |
| f580 | 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. |
| f5a0 | 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 |
| f5c0 | 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 |
| f5e0 | 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 |
| f600 | 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 |
| f620 | 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.()...( |
| f640 | 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 |
| f660 | 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 |
| f680 | 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 |
| f6a0 | 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- |
| f6c0 | 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 |
| f6e0 | 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 |
| f700 | 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 |
| f720 | 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) |
| f740 | 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...... |
| f760 | 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)...... |
| f780 | 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). |
| f7a0 | 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 |
| f7c0 | 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...... |
| f7e0 | 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... |
| f800 | 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 |
| f820 | 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\\) |
| f840 | 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"... |
| f860 | 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 |
| f880 | 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 |
| f8a0 | 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 |
| f8c0 | 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 |
| f8e0 | 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). |
| f900 | 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))).. |
| f920 | 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). |
| f940 | 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 |
| f960 | 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 |
| f980 | 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 |
| f9a0 | 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........... |
| f9c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f9e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fa00 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 2e 65 6c 70 61 69 67 6e 6f 72 65 00 00 00 00 00 00 00 00 00 | async-1.9.8/.elpaignore......... |
| fa20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fa40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fa60 | 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 |
| fa80 | 30 30 30 30 30 31 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 34 32 32 00 20 30 00 00 00 | 0000010.00000000000.013422..0... |
| faa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fb00 | 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................... |
| fb20 | 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................... |
| fb40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fb60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fb80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fbc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fbe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fc00 | 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......................... |
| fc20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fc40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fc60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fc80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fcc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fd00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fd20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fd40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fd60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fd80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fda0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fdc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fde0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fe00 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 4d 61 6b 65 66 69 6c 65 00 00 00 00 00 00 00 00 00 00 00 00 | async-1.9.8/Makefile............ |
| fe20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fe40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fe60 | 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 |
| fe80 | 30 30 30 33 36 30 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 37 35 31 00 20 30 00 00 00 | 0003605.00000000000.012751..0... |
| fea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| fee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ff00 | 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................... |
| ff20 | 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................... |
| ff40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ff60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ff80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ffa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ffc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ffe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10000 | 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: |
| 10020 | 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. |
| 10040 | 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 |
| 10060 | 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. |
| 10080 | 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.## |
| 100a0 | 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 |
| 100c0 | 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 |
| 100e0 | 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 |
| 10100 | 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. |
| 10120 | 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.# |
| 10140 | 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;. |
| 10160 | 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 |
| 10180 | 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..##.# |
| 101a0 | 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 |
| 101c0 | 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 |
| 101e0 | 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 |
| 10200 | 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 |
| 10220 | 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 |
| 10240 | 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 |
| 10260 | 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 |
| 10280 | 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 |
| 102a0 | 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 |
| 102c0 | 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.##. |
| 102e0 | 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 |
| 10300 | 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.##.< |
| 10320 | 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/>.. |
| 10340 | 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 |
| 10360 | 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_ |
| 10380 | 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 |
| 103a0 | 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 |
| 103c0 | 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.: |
| 103e0 | 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... |
| 10400 | 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) |
| 10420 | 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 |
| 10440 | 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 |
| 10460 | 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 |
| 10480 | 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 |
| 104a0 | 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.. |
| 104c0 | 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 |
| 104e0 | 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. |
| 10500 | 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 |
| 10520 | 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 |
| 10540 | 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 |
| 10560 | 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 |
| 10580 | 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. |
| 105a0 | 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 |
| 105c0 | 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. |
| 105e0 | 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- |
| 10600 | 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\" |
| 10620 | 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- |
| 10640 | 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 |
| 10660 | 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 |
| 10680 | 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 |
| 106a0 | 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 |
| 106c0 | 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}.| |
| 106e0 | 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. |
| 10700 | 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 |
| 10720 | 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.$ |
| 10740 | 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.${ |
| 10760 | 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} |
| 10780 | 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............................ |
| 107a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 107c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 107e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10800 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 52 45 41 44 4d 45 2e 6d 64 00 00 00 00 00 00 00 00 00 00 00 | async-1.9.8/README.md........... |
| 10820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10860 | 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 |
| 10880 | 30 30 32 32 31 31 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 35 36 31 00 20 30 00 00 00 | 0022111.00000000000.012561..0... |
| 108a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 108c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 108e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10900 | 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................... |
| 10920 | 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................... |
| 10940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 109a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 109c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 109e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10a00 | 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 |
| 10a20 | 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 |
| 10a40 | 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 |
| 10a60 | 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 |
| 10a80 | 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:/ |
| 10aa0 | 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 |
| 10ac0 | 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 |
| 10ae0 | 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 |
| 10b00 | 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 |
| 10b20 | 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 |
| 10b40 | 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 |
| 10b60 | 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=" |
| 10b80 | 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. |
| 10ba0 | 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 |
| 10bc0 | 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 |
| 10be0 | 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 |
| 10c00 | 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- |
| 10c20 | 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 |
| 10c40 | 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. |
| 10c60 | 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 |
| 10c80 | 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 |
| 10ca0 | 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- |
| 10cc0 | 6d 61 69 6c 2d 61 73 79 6e 63 0a 2a 20 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 0a 0a 23 20 49 | mail-async.*.async-bytecomp..#.I |
| 10ce0 | 6e 73 74 61 6c 6c 0a 0a 59 6f 75 20 63 61 6e 20 69 6e 73 74 61 6c 6c 20 65 6d 61 63 73 2d 61 73 | nstall..You.can.install.emacs-as |
| 10d00 | 79 6e 63 20 70 61 63 6b 61 67 65 20 66 72 6f 6d 20 4d 45 4c 50 41 20 75 73 69 6e 67 20 70 61 63 | ync.package.from.MELPA.using.pac |
| 10d20 | 6b 61 67 65 2e 65 6c 2e 0a 0a 59 6f 75 20 63 61 6e 20 61 6c 73 6f 20 69 6e 73 74 61 6c 6c 20 66 | kage.el...You.can.also.install.f |
| 10d40 | 72 6f 6d 20 73 6f 75 72 63 65 73 2c 20 69 6e 20 74 68 69 73 20 63 61 73 65 20 79 6f 75 20 73 68 | rom.sources,.in.this.case.you.sh |
| 10d60 | 6f 75 6c 64 20 69 6e 73 74 61 6c 6c 0a 75 73 69 6e 67 20 6d 61 6b 65 20 61 6e 64 20 6d 61 6b 65 | ould.install.using.make.and.make |
| 10d80 | 20 69 6e 73 74 61 6c 6c 20 74 6f 20 65 6e 73 75 72 65 20 65 6d 61 63 73 2d 61 73 79 6e 63 20 69 | .install.to.ensure.emacs-async.i |
| 10da0 | 73 20 69 6e 73 74 61 6c 6c 65 64 20 69 6e 20 61 0a 73 74 61 6e 64 61 72 64 20 6c 6f 61 64 2d 70 | s.installed.in.a.standard.load-p |
| 10dc0 | 61 74 68 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 77 68 65 72 65 20 6f 74 68 65 72 20 70 61 63 6b | ath.destination.where.other.pack |
| 10de0 | 61 67 65 73 20 63 61 6e 20 66 69 6e 64 20 69 74 0a 65 61 73 69 6c 79 20 77 68 65 6e 20 63 6f 6d | ages.can.find.it.easily.when.com |
| 10e00 | 70 69 6c 69 6e 67 2e 0a 0a 23 23 20 49 6e 73 74 61 6c 6c 20 64 69 72 65 64 2d 61 73 79 6e 63 0a | piling...##.Install.dired-async. |
| 10e20 | 0a 41 64 64 20 74 6f 20 79 6f 75 72 20 60 2e 65 6d 61 63 73 2e 65 6c 60 3a 0a 0a 20 20 20 20 28 | .Add.to.your.`.emacs.el`:......( |
| 10e40 | 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 20 22 64 69 72 65 | autoload.'dired-async-mode."dire |
| 10e60 | 64 2d 61 73 79 6e 63 2e 65 6c 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 28 64 69 72 65 64 2d 61 73 | d-async.el".nil.t).....(dired-as |
| 10e80 | 79 6e 63 2d 6d 6f 64 65 20 31 29 0a 0a 54 68 69 73 20 77 69 6c 6c 20 61 6c 6c 6f 77 20 79 6f 75 | ync-mode.1)..This.will.allow.you |
| 10ea0 | 20 74 6f 20 72 75 6e 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 0a 74 68 65 20 64 69 72 65 64 | .to.run.asynchronously.the.dired |
| 10ec0 | 20 63 6f 6d 6d 61 6e 64 73 20 66 6f 72 20 63 6f 70 79 69 6e 67 2c 20 72 65 6e 61 6d 69 6e 67 20 | .commands.for.copying,.renaming. |
| 10ee0 | 61 6e 64 20 73 79 6d 6c 69 6e 6b 69 6e 67 2e 0a 49 66 20 79 6f 75 20 61 72 65 20 61 20 5b 68 65 | and.symlinking..If.you.are.a.[he |
| 10f00 | 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 |
| 10f20 | 6d 2f 68 65 6c 6d 29 20 75 73 65 72 2c 20 74 68 69 73 20 77 69 6c 6c 20 61 6c 6c 6f 77 20 79 6f | m/helm).user,.this.will.allow.yo |
| 10f40 | 75 0a 74 6f 20 63 6f 70 79 2c 20 72 65 6e 61 6d 65 20 65 74 63 2e 2e 2e 20 61 73 79 6e 63 68 72 | u.to.copy,.rename.etc....asynchr |
| 10f60 | 6f 6e 6f 75 73 6c 79 20 66 72 6f 6d 20 5b 68 65 6c 6d 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 | onously.from.[helm](https://gith |
| 10f80 | 75 62 2e 63 6f 6d 2f 65 6d 61 63 73 2d 68 65 6c 6d 2f 68 65 6c 6d 29 2e 0a 4e 6f 74 65 20 74 68 | ub.com/emacs-helm/helm)..Note.th |
| 10fa0 | 61 74 20 77 69 74 68 20 5b 68 65 6c 6d 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f | at.with.[helm](https://github.co |
| 10fc0 | 6d 2f 65 6d 61 63 73 2d 68 65 6c 6d 2f 68 65 6c 6d 29 0a 79 6f 75 20 63 61 6e 20 64 69 73 61 62 | m/emacs-helm/helm).you.can.disab |
| 10fe0 | 6c 65 20 74 68 69 73 20 62 79 20 72 75 6e 6e 69 6e 67 20 74 68 65 20 63 6f 70 79 2c 20 72 65 6e | le.this.by.running.the.copy,.ren |
| 11000 | 61 6d 65 20 65 74 63 2e 2e 2e 20 63 6f 6d 6d 61 6e 64 73 20 77 69 74 68 20 61 20 70 72 65 66 69 | ame.etc....commands.with.a.prefi |
| 11020 | 78 20 61 72 67 75 6d 65 6e 74 2e 0a 0a 49 66 20 79 6f 75 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 | x.argument...If.you.don't.want.t |
| 11040 | 6f 20 6d 61 6b 65 20 64 69 72 65 64 2f 68 65 6c 6d 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 64 | o.make.dired/helm.asynchronous.d |
| 11060 | 69 73 61 62 6c 65 20 69 74 20 77 69 74 68 20 60 64 69 72 65 64 2d 61 73 79 6e 63 2d 6d 6f 64 65 | isable.it.with.`dired-async-mode |
| 11080 | 60 2e 0a 0a 23 23 23 20 44 65 62 69 61 6e 20 61 6e 64 20 55 62 75 6e 74 75 0a 0a 55 73 65 72 73 | `...###.Debian.and.Ubuntu..Users |
| 110a0 | 20 6f 66 20 44 65 62 69 61 6e 20 39 20 6f 72 20 6c 61 74 65 72 20 6f 72 20 55 62 75 6e 74 75 20 | .of.Debian.9.or.later.or.Ubuntu. |
| 110c0 | 31 36 2e 30 34 20 6f 72 20 6c 61 74 65 72 20 6d 61 79 20 73 69 6d 70 6c 79 20 60 61 70 74 2d 67 | 16.04.or.later.may.simply.`apt-g |
| 110e0 | 65 74 20 69 6e 73 74 61 6c 6c 20 65 6c 70 61 2d 61 73 79 6e 63 60 2e 0a 0a 23 23 20 41 75 74 68 | et.install.elpa-async`...##.Auth |
| 11100 | 65 6e 74 69 63 61 74 69 6f 6e 20 61 6e 64 20 75 73 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 0a | entication.and.user.interaction. |
| 11120 | 0a 53 6f 6d 65 20 61 75 74 68 65 6e 74 69 63 61 74 69 6f 6e 73 20 72 65 71 75 69 72 65 20 75 73 | .Some.authentications.require.us |
| 11140 | 65 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 2c 20 66 6f 72 20 65 78 61 6d 70 6c 65 20 61 6e 73 77 | er.interaction,.for.example.answ |
| 11160 | 65 72 69 6e 67 20 74 6f 20 61 0a 70 72 6f 6d 70 74 2c 20 65 6e 74 65 72 69 6e 67 20 61 20 70 61 | ering.to.a.prompt,.entering.a.pa |
| 11180 | 73 73 77 6f 72 64 73 20 65 74 63 2e 20 59 6f 75 72 20 61 73 79 6e 63 20 69 6d 70 6c 65 6d 65 6e | sswords.etc..Your.async.implemen |
| 111a0 | 74 61 74 69 6f 6e 20 73 68 6f 75 6c 64 0a 61 76 6f 69 64 20 61 6e 79 20 73 75 63 68 20 75 73 65 | tation.should.avoid.any.such.use |
| 111c0 | 72 20 69 6e 74 65 72 61 63 74 69 6f 6e 2c 20 74 6f 20 61 76 6f 69 64 20 62 65 69 6e 67 20 73 74 | r.interaction,.to.avoid.being.st |
| 111e0 | 75 63 6b 20 77 69 74 68 20 61 20 70 72 6f 6d 70 74 20 79 6f 75 0a 77 69 6c 6c 20 6e 6f 74 20 62 | uck.with.a.prompt.you.will.not.b |
| 11200 | 65 20 61 62 6c 65 20 74 6f 20 61 6e 73 77 65 72 20 74 6f 20 69 6e 20 74 68 65 20 63 68 69 6c 64 | e.able.to.answer.to.in.the.child |
| 11220 | 20 65 6d 61 63 73 2e 20 20 46 6f 72 20 61 6c 6c 20 77 68 61 74 20 69 73 20 72 65 6d 6f 74 65 0a | .emacs...For.all.what.is.remote. |
| 11240 | 28 6d 61 69 6c 73 2c 20 74 72 61 6d 70 20 65 74 63 2e 2e 2e 29 20 79 6f 75 20 68 61 76 65 20 74 | (mails,.tramp.etc...).you.have.t |
| 11260 | 6f 20 6c 65 74 20 65 6d 61 63 73 20 6d 61 6e 61 67 65 20 79 6f 75 72 20 69 64 65 6e 74 69 66 69 | o.let.emacs.manage.your.identifi |
| 11280 | 63 61 74 69 6f 6e 0a 77 69 74 68 20 5b 61 75 74 68 2d 73 6f 75 72 63 65 73 5d 28 68 74 74 70 73 | cation.with.[auth-sources](https |
| 112a0 | 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 73 6f 66 74 77 61 72 65 2f 65 6d 61 63 73 2f 6d 61 | ://www.gnu.org/software/emacs/ma |
| 112c0 | 6e 75 61 6c 2f 68 74 6d 6c 5f 6d 6f 6e 6f 2f 61 75 74 68 2e 68 74 6d 6c 29 2c 20 73 6f 20 74 68 | nual/html_mono/auth.html),.so.th |
| 112e0 | 61 74 20 79 6f 75 20 64 6f 20 6e 6f 74 20 68 61 76 65 20 74 6f 20 65 6e 74 65 72 20 61 20 70 61 | at.you.do.not.have.to.enter.a.pa |
| 11300 | 73 73 77 6f 72 64 2e 0a 0a 42 61 73 69 63 61 6c 6c 79 20 61 6c 6c 20 79 6f 75 20 6e 65 65 64 20 | ssword...Basically.all.you.need. |
| 11320 | 69 73 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 20 74 68 69 73 20 69 6e 20 79 6f 75 72 20 69 | is.something.like.this.in.your.i |
| 11340 | 6e 69 74 20 66 69 6c 65 3a 0a 0a 20 20 20 20 28 75 73 65 2d 70 61 63 6b 61 67 65 20 61 75 74 68 | nit.file:......(use-package.auth |
| 11360 | 2d 73 6f 75 72 63 65 0a 20 20 20 20 20 20 3a 6e 6f 2d 72 65 71 75 69 72 65 20 74 0a 20 20 20 20 | -source.......:no-require.t..... |
| 11380 | 20 20 3a 63 6f 6e 66 69 67 20 28 73 65 74 71 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 | ..:config.(setq.auth-sources.'(" |
| 113a0 | 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 20 22 7e 2f 2e 6e 65 74 72 63 22 29 29 29 0a 0a | ~/.authinfo.gpg"."~/.netrc"))).. |
| 113c0 | 41 6e 64 20 61 20 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 20 66 69 6c 65 20 63 6f 6e | And.a."~/.authinfo.gpg".file.con |
| 113e0 | 74 61 69 6e 69 6e 67 20 65 6e 74 72 69 65 73 20 73 75 63 68 20 61 73 0a 0a 20 20 20 20 64 65 66 | taining.entries.such.as......def |
| 11400 | 61 75 6c 74 20 70 6f 72 74 20 73 75 64 6f 20 6c 6f 67 69 6e 20 72 6f 6f 74 20 70 61 73 73 77 6f | ault.port.sudo.login.root.passwo |
| 11420 | 72 64 20 78 78 78 78 78 78 78 78 0a 20 20 20 20 0a 6f 72 0a 0a 20 20 20 20 6d 61 63 68 69 6e 65 | rd.xxxxxxxx......or......machine |
| 11440 | 20 78 78 78 78 78 20 70 6f 72 74 20 78 78 78 20 6c 6f 67 69 6e 20 78 78 78 20 70 61 73 73 77 6f | .xxxxx.port.xxx.login.xxx.passwo |
| 11460 | 72 64 20 78 78 78 78 78 78 78 0a 0a 66 6f 72 20 6d 6f 72 65 20 73 70 65 63 69 66 69 63 20 68 6f | rd.xxxxxxx..for.more.specific.ho |
| 11480 | 73 74 73 20 28 73 6d 74 70 2c 20 6d 61 69 6c 73 20 65 74 63 2e 2e 2e 29 0a 0a 53 65 65 20 5b 61 | sts.(smtp,.mails.etc...)..See.[a |
| 114a0 | 75 74 68 2d 73 6f 75 72 63 65 73 20 6d 61 6e 75 61 6c 5d 28 68 74 74 70 73 3a 2f 2f 77 77 77 2e | uth-sources.manual](https://www. |
| 114c0 | 67 6e 75 2e 6f 72 67 2f 73 6f 66 74 77 61 72 65 2f 65 6d 61 63 73 2f 6d 61 6e 75 61 6c 2f 68 74 | gnu.org/software/emacs/manual/ht |
| 114e0 | 6d 6c 5f 6d 6f 6e 6f 2f 61 75 74 68 2e 68 74 6d 6c 29 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f | ml_mono/auth.html).for.more.info |
| 11500 | 73 2e 0a 0a 48 6f 77 65 76 65 72 2c 20 77 68 65 6e 20 63 68 6f 6f 73 69 6e 67 20 74 68 65 20 64 | s...However,.when.choosing.the.d |
| 11520 | 65 73 74 69 6e 61 74 69 6f 6e 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 28 65 2e 67 2e | estination.with.completion.(e.g. |
| 11540 | 20 68 65 6c 6d 29 20 61 6e 64 0a 79 6f 75 20 68 61 76 65 20 6e 6f 20 22 2e 61 75 74 68 69 6e 66 | .helm).and.you.have.no.".authinf |
| 11560 | 6f 22 20 66 69 6c 65 20 6f 72 20 6a 75 73 74 20 6e 6f 20 65 6e 74 72 79 20 66 6f 72 20 74 68 69 | o".file.or.just.no.entry.for.thi |
| 11580 | 73 20 68 6f 73 74 2c 20 74 72 61 6d 70 20 77 69 6c 6c 0a 70 72 6f 6d 70 74 20 66 6f 72 20 70 61 | s.host,.tramp.will.prompt.for.pa |
| 115a0 | 73 73 77 6f 72 64 20 61 6e 64 20 6f 66 66 65 72 20 79 6f 75 20 74 6f 20 73 61 76 65 20 69 74 2c | ssword.and.offer.you.to.save.it, |
| 115c0 | 20 69 66 20 79 6f 75 20 61 6e 73 77 65 72 20 27 79 65 73 27 20 79 6f 75 0a 77 69 6c 6c 20 62 65 | .if.you.answer.'yes'.you.will.be |
| 115e0 | 20 61 62 6c 65 20 74 6f 20 61 63 68 69 65 76 65 20 79 6f 75 20 61 73 79 6e 63 20 6f 70 65 72 61 | .able.to.achieve.you.async.opera |
| 11600 | 74 69 6f 6e 20 61 73 20 74 68 65 20 63 68 69 6c 64 20 45 6d 61 63 73 20 77 69 6c 6c 0a 75 73 65 | tion.as.the.child.Emacs.will.use |
| 11620 | 20 74 68 69 73 20 6a 75 73 74 20 63 72 65 61 74 65 64 20 22 2e 61 75 74 68 69 6e 66 6f 22 20 66 | .this.just.created.".authinfo".f |
| 11640 | 69 6c 65 2c 20 69 66 20 79 6f 75 20 73 61 79 20 27 6e 6f 27 2c 20 79 6f 75 72 20 64 69 72 65 64 | ile,.if.you.say.'no',.your.dired |
| 11660 | 2d 61 73 79 6e 63 0a 70 72 6f 63 65 73 73 20 77 69 6c 6c 20 68 61 6e 67 20 66 6f 72 65 76 65 72 | -async.process.will.hang.forever |
| 11680 | 20 62 65 63 61 75 73 65 20 63 68 69 6c 64 20 65 6d 61 63 73 20 69 73 20 77 61 69 74 69 6e 67 20 | .because.child.emacs.is.waiting. |
| 116a0 | 66 6f 72 20 70 61 73 73 77 6f 72 64 2e 0a 0a 4e 4f 54 45 3a 20 46 6f 72 20 61 6c 6c 20 79 6f 75 | for.password...NOTE:.For.all.you |
| 116c0 | 72 20 61 73 79 6e 63 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 73 20 69 6e 20 65 6d 61 63 73 | r.async.implementations.in.emacs |
| 116e0 | 2d 32 36 2b 20 76 65 72 73 69 6f 6e 73 20 74 68 61 74 0a 68 61 6e 64 6c 65 20 72 65 6d 6f 74 65 | -26+.versions.that.handle.remote |
| 11700 | 20 66 69 6c 65 73 20 28 74 72 61 6d 70 29 2c 20 79 6f 75 20 77 69 6c 6c 20 68 61 76 65 20 74 6f | .files.(tramp),.you.will.have.to |
| 11720 | 20 6c 65 74 2d 62 69 6e 64 0a 60 61 73 79 6e 63 2d 71 75 69 65 74 2d 73 77 69 74 63 68 60 20 74 | .let-bind.`async-quiet-switch`.t |
| 11740 | 6f 20 60 2d 71 60 20 74 6f 20 77 6f 72 6b 61 72 6f 75 6e 64 20 61 20 74 72 61 6d 70 20 62 75 67 | o.`-q`.to.workaround.a.tramp.bug |
| 11760 | 20 74 68 61 74 20 70 72 65 76 65 6e 74 20 60 65 6d 61 63 73 20 2d 51 60 20 74 6f 20 75 73 65 20 | .that.prevent.`emacs.-Q`.to.use. |
| 11780 | 5b 61 75 74 68 2d 73 6f 75 72 63 65 73 5d 28 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f | [auth-sources](https://www.gnu.o |
| 117a0 | 72 67 2f 73 6f 66 74 77 61 72 65 2f 65 6d 61 63 73 2f 6d 61 6e 75 61 6c 2f 68 74 6d 6c 5f 6d 6f | rg/software/emacs/manual/html_mo |
| 117c0 | 6e 6f 2f 61 75 74 68 2e 68 74 6d 6c 29 20 6d 65 63 68 61 6e 69 73 6d 2e 0a 0a 23 23 20 45 6e 61 | no/auth.html).mechanism...##.Ena |
| 117e0 | 62 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 20 6f 66 20 | ble.asynchronous.compilation.of. |
| 11800 | 79 6f 75 72 20 28 4d 29 65 6c 70 61 20 70 61 63 6b 61 67 65 73 0a 0a 42 79 20 64 65 66 61 75 6c | your.(M)elpa.packages..By.defaul |
| 11820 | 74 20 65 6d 61 63 73 20 70 61 63 6b 61 67 65 2e 65 6c 20 63 6f 6d 70 69 6c 65 20 70 61 63 6b 61 | t.emacs.package.el.compile.packa |
| 11840 | 67 65 73 20 69 6e 20 69 74 73 20 72 75 6e 6e 69 6e 67 20 65 6d 61 63 73 20 73 65 73 73 69 6f 6e | ges.in.its.running.emacs.session |
| 11860 | 2e 0a 54 68 69 73 20 69 73 20 6e 6f 74 20 61 20 70 72 6f 62 6c 65 6d 20 77 68 65 6e 20 69 6e 73 | ..This.is.not.a.problem.when.ins |
| 11880 | 74 61 6c 6c 69 6e 67 20 61 20 6e 65 77 20 70 61 63 6b 61 67 65 20 28 77 68 69 63 68 20 69 73 20 | talling.a.new.package.(which.is. |
| 118a0 | 6e 6f 74 20 61 63 74 75 61 6c 6c 79 20 6c 6f 61 64 65 64 20 69 6e 20 63 75 72 72 65 6e 74 20 65 | not.actually.loaded.in.current.e |
| 118c0 | 6d 61 63 73 29 0a 62 75 74 20 69 74 20 6d 61 79 20 63 72 65 61 74 65 20 65 72 72 6f 72 73 20 61 | macs).but.it.may.create.errors.a |
| 118e0 | 6e 64 20 62 61 64 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 20 77 68 65 6e 20 75 70 67 72 61 64 69 6e | nd.bad.compilation.when.upgradin |
| 11900 | 67 20 61 20 70 61 63 6b 61 67 65 20 28 6f 6c 64 20 76 65 72 73 69 6f 6e 20 6f 66 20 70 61 63 6b | g.a.package.(old.version.of.pack |
| 11920 | 61 67 65 20 69 73 20 61 6c 72 65 61 64 79 20 6c 6f 61 64 65 64 0a 61 6e 64 20 72 75 6e 6e 69 6e | age.is.already.loaded.and.runnin |
| 11940 | 67 20 69 6e 20 63 75 72 72 65 6e 74 20 65 6d 61 63 73 29 2e 0a 59 6f 75 20 63 61 6e 20 72 65 6d | g.in.current.emacs)..You.can.rem |
| 11960 | 65 64 79 20 74 6f 20 74 68 69 73 20 62 79 20 61 6c 6c 6f 77 69 6e 67 20 61 73 79 6e 63 20 74 6f | edy.to.this.by.allowing.async.to |
| 11980 | 20 63 6f 6d 70 69 6c 65 20 79 6f 75 72 20 70 61 63 6b 61 67 65 73 20 61 73 79 6e 63 68 72 6f 6e | .compile.your.packages.asynchron |
| 119a0 | 6f 75 73 6c 79 2c 0a 28 68 65 6c 6d 20 61 6e 64 20 6d 61 67 69 74 20 61 63 74 75 61 6c 6c 79 20 | ously,.(helm.and.magit.actually. |
| 119c0 | 64 6f 20 74 68 69 73 20 62 79 20 64 65 66 61 75 6c 74 2c 0a 73 6f 20 69 66 20 79 6f 75 20 61 72 | do.this.by.default,.so.if.you.ar |
| 119e0 | 65 20 75 73 69 6e 67 20 74 68 65 73 65 20 70 61 63 6b 61 67 65 73 20 74 68 65 79 20 77 69 6c 6c | e.using.these.packages.they.will |
| 11a00 | 20 63 6f 6d 70 69 6c 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 29 0a 74 6f 20 64 6f 20 74 | .compile.asynchronously).to.do.t |
| 11a20 | 68 69 73 2c 20 61 64 64 20 74 6f 20 79 6f 75 72 20 69 6e 69 74 20 66 69 6c 65 3a 0a 20 20 20 20 | his,.add.to.your.init.file:..... |
| 11a40 | 0a 20 20 20 20 28 61 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 70 61 63 6b 61 67 65 2d 6d 6f 64 | .....(async-bytecomp-package-mod |
| 11a60 | 65 20 31 29 0a 0a 0a 59 6f 75 20 63 61 6e 20 63 6f 6e 74 72 6f 6c 20 77 68 69 63 68 20 70 61 63 | e.1)...You.can.control.which.pac |
| 11a80 | 6b 61 67 65 73 20 77 69 6c 6c 20 63 6f 6d 70 69 6c 65 20 61 73 79 6e 63 20 77 69 74 68 20 60 61 | kages.will.compile.async.with.`a |
| 11aa0 | 73 79 6e 63 2d 62 79 74 65 63 6f 6d 70 2d 61 6c 6c 6f 77 65 64 2d 70 61 63 6b 61 67 65 73 60 2e | sync-bytecomp-allowed-packages`. |
| 11ac0 | 0a 53 65 74 20 69 74 20 74 6f 20 60 27 28 61 6c 6c 29 60 20 74 6f 20 62 65 20 73 75 72 65 20 79 | .Set.it.to.`'(all)`.to.be.sure.y |
| 11ae0 | 6f 75 20 77 69 6c 6c 20 63 6f 6d 70 69 6c 65 20 61 6c 6c 20 70 61 63 6b 61 67 65 73 20 61 73 79 | ou.will.compile.all.packages.asy |
| 11b00 | 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 0a 23 23 20 53 65 6e 64 20 6d 61 69 6c 73 20 61 73 79 6e | nchronously...##.Send.mails.asyn |
| 11b20 | 63 68 72 6f 6e 6f 75 73 6c 79 20 77 69 74 68 20 73 6d 74 70 20 6d 61 69 6c 20 61 73 79 6e 63 0a | chronously.with.smtp.mail.async. |
| 11b40 | 0a 54 6f 20 65 6e 61 62 6c 65 20 74 68 69 73 20 66 65 61 74 75 72 65 2c 20 65 6e 73 75 72 65 20 | .To.enable.this.feature,.ensure. |
| 11b60 | 73 6d 74 70 2d 6d 61 69 6c 2d 61 73 79 6e 63 2e 65 6c 20 69 73 20 6c 6f 61 64 65 64 20 61 6e 64 | smtp-mail-async.el.is.loaded.and |
| 11b80 | 20 75 73 65 0a 0a 60 28 73 65 74 71 20 6d 65 73 73 61 67 65 2d 73 65 6e 64 2d 6d 61 69 6c 2d 66 | .use..`(setq.message-send-mail-f |
| 11ba0 | 75 6e 63 74 69 6f 6e 20 27 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 29 | unction.'async-smtpmail-send-it) |
| 11bc0 | 60 2e 0a 0a 57 41 52 4e 49 4e 47 53 3a 0a 0a 2d 20 57 68 65 6e 20 75 73 69 6e 67 20 72 65 63 65 | `...WARNINGS:..-.When.using.rece |
| 11be0 | 6e 74 20 65 6d 61 63 73 20 28 32 35 2b 29 20 74 68 65 20 6e 65 74 77 6f 72 6b 20 73 65 63 75 72 | nt.emacs.(25+).the.network.secur |
| 11c00 | 69 74 79 20 6d 61 6e 61 67 65 72 20 6d 61 79 62 65 0a 63 61 6c 6c 65 64 20 69 6e 74 65 72 61 63 | ity.manager.maybe.called.interac |
| 11c20 | 74 69 76 65 6c 79 20 69 6e 20 63 68 69 6c 64 20 65 6d 61 63 73 20 61 6e 64 20 6d 61 6b 65 20 60 | tively.in.child.emacs.and.make.` |
| 11c40 | 61 73 79 6e 63 2d 73 6d 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 60 0a 66 61 69 6c 2c 20 73 6f | async-smtpmail-send-it`.fail,.so |
| 11c60 | 20 62 65 20 73 75 72 65 20 74 6f 20 73 65 6e 64 20 65 6d 61 69 6c 20 6f 6e 63 65 20 73 79 6e 63 | .be.sure.to.send.email.once.sync |
| 11c80 | 68 72 6f 6e 6f 75 73 6c 79 20 62 65 66 6f 72 65 20 75 73 69 6e 67 0a 60 61 73 79 6e 63 2d 73 6d | hronously.before.using.`async-sm |
| 11ca0 | 74 70 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 60 20 61 73 20 79 6f 75 72 20 60 6d 65 73 73 61 67 65 | tpmail-send-it`.as.your.`message |
| 11cc0 | 2d 73 65 6e 64 2d 6d 61 69 6c 2d 66 75 6e 63 74 69 6f 6e 60 2e 0a 0a 2d 20 59 6f 75 20 6d 61 79 | -send-mail-function`...-.You.may |
| 11ce0 | 20 6c 6f 6f 73 65 20 79 6f 75 72 20 73 65 6e 74 20 6d 61 69 6c 20 69 66 20 79 6f 75 72 20 6e 65 | .loose.your.sent.mail.if.your.ne |
| 11d00 | 74 77 6f 72 6b 20 69 73 20 64 6f 77 6e 2c 20 73 6f 20 65 6e 73 75 72 65 20 74 6f 0a 71 75 65 75 | twork.is.down,.so.ensure.to.queu |
| 11d20 | 65 20 79 6f 75 72 20 6d 61 69 6c 73 20 69 66 20 73 6f 2e 20 20 79 6f 75 20 63 61 6e 20 64 6f 20 | e.your.mails.if.so...you.can.do. |
| 11d40 | 74 68 69 73 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 2c 0a 73 65 65 20 5b 69 73 73 75 65 20 23 | this.automatically,.see.[issue.# |
| 11d60 | 36 34 5d 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f | 64](https://github.com/jwiegley/ |
| 11d80 | 65 6d 61 63 73 2d 61 73 79 6e 63 2f 69 73 73 75 65 73 2f 36 34 29 2e 0a 0a 23 20 41 73 79 6e 63 | emacs-async/issues/64)...#.Async |
| 11da0 | 20 75 73 61 67 65 0a 0a 54 68 65 20 69 6e 74 65 72 66 61 63 65 20 69 73 20 69 6e 74 65 6e 64 65 | .usage..The.interface.is.intende |
| 11dc0 | 64 20 74 6f 20 62 65 20 76 65 72 79 20 65 61 73 79 20 74 6f 20 75 73 65 3a 0a 0a 23 23 20 61 73 | d.to.be.very.easy.to.use:..##.as |
| 11de0 | 79 6e 63 2d 73 74 61 72 74 0a 0a 20 20 20 20 61 73 79 6e 63 2d 73 74 61 72 74 20 53 54 41 52 54 | ync-start......async-start.START |
| 11e00 | 2d 46 55 4e 43 20 46 49 4e 49 53 48 2d 46 55 4e 43 0a 0a 45 78 65 63 75 74 65 20 53 54 41 52 54 | -FUNC.FINISH-FUNC..Execute.START |
| 11e20 | 2d 46 55 4e 43 20 28 6f 66 74 65 6e 20 61 20 6c 61 6d 62 64 61 29 20 69 6e 20 61 20 73 75 62 6f | -FUNC.(often.a.lambda).in.a.subo |
| 11e40 | 72 64 69 6e 61 74 65 20 45 6d 61 63 73 20 70 72 6f 63 65 73 73 2e 20 20 57 68 65 6e 0a 64 6f 6e | rdinate.Emacs.process...When.don |
| 11e60 | 65 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 70 61 73 73 65 64 20 74 6f | e,.the.return.value.is.passed.to |
| 11e80 | 20 46 49 4e 49 53 48 2d 46 55 4e 43 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 0a 60 60 60 65 6c 69 73 | .FINISH-FUNC...Example:..```elis |
| 11ea0 | 70 0a 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 3b 3b 20 57 68 61 74 20 74 6f 20 64 6f 20 | p.(async-start....;;.What.to.do. |
| 11ec0 | 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. |
| 11ee0 | 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 |
| 11f00 | 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). |
| 11f20 | 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 |
| 11f40 | 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 |
| 11f60 | 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 |
| 11f80 | 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 20 72 65 73 75 6c 74 29 29 29 0a 60 60 | .should.be.222:.%s".result))).`` |
| 11fa0 | 60 0a 0a 49 66 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 60 6e 69 6c 60 20 6f 72 20 6d 69 | `..If.FINISH-FUNC.is.`nil`.or.mi |
| 11fc0 | 73 73 69 6e 67 2c 20 61 20 66 75 74 75 72 65 20 69 73 20 72 65 74 75 72 6e 65 64 20 74 68 61 74 | ssing,.a.future.is.returned.that |
| 11fe0 | 20 63 61 6e 20 62 65 20 69 6e 73 70 65 63 74 65 64 0a 75 73 69 6e 67 20 60 61 73 79 6e 63 2d 67 | .can.be.inspected.using.`async-g |
| 12000 | 65 74 60 2c 20 62 6c 6f 63 6b 69 6e 67 20 75 6e 74 69 6c 20 74 68 65 20 76 61 6c 75 65 20 69 73 | et`,.blocking.until.the.value.is |
| 12020 | 20 72 65 61 64 79 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 6c 65 74 | .ready...Example:..```elisp.(let |
| 12040 | 20 28 28 70 72 6f 63 20 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 | .((proc.(async-start............ |
| 12060 | 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 |
| 12080 | 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 | rocess................(lambda.() |
| 120a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 | ..................(message."This |
| 120c0 | 20 69 73 20 61 20 74 65 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | .is.a.test")..................(s |
| 120e0 | 6c 65 65 70 2d 66 6f 72 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 32 32 | leep-for.3)..................222 |
| 12100 | 29 29 29 29 0a 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 49 27 6d 20 67 6f 69 6e 67 20 74 6f | ))))......(message."I'm.going.to |
| 12120 | 20 64 6f 20 73 6f 6d 65 20 77 6f 72 6b 20 68 65 72 65 22 29 20 3b 3b 20 2e 2e 2e 2e 0a 0a 20 20 | .do.some.work.here").;;......... |
| 12140 | 20 20 28 6d 65 73 73 61 67 65 20 22 57 61 69 74 69 6e 67 20 6f 6e 20 61 73 79 6e 63 20 70 72 6f | ..(message."Waiting.on.async.pro |
| 12160 | 63 65 73 73 2c 20 72 65 73 75 6c 74 20 73 68 6f 75 6c 64 20 62 65 20 32 32 32 3a 20 25 73 22 0a | cess,.result.should.be.222:.%s". |
| 12180 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 79 6e 63 2d 67 65 74 20 70 72 6f 63 29 29 29 0a | .............(async-get.proc))). |
| 121a0 | 60 60 60 0a 0a 49 66 20 79 6f 75 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 6f 20 75 73 65 20 61 20 | ```..If.you.don't.want.to.use.a. |
| 121c0 | 63 61 6c 6c 62 61 63 6b 2c 20 61 6e 64 20 79 6f 75 20 64 6f 6e 27 74 20 63 61 72 65 20 61 62 6f | callback,.and.you.don't.care.abo |
| 121e0 | 75 74 20 61 6e 79 20 72 65 74 75 72 6e 20 76 61 6c 75 65 0a 66 72 6f 6d 20 74 68 65 20 63 68 69 | ut.any.return.value.from.the.chi |
| 12200 | 6c 64 20 70 72 6f 63 65 73 73 2c 20 70 61 73 73 20 74 68 65 20 60 27 69 67 6e 6f 72 65 60 20 73 | ld.process,.pass.the.`'ignore`.s |
| 12220 | 79 6d 62 6f 6c 20 61 73 20 74 68 65 20 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 28 69 66 | ymbol.as.the.second.argument.(if |
| 12240 | 0a 79 6f 75 20 64 6f 6e 27 74 2c 20 61 6e 64 20 6e 65 76 65 72 20 63 61 6c 6c 20 60 61 73 79 6e | .you.don't,.and.never.call.`asyn |
| 12260 | 63 2d 67 65 74 60 2c 20 69 74 20 77 69 6c 6c 20 6c 65 61 76 65 20 60 60 2a 65 6d 61 63 73 2a 60 | c-get`,.it.will.leave.``*emacs*` |
| 12280 | 60 20 70 72 6f 63 65 73 73 20 62 75 66 66 65 72 73 0a 68 61 6e 67 69 6e 67 20 61 72 6f 75 6e 64 | `.process.buffers.hanging.around |
| 122a0 | 29 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 61 73 79 6e 63 2d 73 74 61 72 74 0a 20 28 6c 61 6d 62 | ):..```elisp.(async-start..(lamb |
| 122c0 | 64 61 20 28 29 0a 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 22 61 20 72 65 6d 6f 74 65 20 | da.()....(delete-file."a.remote. |
| 122e0 | 66 69 6c 65 20 6f 6e 20 61 20 73 6c 6f 77 20 6c 69 6e 6b 22 20 6e 69 6c 29 29 0a 20 27 69 67 6e | file.on.a.slow.link".nil))..'ign |
| 12300 | 6f 72 65 29 0a 60 60 60 0a 0a 4e 6f 74 65 3a 20 45 76 65 6e 20 77 68 65 6e 20 46 49 4e 49 53 48 | ore).```..Note:.Even.when.FINISH |
| 12320 | 2d 46 55 4e 43 20 69 73 20 70 72 65 73 65 6e 74 2c 20 61 20 66 75 74 75 72 65 20 69 73 20 73 74 | -FUNC.is.present,.a.future.is.st |
| 12340 | 69 6c 6c 20 72 65 74 75 72 6e 65 64 20 65 78 63 65 70 74 20 74 68 61 74 0a 69 74 20 79 69 65 6c | ill.returned.except.that.it.yiel |
| 12360 | 64 73 20 6e 6f 20 76 61 6c 75 65 20 28 73 69 6e 63 65 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 | ds.no.value.(since.the.value.is. |
| 12380 | 70 61 73 73 65 64 20 74 6f 20 46 49 4e 49 53 48 2d 46 55 4e 43 29 2e 20 20 43 61 6c 6c 69 6e 67 | passed.to.FINISH-FUNC)...Calling |
| 123a0 | 0a 60 61 73 79 6e 63 2d 67 65 74 60 20 6f 6e 20 73 75 63 68 20 61 20 66 75 74 75 72 65 20 61 6c | .`async-get`.on.such.a.future.al |
| 123c0 | 77 61 79 73 20 72 65 74 75 72 6e 73 20 60 6e 69 6c 60 2e 20 20 49 74 20 63 61 6e 20 73 74 69 6c | ways.returns.`nil`...It.can.stil |
| 123e0 | 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 68 6f 77 65 76 65 72 2c 20 61 73 20 61 6e 20 61 72 67 75 | l.be.useful,.however,.as.an.argu |
| 12400 | 6d 65 6e 74 20 74 6f 20 60 61 73 79 6e 63 2d 72 65 61 64 79 60 20 6f 72 20 60 61 73 79 6e 63 2d | ment.to.`async-ready`.or.`async- |
| 12420 | 77 61 69 74 60 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 0a 0a | wait`...##.async-start-process.. |
| 12440 | 20 20 20 20 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 4e 41 4d 45 20 50 52 4f | ....async-start-process.NAME.PRO |
| 12460 | 47 52 41 4d 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 26 72 65 73 74 20 50 52 4f 47 52 41 4d 2d 41 | GRAM.FINISH-FUNC.&rest.PROGRAM-A |
| 12480 | 52 47 53 0a 0a 53 74 61 72 74 20 74 68 65 20 65 78 65 63 75 74 61 62 6c 65 20 50 52 4f 47 52 41 | RGS..Start.the.executable.PROGRA |
| 124a0 | 4d 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 20 20 53 65 65 20 60 61 73 79 6e 63 2d 73 74 | M.asynchronously...See.`async-st |
| 124c0 | 61 72 74 60 2e 20 20 50 52 4f 47 52 41 4d 20 69 73 0a 70 61 73 73 65 64 20 50 52 4f 47 52 41 4d | art`...PROGRAM.is.passed.PROGRAM |
| 124e0 | 2d 41 52 47 53 2c 20 63 61 6c 6c 69 6e 67 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 77 69 74 68 20 | -ARGS,.calling.FINISH-FUNC.with. |
| 12500 | 74 68 65 20 70 72 6f 63 65 73 73 20 6f 62 6a 65 63 74 20 77 68 65 6e 20 64 6f 6e 65 2e 0a 49 66 | the.process.object.when.done..If |
| 12520 | 20 46 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 20 60 6e 69 6c 60 2c 20 74 68 65 20 66 75 74 75 72 | .FINISH-FUNC.is.`nil`,.the.futur |
| 12540 | 65 20 6f 62 6a 65 63 74 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 68 65 20 70 72 6f 63 65 73 73 | e.object.will.return.the.process |
| 12560 | 20 6f 62 6a 65 63 74 20 77 68 65 6e 0a 74 68 65 20 70 72 6f 67 72 61 6d 20 69 73 20 66 69 6e 69 | .object.when.the.program.is.fini |
| 12580 | 73 68 65 64 2e 20 20 53 65 74 20 44 45 46 41 55 4c 54 2d 44 49 52 45 43 54 4f 52 59 20 74 6f 20 | shed...Set.DEFAULT-DIRECTORY.to. |
| 125a0 | 63 68 61 6e 67 65 20 50 52 4f 47 52 41 4d 27 73 20 63 75 72 72 65 6e 74 0a 77 6f 72 6b 69 6e 67 | change.PROGRAM's.current.working |
| 125c0 | 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 67 65 74 0a 0a 20 20 20 20 61 | .directory...##.async-get......a |
| 125e0 | 73 79 6e 63 2d 67 65 74 20 46 55 54 55 52 45 0a 0a 47 65 74 20 74 68 65 20 76 61 6c 75 65 20 66 | sync-get.FUTURE..Get.the.value.f |
| 12600 | 72 6f 6d 20 61 6e 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 63 61 6c 6c 65 64 20 66 75 6e | rom.an.asynchronously.called.fun |
| 12620 | 63 74 69 6f 6e 20 77 68 65 6e 20 69 74 20 69 73 20 72 65 61 64 79 2e 20 20 46 55 54 55 52 45 20 | ction.when.it.is.ready...FUTURE. |
| 12640 | 69 73 0a 72 65 74 75 72 6e 65 64 20 62 79 20 60 61 73 79 6e 63 2d 73 74 61 72 74 60 20 6f 72 20 | is.returned.by.`async-start`.or. |
| 12660 | 60 61 73 79 6e 63 2d 73 74 61 72 74 2d 70 72 6f 63 65 73 73 60 20 77 68 65 6e 20 69 74 73 20 46 | `async-start-process`.when.its.F |
| 12680 | 49 4e 49 53 48 2d 46 55 4e 43 20 69 73 0a 60 6e 69 6c 60 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 72 | INISH-FUNC.is.`nil`...##.async-r |
| 126a0 | 65 61 64 79 0a 0a 20 20 20 20 61 73 79 6e 63 2d 72 65 61 64 79 20 46 55 54 55 52 45 0a 0a 51 75 | eady......async-ready.FUTURE..Qu |
| 126c0 | 65 72 79 20 61 20 46 55 54 55 52 45 20 74 6f 20 73 65 65 20 69 66 20 69 74 73 20 66 75 6e 63 74 | ery.a.FUTURE.to.see.if.its.funct |
| 126e0 | 69 6f 6e 27 73 20 76 61 6c 75 65 20 69 73 20 72 65 61 64 79 20 2d 2d 20 69 2e 65 2e 2c 20 69 66 | ion's.value.is.ready.--.i.e.,.if |
| 12700 | 20 6e 6f 20 62 6c 6f 63 6b 69 6e 67 0a 77 6f 75 6c 64 20 72 65 73 75 6c 74 20 66 72 6f 6d 20 61 | .no.blocking.would.result.from.a |
| 12720 | 20 63 61 6c 6c 20 74 6f 20 60 61 73 79 6e 63 2d 67 65 74 60 20 6f 6e 20 74 68 61 74 20 46 55 54 | .call.to.`async-get`.on.that.FUT |
| 12740 | 55 52 45 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 77 61 69 74 0a 0a 20 20 20 20 61 73 79 6e 63 2d 77 | URE...##.async-wait......async-w |
| 12760 | 61 69 74 20 46 55 54 55 52 45 0a 0a 57 61 69 74 20 66 6f 72 20 46 55 54 55 52 45 20 74 6f 20 62 | ait.FUTURE..Wait.for.FUTURE.to.b |
| 12780 | 65 63 6f 6d 65 20 72 65 61 64 79 2e 0a 0a 23 23 20 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 | ecome.ready...##.async-inject-va |
| 127a0 | 72 69 61 62 6c 65 73 0a 0a 20 20 20 20 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 61 72 69 61 62 | riables......async-inject-variab |
| 127c0 | 6c 65 73 20 49 4e 43 4c 55 44 45 2d 52 45 47 45 58 50 20 26 6f 70 74 69 6f 6e 61 6c 20 50 52 45 | les.INCLUDE-REGEXP.&optional.PRE |
| 127e0 | 44 49 43 41 54 45 20 45 58 43 4c 55 44 45 2d 52 45 47 45 58 50 0a 0a 52 65 74 75 72 6e 20 61 20 | DICATE.EXCLUDE-REGEXP..Return.a. |
| 12800 | 60 73 65 74 71 60 20 66 6f 72 6d 20 74 68 61 74 20 72 65 70 6c 69 63 61 74 65 73 20 70 61 72 74 | `setq`.form.that.replicates.part |
| 12820 | 20 6f 66 20 74 68 65 20 63 61 6c 6c 69 6e 67 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e 20 20 49 74 | .of.the.calling.environment...It |
| 12840 | 20 73 65 74 73 0a 74 68 65 20 76 61 6c 75 65 20 66 6f 72 20 65 76 65 72 79 20 76 61 72 69 61 62 | .sets.the.value.for.every.variab |
| 12860 | 6c 65 20 6d 61 74 63 68 69 6e 67 20 49 4e 43 4c 55 44 45 2d 52 45 47 45 58 50 20 61 6e 64 20 61 | le.matching.INCLUDE-REGEXP.and.a |
| 12880 | 6c 73 6f 20 50 52 45 44 49 43 41 54 45 2e 20 20 49 74 0a 77 69 6c 6c 20 6e 6f 74 20 70 65 72 66 | lso.PREDICATE...It.will.not.perf |
| 128a0 | 6f 72 6d 20 69 6e 6a 65 63 74 69 6f 6e 20 66 6f 72 20 61 6e 79 20 76 61 72 69 61 62 6c 65 20 6d | orm.injection.for.any.variable.m |
| 128c0 | 61 74 63 68 69 6e 67 20 45 58 43 4c 55 44 45 2d 52 45 47 45 58 50 20 28 69 66 0a 70 72 65 73 65 | atching.EXCLUDE-REGEXP.(if.prese |
| 128e0 | 6e 74 29 2e 20 20 49 74 20 69 73 20 69 6e 74 65 6e 64 65 64 20 74 6f 20 62 65 20 75 73 65 64 20 | nt)...It.is.intended.to.be.used. |
| 12900 | 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 61 73 79 6e 63 2d 73 74 61 | as.follows:..```elisp.(async-sta |
| 12920 | 72 74 0a 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 28 72 65 71 75 69 72 65 | rt....`(lambda.().......(require |
| 12940 | 20 27 73 6d 74 70 6d 61 69 6c 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 | .'smtpmail).......(with-temp-buf |
| 12960 | 66 65 72 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 2c 28 62 75 66 66 65 72 2d 73 75 62 | fer.........(insert.,(buffer-sub |
| 12980 | 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 | string-no-properties.(point-min) |
| 129a0 | 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 50 61 73 73 20 69 | .(point-max))).........;;.Pass.i |
| 129c0 | 6e 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 66 6f 72 20 73 | n.the.variable.environment.for.s |
| 129e0 | 6d 74 70 6d 61 69 6c 0a 20 20 20 20 20 20 20 20 2c 28 61 73 79 6e 63 2d 69 6e 6a 65 63 74 2d 76 | mtpmail.........,(async-inject-v |
| 12a00 | 61 72 69 61 62 6c 65 73 20 22 5c 5c 60 5c 5c 28 73 6d 74 70 6d 61 69 6c 5c 5c 7c 5c 5c 28 75 73 | ariables."\\`\\(smtpmail\\|\\(us |
| 12a20 | 65 72 2d 5c 5c 29 3f 6d 61 69 6c 5c 5c 29 2d 22 29 0a 20 20 20 20 20 20 20 20 28 73 6d 74 70 6d | er-\\)?mail\\)-").........(smtpm |
| 12a40 | 61 69 6c 2d 73 65 6e 64 2d 69 74 29 29 29 0a 20 20 20 27 69 67 6e 6f 72 65 29 0a 60 60 60 0a 0a | ail-send-it)))....'ignore).```.. |
| 12a60 | 23 23 20 61 73 79 6e 63 2d 6c 65 74 0a 0a 20 20 20 20 61 73 79 6e 63 2d 6c 65 74 20 42 49 4e 44 | ##.async-let......async-let.BIND |
| 12a80 | 49 4e 47 53 20 26 72 65 73 74 20 46 4f 52 4d 53 0a 20 20 20 20 0a 41 6c 6c 6f 77 20 74 6f 20 65 | INGS.&rest.FORMS......Allow.to.e |
| 12aa0 | 73 74 61 62 6c 69 73 68 20 6c 65 74 20 62 69 6e 64 69 6e 67 73 20 61 73 79 6e 63 68 72 6f 6e 6f | stablish.let.bindings.asynchrono |
| 12ac0 | 75 73 6c 79 2e 0a 45 61 63 68 20 76 61 6c 75 65 20 6f 66 20 62 69 6e 64 69 6e 67 20 63 61 6e 20 | usly..Each.value.of.binding.can. |
| 12ae0 | 72 65 66 65 72 20 74 6f 20 74 68 65 20 73 79 6d 62 6f 6c 73 20 61 6c 72 65 61 64 79 20 62 6f 75 | refer.to.the.symbols.already.bou |
| 12b00 | 6e 64 20 69 6e 20 42 49 4e 44 49 4e 47 53 20 28 6c 69 6b 65 20 60 6c 65 74 2a 60 29 2e 0a 46 4f | nd.in.BINDINGS.(like.`let*`)..FO |
| 12b20 | 52 4d 53 20 61 72 65 20 65 78 65 63 75 74 65 64 20 6f 6e 63 65 20 42 49 4e 44 49 4e 47 53 20 68 | RMS.are.executed.once.BINDINGS.h |
| 12b40 | 61 76 65 20 62 65 65 6e 20 65 76 61 6c 75 61 74 65 64 2c 20 62 75 74 20 77 69 74 68 6f 75 74 20 | ave.been.evaluated,.but.without. |
| 12b60 | 62 6c 6f 63 6b 69 6e 67 20 65 6d 61 63 73 2e 0a 0a 45 78 61 6d 70 6c 65 73 3a 0a 0a 60 60 60 65 | blocking.emacs...Examples:..```e |
| 12b80 | 6c 69 73 70 0a 28 61 73 79 6e 63 2d 6c 65 74 20 28 28 78 20 22 68 65 6c 6c 6f 22 29 0a 20 20 20 | lisp.(async-let.((x."hello").... |
| 12ba0 | 20 20 20 20 20 20 20 20 20 28 79 20 22 77 6f 72 6c 64 22 29 29 0a 20 20 28 6d 65 73 73 61 67 65 | .........(y."world"))...(message |
| 12bc0 | 20 22 25 73 20 25 73 22 20 78 20 79 29 29 0a 20 20 0a 28 61 73 79 6e 63 2d 6c 65 74 20 28 28 78 | ."%s.%s".x.y))....(async-let.((x |
| 12be0 | 20 28 2a 20 35 20 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 79 20 28 2b 20 78 20 34 29 | .(*.5.2)).............(y.(+.x.4) |
| 12c00 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 7a 20 28 2b 20 78 20 79 29 29 29 0a 20 20 28 6d 65 | ).............(z.(+.x.y)))...(me |
| 12c20 | 73 73 61 67 65 20 22 25 64 20 2b 20 25 64 20 3d 20 25 64 22 20 78 20 79 20 7a 29 29 0a 0a 60 60 | ssage."%d.+.%d.=.%d".x.y.z))..`` |
| 12c40 | 60 0a 0a 4e 6f 74 65 20 74 68 61 74 20 69 66 20 79 6f 75 20 62 69 6e 64 20 73 6f 6d 65 74 68 69 | `..Note.that.if.you.bind.somethi |
| 12c60 | 6e 67 20 74 6f 20 6e 69 6c 20 61 6e 64 20 73 65 74 20 69 74 20 61 66 74 65 72 77 61 72 64 20 69 | ng.to.nil.and.set.it.afterward.i |
| 12c80 | 6e 20 62 6f 64 79 2c 20 74 68 65 20 65 76 61 6c 75 61 74 69 6f 6e 0a 6f 66 20 74 68 69 73 20 62 | n.body,.the.evaluation.of.this.b |
| 12ca0 | 69 6e 64 69 6e 67 20 77 69 6c 6c 20 4e 4f 54 20 62 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 2c | inding.will.NOT.be.asynchronous, |
| 12cc0 | 20 62 75 74 20 77 69 6c 6c 20 68 61 70 70 65 6e 20 69 6e 20 79 6f 75 20 63 75 72 72 65 6e 74 20 | .but.will.happen.in.you.current. |
| 12ce0 | 65 6d 61 63 73 2c 20 62 6c 6f 63 6b 69 6e 67 20 69 74 0a 69 66 20 74 68 65 20 65 76 61 6c 75 61 | emacs,.blocking.it.if.the.evalua |
| 12d00 | 74 69 6f 6e 20 6f 66 20 74 68 69 73 20 76 61 6c 75 65 20 69 73 20 73 75 66 66 69 63 69 65 6e 74 | tion.of.this.value.is.sufficient |
| 12d20 | 6c 79 20 69 6d 70 6f 72 74 61 6e 74 2c 20 65 2e 67 3a 0a 0a 60 60 60 65 6c 69 73 70 0a 28 61 73 | ly.important,.e.g:..```elisp.(as |
| 12d40 | 79 6e 63 2d 6c 65 74 20 28 28 78 20 22 68 65 6c 6c 6f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ync-let.((x."hello")............ |
| 12d60 | 20 28 79 20 22 77 6f 72 6c 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 7a 29 0a 20 20 28 73 | .(y."world").............z)...(s |
| 12d80 | 65 74 71 20 7a 20 28 2b 20 31 20 32 29 29 20 3b 3b 20 48 75 67 65 20 63 61 6c 63 75 6c 61 74 69 | etq.z.(+.1.2)).;;.Huge.calculati |
| 12da0 | 6f 6e 20 6f 66 20 5a 20 77 69 6c 6c 20 62 6c 6f 63 6b 20 65 6d 61 63 73 2e 0a 20 20 28 6d 65 73 | on.of.Z.will.block.emacs....(mes |
| 12dc0 | 73 61 67 65 20 22 25 73 20 25 73 20 25 64 22 20 78 20 79 20 7a 29 29 0a 0a 60 60 60 0a 0a 49 4f | sage."%s.%s.%d".x.y.z))..```..IO |
| 12de0 | 57 20 69 66 20 74 68 65 20 63 61 6c 63 75 6c 61 74 69 6f 6e 20 6f 66 20 5a 20 69 73 20 68 75 67 | W.if.the.calculation.of.Z.is.hug |
| 12e00 | 65 20 61 6e 64 20 79 6f 75 20 77 61 6e 74 20 69 74 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 65 | e.and.you.want.it.asynchronous.e |
| 12e20 | 76 61 6c 75 61 74 65 20 69 74 20 69 6e 20 42 49 4e 44 49 4e 47 53 0a 62 75 74 20 6e 6f 74 20 69 | valuate.it.in.BINDINGS.but.not.i |
| 12e40 | 6e 20 46 4f 52 4d 53 2e 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | n.FORMS......................... |
| 12e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13000 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 45 61 73 6b 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | async-1.9.8/Eask................ |
| 13020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13060 | 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 |
| 13080 | 30 30 30 30 36 32 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 31 31 33 00 20 30 00 00 00 | 0000622.00000000000.012113..0... |
| 130a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 130c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 130e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13100 | 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................... |
| 13120 | 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................... |
| 13140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 131a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 131c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 131e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13200 | 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 |
| 13220 | 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 |
| 13240 | 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 |
| 13260 | 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- |
| 13280 | 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 |
| 132a0 | 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 |
| 132c0 | 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"."*- |
| 132e0 | 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 |
| 13300 | 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\".&& |
| 13320 | 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 |
| 13340 | 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" |
| 13360 | 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 |
| 13380 | 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"))............... |
| 133a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 133c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 133e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13400 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 74 65 73 74 73 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | async-1.9.8/tests/.............. |
| 13420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13460 | 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 |
| 13480 | 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 34 34 37 00 20 35 00 00 00 | 0000000.00000000000.012447..5... |
| 134a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 134c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 134e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13500 | 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................... |
| 13520 | 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................... |
| 13540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 135a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 135c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 135e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13600 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 74 65 73 74 73 2f 74 65 73 74 2d 61 73 79 6e 63 2e 65 6c 00 | async-1.9.8/tests/test-async.el. |
| 13620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13660 | 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 |
| 13680 | 30 30 32 35 32 31 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 37 30 00 20 30 00 00 00 | 0025215.00000000000.015070..0... |
| 136a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 136c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 136e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13700 | 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................... |
| 13720 | 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................... |
| 13740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 137a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 137c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 137e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13800 | 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 |
| 13820 | 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 |
| 13840 | 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 |
| 13860 | 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 |
| 13880 | 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" |
| 138a0 | 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 |
| 138c0 | 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 |
| 138e0 | 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 |
| 13900 | 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)) |
| 13920 | 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 |
| 13940 | 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 |
| 13960 | 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 |
| 13980 | 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..........( |
| 139a0 | 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 |
| 139c0 | 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 |
| 139e0 | 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)...... |
| 13a00 | 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 |
| 13a20 | 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)... |
| 13a40 | 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 |
| 13a60 | 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 |
| 13a80 | 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)))....... |
| 13aa0 | 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. |
| 13ac0 | 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 |
| 13ae0 | 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 |
| 13b00 | 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"). |
| 13b20 | 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 |
| 13b40 | 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 |
| 13b60 | 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 |
| 13b80 | 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 |
| 13ba0 | 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 |
| 13bc0 | 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 |
| 13be0 | 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".. |
| 13c00 | 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))..... |
| 13c20 | 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 |
| 13c40 | 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 |
| 13c60 | 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................. |
| 13c80 | 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. |
| 13ca0 | 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 |
| 13cc0 | 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.()........................( |
| 13ce0 | 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")....... |
| 13d00 | 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) |
| 13d20 | 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)))). |
| 13d40 | 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 |
| 13d60 | 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)...... |
| 13d80 | 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 |
| 13da0 | 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 |
| 13dc0 | 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 |
| 13de0 | 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 |
| 13e00 | 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 |
| 13e20 | 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 |
| 13e40 | 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' |
| 13e60 | 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 |
| 13e80 | 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. |
| 13ea0 | 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 |
| 13ec0 | 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 |
| 13ee0 | 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"...... |
| 13f00 | 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)).........( |
| 13f20 | 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 |
| 13f40 | 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 |
| 13f60 | 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......................;; |
| 13f80 | 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 |
| 13fa0 | 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.() |
| 13fc0 | 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 |
| 13fe0 | 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 |
| 14000 | 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 |
| 14020 | 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)...................... |
| 14040 | 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 |
| 14060 | 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. |
| 14080 | 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 |
| 140a0 | 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." |
| 140c0 | 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)) |
| 140e0 | 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 |
| 14100 | 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)."\ |
| 14120 | 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 |
| 14140 | 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 |
| 14160 | 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 |
| 14180 | 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. |
| 141a0 | 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 |
| 141c0 | 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....... |
| 141e0 | 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)). |
| 14200 | 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 |
| 14220 | 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).... |
| 14240 | 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..... |
| 14260 | 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. |
| 14280 | 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............... |
| 142a0 | 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.()................. |
| 142c0 | 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"). |
| 142e0 | 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. |
| 14300 | 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 |
| 14320 | 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")...... |
| 14340 | 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)............ |
| 14360 | 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 |
| 14380 | 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 |
| 143a0 | 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)..................... |
| 143c0 | 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 |
| 143e0 | 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 |
| 14400 | 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)))............... |
| 14420 | 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 |
| 14440 | 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).............. |
| 14460 | 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 |
| 14480 | 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")............ |
| 144a0 | 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 |
| 144c0 | 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 |
| 144e0 | 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"))............. |
| 14500 | 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))............. |
| 14520 | 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 |
| 14540 | 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 |
| 14560 | 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.( |
| 14580 | 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 |
| 145a0 | 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................ |
| 145c0 | 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 |
| 145e0 | 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 |
| 14600 | 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.()........................ |
| 14620 | 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")...... |
| 14640 | 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 |
| 14660 | 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 |
| 14680 | 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))...................... |
| 146a0 | 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. |
| 146c0 | 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 |
| 146e0 | 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 |
| 14700 | 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,. |
| 14720 | 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 |
| 14740 | 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 |
| 14760 | 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.( |
| 14780 | 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). |
| 147a0 | 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 |
| 147c0 | 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 |
| 147e0 | 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*)" |
| 14800 | 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 |
| 14820 | 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 |
| 14840 | 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 |
| 14860 | 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 |
| 14880 | 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 |
| 148a0 | 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)... |
| 148c0 | 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 |
| 148e0 | 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"...................... |
| 14900 | 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 |
| 14920 | 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.......................... |
| 14940 | 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).............. |
| 14960 | 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. |
| 14980 | 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".. |
| 149a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 149c0 | 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 |
| 149e0 | 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))......................... |
| 14a00 | 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))......... |
| 14a20 | 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")....... |
| 14a40 | 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.. |
| 14a60 | 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 |
| 14a80 | 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 |
| 14aa0 | 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" |
| 14ac0 | 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 |
| 14ae0 | 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. |
| 14b00 | 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, |
| 14b20 | 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 |
| 14b40 | 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". |
| 14b60 | 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. |
| 14b80 | 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 |
| 14ba0 | 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. |
| 14bc0 | 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." |
| 14be0 | 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 |
| 14c00 | 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......... |
| 14c20 | 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............. |
| 14c40 | 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 |
| 14c60 | 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.( |
| 14c80 | 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 |
| 14ca0 | 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"). |
| 14cc0 | 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 |
| 14ce0 | 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")................... |
| 14d00 | 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........... |
| 14d20 | 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 |
| 14d40 | 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 |
| 14d60 | 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"....... |
| 14d80 | 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 |
| 14da0 | 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)))............... |
| 14dc0 | 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)............. |
| 14de0 | 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 |
| 14e00 | 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...... |
| 14e20 | 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)..... |
| 14e40 | 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 |
| 14e60 | 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)...................... |
| 14e80 | 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 |
| 14ea0 | 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 |
| 14ec0 | 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)).................... |
| 14ee0 | 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).............. |
| 14f00 | 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 |
| 14f20 | 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:. |
| 14f40 | 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)..................... |
| 14f60 | 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))))))...........( |
| 14f80 | 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 |
| 14fa0 | 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 |
| 14fc0 | 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).... |
| 14fe0 | 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 |
| 15000 | 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 |
| 15020 | 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- |
| 15040 | 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...\ |
| 15060 | 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 |
| 15080 | 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 |
| 150a0 | 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 |
| 150c0 | 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." |
| 150e0 | 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 |
| 15100 | 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. |
| 15120 | 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 |
| 15140 | 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- |
| 15160 | 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 |
| 15180 | 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... |
| 151a0 | 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.()... |
| 151c0 | 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 |
| 151e0 | 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) |
| 15200 | 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)..... |
| 15220 | 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. |
| 15240 | 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................ |
| 15260 | 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).......... |
| 15280 | 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 |
| 152a0 | 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)...................... |
| 152c0 | 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 |
| 152e0 | 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)................. |
| 15300 | 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)) |
| 15320 | 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 |
| 15340 | 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)... |
| 15360 | 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. |
| 15380 | 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).........( |
| 153a0 | 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 |
| 153c0 | 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)))).... |
| 153e0 | 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 |
| 15400 | 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. |
| 15420 | 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 |
| 15440 | 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 |
| 15460 | 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)............ |
| 15480 | 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 |
| 154a0 | 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. |
| 154c0 | 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 |
| 154e0 | 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)"........ |
| 15500 | 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))......... |
| 15520 | 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...... |
| 15540 | 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. |
| 15560 | 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............ |
| 15580 | 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.().......... |
| 155a0 | 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 |
| 155c0 | 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))... |
| 155e0 | 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)....... |
| 15600 | 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. |
| 15620 | 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................ |
| 15640 | 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)........ |
| 15660 | 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 |
| 15680 | 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).................. |
| 156a0 | 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 |
| 156c0 | 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)........... |
| 156e0 | 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 |
| 15700 | 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- |
| 15720 | 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.( |
| 15740 | 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)...... |
| 15760 | 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 |
| 15780 | 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) |
| 157a0 | 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 |
| 157c0 | 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 |
| 157e0 | 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 |
| 15800 | 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". |
| 15820 | 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)).... |
| 15840 | 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 |
| 15860 | 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. |
| 15880 | 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 |
| 158a0 | 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).......... |
| 158c0 | 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 |
| 158e0 | 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,. |
| 15900 | 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 |
| 15920 | 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 |
| 15940 | 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 |
| 15960 | 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").... |
| 15980 | 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 |
| 159a0 | 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 |
| 159c0 | 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 |
| 159e0 | 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. |
| 15a00 | 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 |
| 15a20 | 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)))............... |
| 15a40 | 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 |
| 15a60 | 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 |
| 15a80 | 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.#' |
| 15aa0 | 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)))..... |
| 15ac0 | 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)))......( |
| 15ae0 | 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 |
| 15b00 | 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 |
| 15b20 | 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 |
| 15b40 | 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 |
| 15b60 | 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 |
| 15b80 | 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. |
| 15ba0 | 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.()......... |
| 15bc0 | 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" |
| 15be0 | 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) |
| 15c00 | 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)............ |
| 15c20 | 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)............. |
| 15c40 | 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. |
| 15c60 | 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". |
| 15c80 | 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)))............. |
| 15ca0 | 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 |
| 15cc0 | 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 |
| 15ce0 | 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").....................: |
| 15d00 | 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 |
| 15d20 | 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")....... |
| 15d40 | 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 |
| 15d60 | 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) |
| 15d80 | 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- |
| 15da0 | 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- |
| 15dc0 | 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.( |
| 15de0 | 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 |
| 15e00 | 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.# |
| 15e20 | 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))).... |
| 15e40 | 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)) |
| 15e60 | 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 |
| 15e80 | 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 |
| 15ea0 | 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 |
| 15ec0 | 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*")))))... |
| 15ee0 | 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 |
| 15f00 | 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. |
| 15f20 | 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 |
| 15f40 | 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 |
| 15f60 | 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 |
| 15f80 | 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")...... |
| 15fa0 | 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))....... |
| 15fc0 | 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 |
| 15fe0 | 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.(( |
| 16000 | 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............... |
| 16020 | 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 |
| 16040 | 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..................... |
| 16060 | 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.().................. |
| 16080 | 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 |
| 160a0 | 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\\'").... |
| 160c0 | 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." |
| 160e0 | 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 |
| 16100 | 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))..................... |
| 16120 | 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 |
| 16140 | 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 |
| 16160 | 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)...................... |
| 16180 | 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 |
| 161a0 | 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))))) |
| 161c0 | 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)).. |
| 161e0 | 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.( |
| 16200 | 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")........ |
| 16220 | 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 |
| 16240 | 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 |
| 16260 | 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 |
| 16280 | 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")))))).................... |
| 162a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 162c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 162e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 163a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 163c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 163e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16400 | 61 73 79 6e 63 2d 31 2e 39 2e 38 2f 61 73 79 6e 63 2d 74 65 73 74 2e 65 6c 00 00 00 00 00 00 00 | async-1.9.8/async-test.el....... |
| 16420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16460 | 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 |
| 16480 | 30 30 30 37 36 32 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 37 33 30 00 20 30 00 00 00 | 0007622.00000000000.013730..0... |
| 164a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 164c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 164e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16500 | 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................... |
| 16520 | 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................... |
| 16540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 165a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 165c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 165e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16600 | 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 |
| 16620 | 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 |
| 16640 | 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 |
| 16660 | 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 |
| 16680 | 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 |
| 166a0 | 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. |
| 166c0 | 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 |
| 166e0 | 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 |
| 16700 | 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 |
| 16720 | 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 |
| 16740 | 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 |
| 16760 | 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. |
| 16780 | 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.; |
| 167a0 | 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,. |
| 167c0 | 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, |
| 167e0 | 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 |
| 16800 | 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 |
| 16820 | 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 |
| 16840 | 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 |
| 16860 | 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 |
| 16880 | 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 |
| 168a0 | 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. |
| 168c0 | 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 |
| 168e0 | 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 |
| 16900 | 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 |
| 16920 | 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. |
| 16940 | 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 |
| 16960 | 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 |
| 16980 | 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 |
| 169a0 | 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 |
| 169c0 | 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:..( |
| 169e0 | 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 |
| 16a00 | 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 |
| 16a20 | 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..."). |
| 16a40 | 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. |
| 16a60 | 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. |
| 16a80 | 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 |
| 16aa0 | 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). |
| 16ac0 | 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 |
| 16ae0 | 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 |
| 16b00 | 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 |
| 16b20 | 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)))... |
| 16b40 | 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. |
| 16b60 | 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.( |
| 16b80 | 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 |
| 16ba0 | 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. |
| 16bc0 | 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............. |
| 16be0 | 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 |
| 16c00 | 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.(). |
| 16c20 | 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. |
| 16c40 | 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 |
| 16c60 | 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) |
| 16c80 | 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 |
| 16ca0 | 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").....;;....... |
| 16cc0 | 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, |
| 16ce0 | 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"...... |
| 16d00 | 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 |
| 16d20 | 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 |
| 16d40 | 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 |
| 16d60 | 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....;;. |
| 16d80 | 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. |
| 16da0 | 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 |
| 16dc0 | 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) |
| 16de0 | 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 |
| 16e00 | 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. |
| 16e20 | 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.( |
| 16e40 | 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 |
| 16e60 | 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: |
| 16e80 | 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 |
| 16ea0 | 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 |
| 16ec0 | 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 |
| 16ee0 | 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 |
| 16f00 | 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 |
| 16f20 | 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"................ |
| 16f40 | 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 |
| 16f60 | 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 |
| 16f80 | 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).................... |
| 16fa0 | 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 |
| 16fc0 | 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"................... |
| 16fe0 | 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 |
| 17000 | 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))).................... |
| 17020 | 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 |
| 17040 | 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 |
| 17060 | 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 |
| 17080 | 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 |
| 170a0 | 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 |
| 170c0 | 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..."). |
| 170e0 | 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 |
| 17100 | 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 |
| 17120 | 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 |
| 17140 | 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 |
| 17160 | 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 |
| 17180 | 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")............. |
| 171a0 | 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 |
| 171c0 | 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- |
| 171e0 | 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- |
| 17200 | 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. |
| 17220 | 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 |
| 17240 | 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........ |
| 17260 | 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)............. |
| 17280 | 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).... |
| 172a0 | 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 |
| 172c0 | 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"........ |
| 172e0 | 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 |
| 17300 | 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 |
| 17320 | 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. |
| 17340 | 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".............. |
| 17360 | 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 |
| 17380 | 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..... |
| 173a0 | 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")) |
| 173c0 | 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 |
| 173e0 | 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- |
| 17400 | 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. |
| 17420 | 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 |
| 17440 | 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 |
| 17460 | 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.(). |
| 17480 | 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." |
| 174a0 | 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\\'")....... |
| 174c0 | 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" |
| 174e0 | 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 |
| 17500 | 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 |
| 17520 | 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 |
| 17540 | 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))))..( |
| 17560 | 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- |
| 17580 | 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............... |
| 175a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 175c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 175e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 176a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 176c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 176e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 177a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 177c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 177e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 178a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 178c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 178e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 179a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 179c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 179e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 180a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 180c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 180e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 181a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 181c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 181e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 182a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 182c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 182e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 183a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 183c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 183e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 184a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 184c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 184e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 185a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 185c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 185e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 186a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 186c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 186e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 187a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 187c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 187e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 188a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 188c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 188e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 189a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 189c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 189e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 18fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
 |
index : dotemacs.git | |
| my Emacs configuration | Craig Jennings |
| summaryrefslogtreecommitdiff |
blob: d251f9ac17f3b1bb0a90a3fdfee3827dcbe2e991 (plain)