From: Akshay S. <ak...@us...> - 2016-08-22 13:45:11
|
This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "matlisp". The branch, master has been updated via 1a015d24ef172b06ffab81007174d2b42416169f (commit) via dd41ced541bba5f641349f5b0477e9c2bf0a1d39 (commit) via 60297cf076073dde534f6197f37800d02c2852b1 (commit) via 037bbdb8d29bdaa0325ad151ad2d48bf25f02e7d (commit) via a48ffc59bab0eff7adbb4ae41e6172b2ccf6466f (commit) via 11a6dd3c1f1aad5d4c322c72df5afee323d3c186 (commit) via e13f6788e1c3e5dea18f37379cc7872cd02e6993 (commit) via 2fb104a8a34598716dca578dea5bf8c581b6a95f (commit) via 385d36667317e84e60a24449423d1d5b6d322318 (commit) via 22622d4a532c0a3ad86f4cb89bc8bee326342d38 (commit) via 0d9e8265c04ff44ba21dde42f2e0268060bac3bf (commit) via d0697d364f8217663d6e1a9837f3625e75bea74b (commit) via 756f0a454ffda9fb32852a5f9b5414b90d584775 (commit) via 7dd41b64f6696a3233ddbd98815a3246093745fe (commit) via 3bb3d1735db06e95c18f74b24780fa3dc7b807ae (commit) via 39621f53b92ec4cd762c003eedcf01e3a299dea3 (commit) via 91b19a64999c616a76a12f7f25684e68f927fd94 (commit) via 3221deee0c077d624cdaa4ef5a0ae0cc8b23983a (commit) via d7a7ee03c110e43ec051ae3a5a8ff91367048a0f (commit) via 2231f734929364e9f71b9a4c9a0066c48f610fa2 (commit) via c4de485d2ebbc54f9808bd73d6e3c789fc308f11 (commit) via fd4d95fc069d4d7cda0e04194ace49f430d4f2b7 (commit) via 6f60038505186e59ce720cd674cd36cc5926e297 (commit) via 3ef36160f9459f7dfd64a4c3d80f7b9f451edf63 (commit) via db49be757294aadb8d9c355ae791f9522a169ebb (commit) via 153293df411cb24f1a2f11da87fa668bcf4860d1 (commit) via c32ddf3fcce4f5be355d584226dfc8739e61d251 (commit) via 94d112d18ec5d94e52352d667782cbe380edaa78 (commit) via 2c170e23cf8ff80f3d8bae90b3c2120d17e6d6ed (commit) via b9698be92acfe4c90a6370888a6611ee6d20d5b6 (commit) via adafff0045c2bc67ed7ec9264262fa741a5273f0 (commit) via ba99e6e35926890048f477e353ac4bdb60245bea (commit) via bfdb87995c51b535fbbfcc4db56bef30515cbe24 (commit) via 0f6930984839e2d31693d6fbf8901591e4105a9d (commit) via 900b84847bf2926c8714f610ba87bc3a2781f084 (commit) via 000299ef6a34c9adfe676e38b5b8dde30c4d4b44 (commit) via 3b27ccd45472a294a10f8d6512de5c2289fcf239 (commit) via c4cf71c34af11ec45f1ce98ac0e9b2485774b345 (commit) via de4e74b379e7faff1dee86eb47c1be734cb62d0c (commit) via c3c4fa773f3542288dea6b497e4b08469752a3da (commit) via 4e01c7eacaa22b0dc2bc9127f49852bec4067217 (commit) via bb560c3a48bd26019e08f5c59ad580098bdf4451 (commit) via 3688e32b8b7c7c17caa02931ad0e1048190859d6 (commit) via 9cd3daee72ee68fbf79df2eddf48d29ddd479e53 (commit) via 55391d559d2ea80ade62545903d1d5a7cdaa875e (commit) via fe6a5a59bf6e70ef44789d0856057ea1d94e41ab (commit) via d9ea3ef2056dceb3faa9b9eb43fe0985c6f21530 (commit) via 005224576331006b64dab5379af217fb0688110b (commit) via 1177c65a3eff38aa103d3b4f4bad7602f8e75deb (commit) via 796484264c893ee470d4ee4831509f0fc5d62cca (commit) via f55fe0bdb0307c450ed8950f72f7373c51a7bc11 (commit) via e33b1d9cb49fef4ce3af6f4d6597a5f49dda59c4 (commit) via d37c421e83fcd843119449d2cc43c37b94283324 (commit) via 6113e9bc25e4c320e80d1abb59dcccedb7242447 (commit) via 284457934c1efe9b1fc39bf148a71276e7dee04d (commit) via 0916dae9c4b60884708a44e6b697e0fb9a71f6e1 (commit) via 2e98ad1cacf396f3379747622272a945d14161e6 (commit) via 08ec60670866ec31ee548c01d2697ddb39aa6341 (commit) via 294acbf65f4594f8b258e07ed5dbd44de5972cbd (commit) via 2f4c4d33fa970d0a8c41f628ae6c9bd720d24b5d (commit) via fc49a3413250a9440c7c2e28809834aa285adfdd (commit) via 37221d8f2c457e3aa0a04247cc50487083499f8c (commit) via ccd5cefe2071bc9850b2d288b0dc368eede10bd8 (commit) via 39290194bfe581c942642b1b13f344d76219f367 (commit) via 6f7d1dcbd9dcaff4d4bc2783701814fdf04fb9f1 (commit) via 0cd54ef4dc1e24e5a0d6066cdca547a157b03dea (commit) via 320023fb642e6b5c788fa1cec33668f6ed4c25fb (commit) via 2d7111d103513c4aad7d2a19bfa653ba99ef6d29 (commit) via 043493c2b399ef34f1689405fce948cf9de0ea87 (commit) via edc6dab27ea493f1c04b93d9eb19e620fc211b50 (commit) via 0c82104ab25bfd10fefd2c1336ec370bde05dbc6 (commit) via 6c5d467a2bd191369109f9c697bb50119c4629bd (commit) via 0683ce1dd665fb77530ce7ec24efcf551a69d69d (commit) via 0a42770366b8c3d8af583fd966b701ebebc9a0d6 (commit) via 6a3ccd16305a9c76f31454a67a29b3c64a6479aa (commit) via 5ee9923c62e123a35b339b2ebc43fd89820fc5a1 (commit) via 2cd91fa63645308b069da9e8ca4a005ef53aaad0 (commit) via 2a4b666d452f93316f2c584f29e7d56df1191a39 (commit) via 443a389e1296d1e87ea9e85ca0f58e2a37ce1f20 (commit) via fa5ee30b90014993f98d2fb1688ee73693863c3b (commit) via 5273e4502a7b13c11e2da2a3f8f5a53fcae4f1b9 (commit) via 96cc6aa5041bc00467c67b90aa966c879117b49c (commit) via 76245cac9d5ee8951050e3c1ba6c26051720ec03 (commit) via ecd17cfeae86e96cea9237d0fa22f3a481d75eeb (commit) via a35c91af917c3d0e1eeeff6737c3b10d3f63eb1f (commit) via acaa9ceef5f04d92cd6cf2f5d7815a0072e1ae16 (commit) via 594f0c358c53910fba1b10a2716305bdfc709b3e (commit) via 107ed92a11b5a993cbc8e95f5c0c25ec1cc48e67 (commit) via 58f22578a66f3470d8868b8877e5280e1bef6379 (commit) via 48066c14b2d291bea184c010c969f43103e624ea (commit) via 61b64c954dd8884e0b021d262a33cb9b791409cb (commit) via 7fa71873e38b71e342d97787151db5bc96ec6d3e (commit) via 0c806f79dbd3ca241c6be47853ce205d1b974b73 (commit) via 11de0a0b701d8526dc1ae5a3fef0e8907e45f208 (commit) via 8798db72d31c8c2c9d5f310d9e164469d93106ad (commit) via 1116c08990840ce8c6c1f7d0beff58a8ef0f71b7 (commit) via bfc0ae5c3f56ea7665f89dd67a8e10e48cd20945 (commit) via 905afe002f11cd01200e52d71c1e0efcb68ca954 (commit) via 202b8cdde09eb7cf3810d3fe094e040d11c6d965 (commit) via 37c0637576ca1f38663ec226344d25268f1fe10b (commit) via 60ed6a506345a01d683f3243a9a702b8eb804572 (commit) via 891e45561adfb019c93188062f7a0f507f98f8e2 (commit) via d726fd31f24e62a100746b7dd16931569e95d75e (commit) via 9430da7fd1f8b4895a83d1cb7ff818b995411b1a (commit) via 983eb7aa008d7de1f14e09fc1e830bdd4dcc22fe (commit) via 97b8d781d7025cbddebea2834e4e8524f304691f (commit) via 66397bad5e776d0fd1c614ce1de6f6e894df7a57 (commit) via 685893613c344882d1255dbe7be7c4c116422921 (commit) via bbc085fd7886151bf02510460e9320da340f854c (commit) via 8ba7e548ba160c6a801279063d0450f4ebf28883 (commit) via 55ccf0f17854050ba1c25d38da5cf3ceb0b57013 (commit) via 6e4e463e00bd4935b20a24fa2aab83a977b1e87e (commit) via c88c6e6a912bfbadffe67d1dbc6a87f500cf154d (commit) via aadb0155c39ca324e4f8dfaa011341a78195ddc6 (commit) via 23dd5bb2ff772a915edef3bb99755b473bc944a2 (commit) via 5c0a2902eb31ca0f1932e68cd143684a16635901 (commit) via 469e771842324921018f42b75643c0a2fe4a5f48 (commit) via 94b65e68f2de5208ef9641cd105e25512c36a7f5 (commit) via cae6f148445aab178423d44709f3698c433c1e17 (commit) via 9546fee5ad2b7b4824820ef9c8bf50f5287fa6a4 (commit) via 81566a00b8a0e1340a78a79ce5705e7361d0ae85 (commit) via 9aaf4871f793170dbf62a4631da9d315816aa643 (commit) via 1dfa4dec625398d4295d7836c3be5e68aa12cfe7 (commit) via 1bf9c9b21018655ecaf50b7e2185ceb527768ee6 (commit) via 1be4accee89b2328c4eb005fdd5b5c726ec28e0b (commit) via 9c9c27182d3c86e7bee9ce17bcca33d5438d3e93 (commit) via fbf3d152a99d2e70cc2a359dd3a44055ac5d6df8 (commit) via 2f7bff9572c460718770ec23821616410b63030b (commit) via d2a2ab1af848f393abbe0775245a98faf9121c9e (commit) via 79b2580d7558687ef1b54caea105164cb03e7dd8 (commit) via 23942e5a3417964fa8da42bde635b92870961aa4 (commit) via 4eed6367caf3871507dcf10df396f5131165648b (commit) via 35c2bb5b71f5e50cd1fb5a18d1d2cb2c7b456d02 (commit) via a26f789808a5cef1b6225b0dfa99266ad4c244ac (commit) via 189e440f0539dfe7b61ab01be288ef21ce1a293d (commit) via 0d61e7c9fcaeed1cb863535befc8aea8708db4e8 (commit) via bf1692583a74e0b1d162faaa1721fad13e2a6add (commit) via 38cf1e1f22a0bd1e8d91253b1a157532762e7619 (commit) via 471131427d364372ed3036db61a8c07aaadd52f3 (commit) via 94f46323ff143339c259d7df763c472d65ec708c (commit) via 7020a1fe1e5fe187a946251fd8d9a165d594b006 (commit) via 9fa86d9d126ddefe940be5bcb312f1d5bc2abd56 (commit) via 87f94b06643502a559c5cbd7846c3003afa26166 (commit) via a6ea51668e827770c7d5e4f9a17d25239a9cb16d (commit) via 2f285b1ebd72f0a3b67740784f5fd9356d9860b9 (commit) via f390613050a75cac7d68b1ffa700102adb536334 (commit) via 6c53261938e91442fc8c8bfce60d60fcd357ef85 (commit) via 8fcd27ca3346420fa26e7313d305a5476e518f3f (commit) via 293ea8d4971cac70b3e15b98da0db790b65bb5cf (commit) via adb2964e272be78baae796f3720cd8625a28c905 (commit) via d0d1f3440a3f748f095837c5c23c71af3ca7ade5 (commit) via 38cda2383fb318c296a1c14a98c199f035015338 (commit) via ee44b3328c471ac1fcea28c1cb3a549f8fec6a67 (commit) via 876a22424a2428c269424f021e324ba9f1f066bc (commit) via 0b15cd1d3306b25849e0d24286f678813c7a823f (commit) via 57c51122f65377f9e95e5968d300955763d2330e (commit) via 3b2e1cdc159bfdc212083e785cc75cc4ba898b3a (commit) via 4ee34e5fa43590ea3c30890b1dd9e25ef61dd15d (commit) via b07d86a2949223ea41874db5312ad466d9210697 (commit) via 973b4a406cab55b0334c21dc5a1fff1878751270 (commit) via 46c8d439f2fa053f1d10f24cfc5d92ce4e3dd5c8 (commit) via e513479ed4db28cb8a5e388ef959aef2d494480a (commit) via be2c98237b039c2520bef8407c01c8cfcc4da966 (commit) via 5b6d8073843fecd6e1e9fdd7da48fd6664dea780 (commit) via e21a2a3d0528db46c2157b998ea7447788adf551 (commit) via d12c7b7de963a381ab6cf7fa16eab3e1b638bf49 (commit) via c081e8620ceb0791649db69bff4996bbb2d0b1aa (commit) via e9787f5d1e79170e087fcb4d73677654e1406939 (commit) via 2264eaac944bf3f0ab4afff2e68330ea97a400fd (commit) via c6d24936452cdbcc93ccd0d291265b8c42b32f13 (commit) via 835ab7165ae03dd3b2f729be06fae109f510d541 (commit) via f4ce04ca7d1a9d8abdbfac4cc9e07fb7c89b40ca (commit) via 7991ce84cf185d777714fe02b3b7acc441ee0b9c (commit) via 079ea856dba23691bde5bb3549258bb038735658 (commit) via 3a24e0b5f777768bd173a94de643e0bbbe7e8060 (commit) via ef52a4f044bcacaa9e9ed3ceaaa32757e08336f6 (commit) via 73c1278b64c685b3c99e9bceee8820db7350fcad (commit) via 0ce58792bda8ee5ceda838f6f5bb8ecca19b0425 (commit) via add144959b0bd9a72bdc37379e73ba3aa407091d (commit) via 028868267f4b3afe0b9078703978852dcb5a5ee7 (commit) via d2485564d605c24ece09ea6a8242bec31dff64d4 (commit) via e798716024cd892be2288ce16c894b6a6e4b4268 (commit) via 213c32b68dbd238f81dfa467f7eb4abe39896c91 (commit) via 5cf97eb23903e60eaf76982f63ae259c20016112 (commit) via e2990705d49fd13bc9e3907e7f50058877656ef9 (commit) via fe8ca0d1bfa7786fb8ce402b373c68a12282fd60 (commit) via 29b9b34ffc470289530bc4c3ea50ae83e0f87c10 (commit) via a193be3a51f0c1c5e9e37d47fc166139eeed965a (commit) via 131aa57f9a4ef6d9a1efdd9c7160467ce111943d (commit) via e389009a5953e82529b7c82b51788a2943f2ce52 (commit) via 9027e5427a552c7256562545b3abe947362975a9 (commit) via 2010f94ec414515deaef6b4e386220d3b52a45f7 (commit) via fb96f5b3d82ceef3c26ba90f1d7a1297c9f43b84 (commit) via b302d3e6103136fad0fd7abde2cb27123303eae5 (commit) via cf5ce32c3538fc032452f1e30a7e9cea67ad273d (commit) via a250bd28d0fe54e71f3fa21a9564f14d11c5fc84 (commit) via 58a1f8f184689da421e0cccad11b7b894eb32a83 (commit) via a7af1ec8d7998af8a261be4d3b883331d93b946b (commit) via 60218d0bcbe95ffdf5cf2e37475d8a6353845b58 (commit) via 5735d73a9c69210a88fbcbd8d6129eb2074b3ab5 (commit) via c112774f9439b0227a510671670b453bb521f8c4 (commit) via cc7e9ca7a94ef1472e4f5ab2eece80d4190a9f47 (commit) via 2d4fd8ef10a18cdde811f279682ffb247f095375 (commit) via f86b0007f10e74ab382f51607f97449b66b1fd44 (commit) via 2c2a445d273472d215e3ebcf38afb3a00b5c0e20 (commit) via 7717d62625682111852b283cc242b79de1296a1b (commit) via d42cb3ca26888f5d78fa04085fd24c033512267b (commit) via a58f12baf0d0953decbc93e1f0a2ea5f79c70ef9 (commit) via 861c48927ea49efba2d03e749e5f40ca57bfaa18 (commit) via b847b3514b2e48492aa2c19fa04142968b7eb6c5 (commit) via 521a462121b390474f13009a66af311f3bd8dcc0 (commit) via 4721a58c0795326661799eb8d109c3940feb5f3f (commit) via b0e1a0c992503c28631a44b79ec7e3994f22dc1a (commit) via e5d40878ec1b3c2ec0b5b0c593d5c78cdfbef9e7 (commit) via 2f3f0035eaa8823465da3a459a0ede0b749ea02d (commit) via b61bda16cd9dfd60434a9eef6bfdc13c29716fe6 (commit) via 496adac9889142ff8c43079fe29307b191c9b1e7 (commit) via ad177bd791e2059c229e1fab1283ee23a7da79a1 (commit) via ec2384323354de0079d3213f8f49e83edcdc680d (commit) via 6e0b16af44ce35a6b850040198ffe1dee7764e94 (commit) via 33975a1a0ebf1414cbe4f69ae49789660b42df74 (commit) via bbffed2a1663d04da020e1fb282c280aadcbd61c (commit) via 4044ba135c0cf36ed8bc9709ed4c2aa1d71e61c8 (commit) via 9624b4a7f3c0c4ca512eb0c0cbf99b9c81b1fc5f (commit) via a4fb36213dd45707c0693489b5c0d704f00f523d (commit) via 68bb590734691ce2e37ab3b5fb420b8f63635fb7 (commit) via 6a10ff471532a380ceaa5ebd9ddce1afe9985810 (commit) via cb0798eded5988c2e62afdbc153c61c99c7f5418 (commit) via 6703e936375147ecb63fedfa60257027c9cb0a0c (commit) via 3361b48bd53aa2a9cbec2d64a23039c2668fd0f6 (commit) via 1ddfdba533982b362cab9061c1bb34bfb701f707 (commit) via 651b4dbd31fe54e965f4d747a22e2c2467130ff8 (commit) via 7ad30095ead69f5b4b7a8f5f3b51fe4fbd26dcb4 (commit) via cd8367fbe11b2984c68ec08888c0743e7e3898b6 (commit) via 709eaf589d3cdd72406406832723ebe126d71888 (commit) via 873cd5ae0e181576d7ae8a2fb307e5b9cb5a9a59 (commit) via 24593618439146ac7d6da201c504f0e01c296b80 (commit) via 95c9eefcd363fa2ba05e92e3322758c81219e6c7 (commit) via 3a21379dbbad3665c85a95128f34672b96ae1851 (commit) via 5b7710825010f450b71da9d0cbfb27411a86994e (commit) via a596730f7a5d3c3d65335ce032e8ffc3df557837 (commit) via 8b18fb736d6bae9c0fd16a0faa51efed07afb294 (commit) via f4e59e53ce5f2de3462c3c554f6bd075b3f30b6b (commit) via 6d0ed7f102650f8c775144d91c7e38901fa51ff9 (commit) via b668733e8899254c129a7b1d109b4a229aa95246 (commit) via c81e3b9bbaf654e5d5cf4b9082d013b6e0b9b1d4 (commit) via 8e9e139ab7884f3811834aba6c9eb5d25c1c79e3 (commit) via 56b707f789c453e157d0818fc8fcf0a16a699db8 (commit) via 3caa822f9516b69bc5aba4bd2cb840a05b09e48b (commit) via 3afe61642a8951b86133c79e1fbd19839f48b8b8 (commit) via 0d327c3a710ab3bce416b0ac48093557e073e6b4 (commit) via f907ad7cfb43867bce9af5226162e4d9509d9a00 (commit) via abb0a6f58d54ca9629afef9e56afbc41041ebb14 (commit) via bd8ba7b1d0ba2971f28a1690fdea106397a90d04 (commit) via e4f79071c3818c46ee389c04e01cc086497966e9 (commit) via 5e67db6057fd19bc32ff2391f2e2a1aa278448b5 (commit) via a81b698f2e9335043ee0415bbb2cf5e8539c66e8 (commit) via 6747a6d64abbad33df475d238be0be94a616df9d (commit) via adf629e94fee94dd32c4741ecec91c7567a6049a (commit) via f527df432b77c0cd1d129ac04c2ef388a6521622 (commit) via 165d6ea255110612466567fab0f1d6b7352f0f65 (commit) via e8da7463cc4af5a1ebb34f4f583e3fdf4612fcfa (commit) via 9cb26abe19d52ce5bb7fc1873a6870ebde9954a7 (commit) via 536427a4451d57ba660ed0dd09771ddcfc1b84ad (commit) via a195dc65fdc34de0b32109511a06059f2eefa701 (commit) via e9f2199b996e73e9e5f3a4836d28100bddb5dd04 (commit) via 72f1265aef1909ad6ae4ba8221a1b13374fd0036 (commit) via 312979c7214c49f9c0a2ffd29a27557be73ea104 (commit) via a1b8de0759bc21deecec1b44462dbb022f30c768 (commit) via 313c41e3170fff67f8495ddac3fc084d0dbbeb92 (commit) via 2a305a1aabb5d33c5c1967e257d3802d66e2c0fc (commit) via 59cc9209020a6f3f22a04760a7af7292b8959526 (commit) via 25502e745746d57cb0255579aad4c3fad9cbb206 (commit) via e7b1e34c36d42dd0a7d651b3ec3f4dee514dd44b (commit) via e5d57952737b7558a81583609ae97dbd77b9b557 (commit) via 6e9a51f360bdf55d86c0c905e836daeaa98f7bc3 (commit) via 5f6a1194181a0702e3f8a67f401ef34eb8863c36 (commit) via 0fad8e8adfab324824eb5be7bda579ed366f0a89 (commit) via fb6d6c916959ee249a6d1e4726019307bdb29f0a (commit) via 144f7817e8eb11597f795a76dbda9c6371b61c0b (commit) via b301eaf23d1815d9d1521ceebf0d669e98f3170a (commit) via f98c528e0f88148fe96c5c34cd085a0281bdd9fa (commit) via 5b3e1bbdcd79e00b2dcd251d85dcd42f7e333cdd (commit) via a6b74d7ce09d42adeeab287b8a4cce1fd47c58cb (commit) via 24b661d49484fd9774bebf80c07c6dc836f69779 (commit) via 731e677c5e9d7eb73033fbcbb78be1ab2987d5b0 (commit) via c14d06055ad9164df1e9fe34ea2d285722134772 (commit) via e17ae2b44b5956cb4a4ec3339273f1e208f501ae (commit) via 1560a36faab44c6f9d293c57693045ebd21ca96b (commit) via 5461bd2ef8e0e6b06b3977117de61d13d531600d (commit) via 8198d66eaf11fef2717f452c4c41da00a2e1b429 (commit) via 33d2c5fd06d3e60aead58431e268a2e42d7ea367 (commit) via 9dc526079f9cc2b5a9e5c57d7c4b54236a385263 (commit) via 6a5d74a7599f4ca6a8afcfaadfdc7b0c3c237bbd (commit) via 7d21471d9da7de10e6a830dc0259efc17e8aa840 (commit) via 3c4398cc36783ea7a321fbdc331b1160c35bebb4 (commit) via 00de47b9b5cb595a23b37e2d98d2f2fdeb92dcba (commit) via dd1f88674eb90b3af6743dae3cb48fcbf73b9a9a (commit) via b34c2cbf5974f6f7f5c20dbb86a424cdcd88fd50 (commit) via b3efc3a5938126c1010dec87d2a9d8b35d42b5ec (commit) via c4f19e17ff8eaa53b4dc52ad6054fa0611700a66 (commit) via 6833afe74673a047fa5916c95d91b76a1e449028 (commit) via 0a01c0e5591324a538b86cbe8405e7a7f6639034 (commit) via 5b70afc8934b8ca3116fd79b78eaa2a244f8d60c (commit) via d085bd096912a652b2a620821669f7dea5b5649e (commit) via 8df18050e19d4de26f326c870454f46af872de12 (commit) via cb63f4927ad9d371a675ddc995df9119bc7afc17 (commit) via 9621836c207ba1fe67ef27eb0f5f1d4b7287d849 (commit) via 6cfc62a0b8737f16a23c7c971cd5055fefb42750 (commit) via f3b37d1e92b7ee9cf9b508bd98df20df304bb958 (commit) via f235ae0cca3dc81ef9fabf2a35681ffed8505c79 (commit) via f82f9f87566e7359d0ad758dc61dc070cb29a3b0 (commit) via 03a936712182f839eec89db4ba08f0708af98dca (commit) via 6b070ed0049cd5271379c18e7a08e6f222d3b015 (commit) via 749437c8bb376d094b604c6977a7e7c037a522a0 (commit) via 8aebe561eef23310bcbb1cb2f93518a68f454231 (commit) via 9a4472e4325ca93c9bdbddfedf28de9ee724b6cc (commit) via ae2c399227295cf632250d8ba6b0ddeb984d0cae (commit) via 1f0deb99d702dee0b93e3defe2404b307c7b3530 (commit) via f38e6dde50fbe1552793f8146fa42734d522e9c9 (commit) via 4ae0303bba3df2d7d9b3470181947a0056d72e1b (commit) via 2222db6683c9dbf031cd4db8db5214efe60b6d66 (commit) via 6c30013f4baa53a1b9fba64854c5c1e5cae44809 (commit) via c248fe3323b34374070cb9df9a6d765a85e73b01 (commit) via 17a8a5233aa62740a17e8049835976f7a18e3d26 (commit) via 2e87492c26e3e9f0705efda698f6183d9c1425ea (commit) via 4d63cc7ebed68cf20b1b4e83cbfb6b8815706a4e (commit) via b6f729d172193ff03cf1ba88d1deb1c7634ee11f (commit) via 1c59134bdfcda89a91ce78f8d69836fd3a2628ec (commit) via 7cd35fab7aa468327b733ab1d5037a5e98c55e08 (commit) via e51ecd915cbd2a9222b653d70bda556411616999 (commit) via 983fa49410b5ff5805ef9f63776884fc72015f49 (commit) via 673b1af27a8d2ef318dc02b9b73aa9ce2f758fcc (commit) via ad1dd99286b8c8f0ec1323aaca6911f7f3fd4c99 (commit) via 8a5ade0a47e01bd93e19f72fcfe9691ed00f71cf (commit) via 57618ec426afa04b6553dec19c4c96971c98f5ad (commit) via 7ddfe787e54e485108ff96839495e7a6f0d490c2 (commit) via 5cb54c25cb3aa489df3cfa6065f537d72d57cf19 (commit) via cf2de4f3c12aeb90062dd7afd82120aa3e5647a7 (commit) via 270890c43c5cfc819b9d551dcfe50167976af0e2 (commit) via fbb6af74f62783e94dd623de0bb6a50d3a9325c4 (commit) via ecbb04d8adfe7d75a4f6d064fcb0f14a66613556 (commit) via c0248c645d3d100b8f2e4b6569b730cd29e7589b (commit) via 32bce0a5847fc2b5ee46698b2e6e0a3a63466d4d (commit) via 24fca164d6b861365bdc977de64a29e6107da555 (commit) via 6dacaaaa8356ad476ac631eb95b93829a5f1e3f1 (commit) via 03fc1d7dafa1157eea84f9df3f0a24f1b4b240cd (commit) via 1d27fd93c94b99ff3f6fda26106e50c4d4cf1b01 (commit) via 23f3205a3cad2be9a270bd0dc4acb57d42d8dbb2 (commit) via 376d74de0a77839136869bcc27c5f877cb4a3bc8 (commit) via 953ce0f60f25157a4fc5b5d31403433aeb47e894 (commit) via 1f45e5ca07fb6ec6e83117fdb4a3ded5fa3e2b4f (commit) via e357e8266b9d8c1590fff4177057582577277846 (commit) via 98719db2d568c5b022b93d2520db95e89f210d77 (commit) via 705275944ef0cbd6caad409f5a3b3148641fca32 (commit) via 767a08754c5f93918b9bba5e3503f0286191f179 (commit) via 2b4808f24ea2cb5413b5af069f044a2f1ac1eef2 (commit) via 66de9b29137420f14bf37f794dbec1129664676f (commit) via 5481334c9a288f9ced6967f1995d4d30d0e39e2f (commit) via 6f9bed41c2556366ed4f8bc79516e8c3c3a19ee0 (commit) via 5304b7204035eab0b7ac2664a6e1949a0689e741 (commit) via d112fcce019bbf7c536a4047927cfa248bff6239 (commit) via 54c32278dd5b119ca1157b022ebe1a1b0f945f8e (commit) via 06961b98935b57db5dd4d9b56bdd93c647ba6484 (commit) via 22f5a0bcf4a70d769e8448e05840fc9ce8fe7988 (commit) via e2cf244082f3b9993eb6d9e4f6051349f80ccbbd (commit) via cd98eb7ed25c777623ccbacac627bb4968574536 (commit) via 2247ca7cc973977e061ee894efee10faec823f1d (commit) via e41ab636a047d01b438e86d24ad4b5169d0edfe2 (commit) via f8b87a620796e228cadb86996b85f4298409ed75 (commit) via d5f56f654435a06be255e30e2f660360e6920ced (commit) via 739477d2ea4ae8e582b2355220d502443cd722a3 (commit) via c6c440e0043ee6633cb729a0bc590e9ca97d5eff (commit) via 6fb6102eb0a39b2bf48ba2dfbe98f2d7a1966935 (commit) via 60f2b8490d5a31c90886c51d081bdb802f5431d6 (commit) via 050548a939e93208a4990b6de248e3e39b3caa45 (commit) via 7aa696273c37819ebc5b9ee1040d0f194dd8145a (commit) via 570ae7eb80324580ee27cfa7ba1d20b11f779e41 (commit) via 79a87b8605dba8ae97c8f354e42f1f081b127771 (commit) via fc524fd099c95abfc3af0280e8a200e461cc9493 (commit) via a3ea5898fd82c16b66bf0ce3d5615e370deb40a8 (commit) via 69ca54a98c4e4a03e004268297644094b5541cae (commit) via 6c6f96e88fab82f42a2cd563c53e90c48eb8da24 (commit) via 1f3bc86e39b2b9d1a23946434486a99faf9d7eaf (commit) via fd0546544cd3c21641688e03ff221b031ac01ae4 (commit) via 62f126ef664982e0c8ffd132ade8bb5308833f56 (commit) via 9afd000d1a6b497e3bf4fdc0318884b412773de7 (commit) via a7bad8cec909a69bb312917406d3dfc1626f8c12 (commit) via 831a7c79908907c3702b623d0eae3a0a1f746a58 (commit) via 05cd941088d8c303f3b5f81d34a6fb336f1033a9 (commit) via f051c33ed570af222cff1fbf93802dc8844034ad (commit) via f314da645424005358b1921156218063d8ea64c2 (commit) via f47066fa8877ca56d4d58f36a5a08515593b8a2f (commit) via 1894d2f6b21c756ec5bb2ddd443e6d38a7087f2b (commit) via 808353d428ddc07d365bf1de8abcc86f0179ee08 (commit) via f9bf6a61b1860942b520069596563b2db546f927 (commit) via be4148122456b5f7a6d4032fcba44e4652f4eb0b (commit) via 228188fe426f884dd6a1743578e879350b7050ec (commit) via 03eedb3f3faa199ef9b76c30b95d4222d98dd9be (commit) via 7e8e80cf438552059d8d05797da5a4f9320127d3 (commit) via 222aee503ad0678516eaae1e638b016fb01efb09 (commit) via 5f237cd125d3d50ae322fdeaf1db314f0562830e (commit) via 95d41cef90f67e4d0b50ca7679ce5b5bffdd7532 (commit) via 8273423d3f82d599972086c6263975bfebe6c3a2 (commit) via d7210a4b81356e32907afde8bcd13d4cbf97dd00 (commit) via 1407d41f3f3150a905e8cf33e07db5042651f8ae (commit) via 4248b0bfbfb4fda8e99fee6edad8383f2afcf606 (commit) via ecbc68d2926eb4dc1299401beb741e3551a3941d (commit) via 50fcc688d2f72e751722b74e994808ad90f4c1ce (commit) via c108b24c014b002d9d0465ed895a8223a766230a (commit) via 0b071d4d11400da962b99cbff50ee42afc443b0b (commit) via ca0287f4334829367de787ba0e20947f53b6298c (commit) via 24def88c5b5227b29154cee9e05d88d119ceade8 (commit) via ba36a2d0877b66fc5b6b4055b9310b2e60a54186 (commit) via ea151122023fbd5d481a831645292fa3232b7b8b (commit) via 23ed3d8de617ebe9a31a9df73e0b5c379de1340e (commit) via e6de232ea94a34325a971da0355eecf472c7769c (commit) via f3d0633327f4ceba538ccb2657552b6069850bfe (commit) via 9f01a9f4f148c9a00ad80d5eacffd667db2cbbb7 (commit) via 83545ebc9021cad75969d41c803f5a4557c61e9a (commit) via 8d1294ce927280b8f2633b1e8636bd8aacfbf45d (commit) via 36eb4f85eaf7042a8f2bcf7a1af1f48dddd7bb45 (commit) via 6d64374a148b18ceea55608f39b0bc0d5f8cca75 (commit) via 7338eb40c61c8fcab6a6180f68c0db7e013ad9ee (commit) via 039adc9fd4f65be5beea4d7f077a54892c3310ca (commit) via f01e8cb0e33110ab72e6e828f052e7c534c84ebc (commit) via 18563e60200ee394dc974dd81ec63a48e2b96ea5 (commit) via 2bf1a9674740ca3829a86c45f0dc14a2ee3157c4 (commit) via 9253264f16cb969a88e0411ba4e8441a18406395 (commit) via b8b3f1fdeb9425c9e36e096428fc04e044f720f6 (commit) via 8c2e30aafd1d5481e28d62cbf5382687fe0b4fe7 (commit) via bff689247f6e345a4ff7505a2973d70a3e30acea (commit) via d5850b327492c870f2fba052f997dd9cea2a488f (commit) via 926c7dc0991dbe277f1802ab9074b89599cc5008 (commit) via 2f7115f30d58288fdc9b160ce621ab19d1277772 (commit) via 468ad7e97a5c82ae3ed1c39d47085811b719e8b0 (commit) via d43798f53f1a103b043af6fa6742ea347c777a2f (commit) via 7a8ab5c0db938424bfc8d2ebca6022e2673b6a9a (commit) via 28177ada352e525b622e38a5c7baf97986854288 (commit) via 702e41559e7f9cc9d84d108e467a1ec132e6f50f (commit) via 13671606829449440d65e08dd7ec8b54560c8f23 (commit) via 10d713510529c4cc86dee7c000eb400b6ae81b06 (commit) via b0e4abdd67877cc2e4a2880542028d0d15c8b3eb (commit) via bee3634bf96916ccb63248bd8fa61c16d7c25da3 (commit) via 0c9fe59c75989013c9154326a382abd22fc056f0 (commit) via 23ae23fc820468a4dc5149850f7f85bd524ebd69 (commit) via d7359f74d27661c0f8674d139ff196325426e828 (commit) via dca1995e47f24342e2a8f12fdcbd4b667b76a67e (commit) via 7dc82f982eff648874c67454a6f6e5a947104f3d (commit) via 8230a46f93849cdb60ce09173ab31687f998d07d (commit) via a9eca9b0cc4287b81b325360972175771d7f6c71 (commit) via 4862a338530bb1b435f2d6535913abe9947931b6 (commit) via 657120d7a8bc0b0e26bbb522697e75c9f5b92ec1 (commit) via c8fdfac6f7cd8e4dd91f49bf7794a579cb8a5ffc (commit) via fb2502032f279c0981185f2380ae3e4abf9d04a7 (commit) via d2af31a71301c518dd6a732ec6a29ef91f6e43d9 (commit) via 197de2aae64171ec7f71931c5c86f2d3091702ed (commit) via 5eca5ef812f5ffcd17a203dda23e55d16b0da822 (commit) via a5e3a50f5fbe85eb2b44d11ff2a6ba385011e979 (commit) via 32fd23120cff0e68ba1b02290f19e0dd48185944 (commit) via 2595c1c4e1a710d38b0c56c83921206d2473e8ae (commit) via e916823ab6bd97795ad7eaea63ad778a423b0919 (commit) via 856c60140465482aaa72f021360c4c795073ad6f (commit) via 0166ce8014b662aca4a91484eb2458e7e87be8ac (commit) via 1c74913ff22ddc869220e6ee124bcf272b188d12 (commit) via 376399e23fbbb868c8eb3ef80ee8bc9c65c5d98e (commit) via ff3082257b6f984b30131dd170f011eacd78f7e6 (commit) via c0ba7e46b390f6e744e6865192b6eb57eb95c585 (commit) via 4c6e88337126ac9344c8735b98f54aaa69daa99e (commit) via 375d3a119c4645b92fcc78767c0dba0a97c7450b (commit) via 4f3bb155a516c02c49dd085b37283ca431f4d24b (commit) via b68ae3c41607d5c2efb16bb20e0b5398183bc0a1 (commit) via 5a902f797e8dfef15f1d8d048c5f9ad156f1c192 (commit) via 529111481665902bb1459b434d8d6607c2467ca4 (commit) via 8fb9110abc5dac35858285c1b10a1cddc2e35024 (commit) via 938bc521fe3431d9a4cbcc0c7bab9c4bb616aaf4 (commit) via 9b50685d6952b3be9ff29473595b2694ea234b08 (commit) via 0b4fcdfe7d12f45c1d46f3b42589a5f2ff54e8dc (commit) via 7424dca3c956b58d494e938ed7acf90abc79d086 (commit) via ccfaa98ec85543e56211e9781267becf93ac4b9e (commit) via 8740b36ec8cfd52498f7a47d96eb0d65277e5b7a (commit) via 8bd622f7d1ff8f64cc977e17a35e8e6bc29183a8 (commit) via 3fbeec55d702bde591b5d06abe6dbe2334d4735d (commit) via f27e7165a4d1127a21c7cdb9148b986d92b401d7 (commit) via 381148cb7fe30e07d45ce8a49d87be081ba795ab (commit) via b9bf26aaa85df12dec80c1c5b822d8821ed6e9df (commit) via fbb318b4ac5ed7192722ad350298173c4d391a6b (commit) via 5649455cf8b1d1c0f073d52bda626d393dab67c3 (commit) via a640a37462d29cefa33c54e9e08c89ded77f29d3 (commit) via 05cac9e6e247823c2fc6f058da9b3904983e1edb (commit) via a4355472b2268ce43bafae38350d0e76f186c953 (commit) via a922933e28c83cbbc1bf9a2dc7ae3341b76fb2cc (commit) via 8ccded8d5db3d1918b7af875f4dbddd16dc75f28 (commit) via 284a1e7bcb18ff7bc25e53d2b636d4fe5c963205 (commit) via 855c687f17ce0468bd189e8c6f9942ad5cec2999 (commit) via 9a94775cd4eb5593fea88f5cf665bcadc198fb6f (commit) via cd30ca81e687388cf532e30e08f79b68cf56c325 (commit) via 3d2b1c49901f857eff0b30ebecaeb251d35e1755 (commit) via aa67585771f77454b95fa7b16767ef3a6ff03923 (commit) via 00e53dd09b3cc988dcd4e6e82934ff78bcb83501 (commit) via 1ab6cec8e17077b9533560c9a5bc010e95818a04 (commit) via b6be337cd4bfc4e869cc13317e36244517fb95a8 (commit) via 4022a66033df8820d07bb2abd81b9a355274bd71 (commit) via 77cde81e39386e147ac35c488d1f7c581d7bd9b8 (commit) via c73c3a034c2a655afb2edd38ed6f0dcef6050b3d (commit) via c2b5936d4d517cf0a7ee3e8d4a5d9b683249076c (commit) via d18665bf3b836e17d2ff75065b384b5ff07059e3 (commit) via 2b87e86f1392efee853a1807d7c9299fee1f7958 (commit) via 04ac7f795b17225ad7f942b85bad9508a885ee1e (commit) via cbb7c2bfaa2dedc65e56be04c1469e46be975801 (commit) via 63d6b10a662cb7b8ad0b3dfd288db7a5f921abff (commit) via c30fe6989eac02b31688733a8268ba0f4cc04891 (commit) via 83d461878939dc99bbe82269d113041fdbdc9e52 (commit) via 6770dbf44302c7d981ea50386827106748b8f3cc (commit) via 38da10cc73eaa514e7bcacc1f996eeefda503078 (commit) via cfd1ff7fa12112dcb0df038f9ecd60a5d637aa18 (commit) via 6876d4167f165dbd6b9326251171d94020c99d64 (commit) via 5b9abacfd46513064abdbc7f8ebe75c23d66b030 (commit) via 1acff5176bfbef93576185057fe527cc70b9bb5a (commit) via 9c1d88d3e0101d6764260ba190f852435335a5e2 (commit) via e09abd6390492ec30a362f91a286558388cd7bec (commit) via 9bb4a65ad72358711bb82ff45cded5462e739def (commit) via e1fc53ef3b80bbe7de9d2cd8177f465e20d78fe5 (commit) via 2ea68617e269a162c2e722fe7b3314bec1c49a60 (commit) via 391e3cfc964a8038324bcbe654d45c763082986d (commit) via e3a4c5986e5e511c7ffbb1db7a96555bb24f31b7 (commit) via d5182e428a4c3a261f307a55f3f4bee5b23791d6 (commit) via 8bd064bd60e799c45ed248e17ea9dac42960a631 (commit) via 71aca48b041b5be2cd4c6ab8d514b260bdc02b19 (commit) via 174d27300595c21a466a330fa34ab66fa7131bdf (commit) via f25a68740987eeac4539d48b7a58d189da5b28e7 (commit) via 536e528120dcf8631dbb9a8d4efd9af5541e55e0 (commit) via d5f7ad309ca59d41c6e405c512f9a3544be01ea2 (commit) via a005336f729ed3ce87bb327a6fa6441612fa20f9 (commit) via d8e8b94a89920c6c741031b0a525fec2c62a9d2d (commit) via 3727a088ffe014773472fd37a7d45346917a73a0 (commit) via 695636685fd91ce1602b135d0c0e782ca06d47e7 (commit) via adf78b01d61996d75fda7ce045e3f3f11aa3f9ed (commit) via 1231d97cfa4e89109805a7a5284d939bbd65f5f9 (commit) via 848eaaca232c394753e19a057fa732c9937a8a39 (commit) via 8aff3fd16623c50df552430e3734fc65d11a55b1 (commit) via 8df10fb5dce5cc4da3e196d0ae94494857a53f50 (commit) via 82125cbf389c2f1bc43a5c661067400efcec64c3 (commit) via 578dc43e356575b8c860f46f157c07d773843af8 (commit) via 0f1b57f2c90f00aac4aa5ea6e7240ae69690409f (commit) via 8bb55ab5b53aa70785619511fcd6457b3bb79401 (commit) via 8232b005b14d4aced35d7ce07afe9a9c35233b7e (commit) via 90e484c4fa59934da70010e4b2ff789fdbf6f40b (commit) via 1d9d45b7aac05a33ccb3cae5428a08cda19d00ce (commit) via b7491a45a621cf8b4d5c266ec39a8850172d2f02 (commit) via f9871bd640672b300b2b1790671f16694a67c184 (commit) via a1fba66076d96b9abe83d35ac2780be0fc363e1c (commit) via d19ddc6fed6d674cc555e2911c3a8a44334a0c20 (commit) via 365629a9b8ca20f729635ec74047904caca9c8d9 (commit) via 20c39c7a913544c3f542fd338568aec439fbd838 (commit) via b69c4cba35a5d7644c60cdc8b830f60bea9f4b1e (commit) via 21d8ce7bad4335a01727786b8114af348c31d3c9 (commit) via 45e57ae1f888c8c271a91d42b9231b99bd55691e (commit) via d54f0adc84bb64c23dbbc4bbb1c7885e8cd610e6 (commit) via 4010f091a89e7b2b0a606cdc3251124b609699c3 (commit) via db5331565aae1b08109f11abba655999d3774c6e (commit) via 7fa7c24b0d56039a1fef930ffe2051b74c11ebeb (commit) via 8191e3e96c966fc09587e44f98a09e42cd5985e9 (commit) via b53c930a62d5eadcb565e1c77b13a33ac3f24297 (commit) via 7f20064540e1c4bbb9ba535c37fb1533831cb217 (commit) via ff263186ffc1a8443f5733cc975ba2e7c66d2206 (commit) via f53e544eff8af4aa8fdd302a1adc98fed1b5aa35 (commit) via 9bfeec0a8b2e5604b2ce6b7ad6be62c3fd3f09c4 (commit) via fd41f88aefad9d87a8c9183f946ac14c3b564de8 (commit) via eee93ce6980e4a07c4f7d3ccb4604666691c529d (commit) via 83c3111d290cc5994b05dcc32e2ee51cb1529f1a (commit) via 7018af71d307ae84ad75a29a79d61db33d981430 (commit) via 514db2b95e68cd882d51d9a6d603fc24b6f0b2bb (commit) via 41f86e07e1ab87c390f9e570bd51ce57ac2d4d6f (commit) via f748feb7a04396a6ddd3c61407d11d02aca3034f (commit) via 61733620324195c7c1a45a770e29637a74329ebd (commit) via f868f214196101712deba5c07cc60c9e43e1f9b0 (commit) via 54341c25f149263190e4ffad1c516d93a79ad3ed (commit) via 146847f922138620cb4b1ad064cc2ad8f80bb304 (commit) via 517949e31b41b303dab91670e80b207bc45d3256 (commit) via 452bd980d066101fad780815ff5ddfccdcf5e683 (commit) via f4b94df81eab2264c071a5a6f592e6becf76f770 (commit) via 2cbbcb64c997e7ed95c2e9a344347ca9606fce66 (commit) via b0f1cb2dd42338c9189c83cbcbcb177eaf1c7845 (commit) via 98cdecd68f57b4a561ac8f68a0ede4a0374a6a95 (commit) via 097c9251aaa15f702cc8b9701832dbdc1d9bcb13 (commit) via 96f2abfd9395d6f25520c3b828c4c69a0f35d8a3 (commit) via e6c42164c51c0fbef18cb02df5c5d8f37ce16ef5 (commit) via b0415f8f7e3a4af5682f22aed1885e20f3484188 (commit) via 228fb9ad5bc2e26dccbfd4f5ad2d2228bab8c39e (commit) via 39833b146ce09d18e1909ded8c81e65c250ae0c3 (commit) via 6fa6d5d33d07596f62c10f30578ce386473c2761 (commit) via 681f4ecf69ef92a8b032591c2fd17084cc037688 (commit) via f588a09ffa90a7263dc14cd5269a8d131babec7f (commit) via 1396121a4119638bbf62405dea997c9b9286583e (commit) via 37044b98d5d98d7f58ac0aa1cc1947d85c6a1ce9 (commit) via e89728ff7261807fd29cd52d3aaed6f44038f4c9 (commit) via 41247771065e2f0d364f1311e7f872553a4987c1 (commit) via dd9da418e92f1a2e61315ccc6b57385b805f4d78 (commit) via 88c783fa2524e083934fe53ea58ce3a456cfb486 (commit) via b01bc9efd100a16bd41863de3662079c9f2bea71 (commit) via 497bc6eed8e27c0f99d02fb758b7b609cf11abca (commit) via fb24639aa584bcb7280a5b10e53d58fe6c616420 (commit) via e5c1ec684199e11e0e26931abec7485befc4f572 (commit) via 6370150b19c501e4d6b9c7119ca4e2633d7ddf8b (commit) via 38cd78a54afd10a764721f93187ef6d725470ecb (commit) via f9e3bdbc5a348de93a4dbc96ef84ef94dc5f7002 (commit) via 5d8cc153b037b8c1a9f5d34dd06b6b520bebf252 (commit) via 94d743e7fbf4243b51c523d45e4aedb4e82826d7 (commit) via 77985dde32970af531f40be2005a31a46142eec7 (commit) from c213febdfa60e0b1a9a11c796911eb5b93fef90e (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 1a015d24ef172b06ffab81007174d2b42416169f Author: Akshay Srinivasan <aks...@gm...> Date: Mon Aug 22 19:08:09 2016 +0530 update pair function diff --git a/src/utilities/functions.lisp b/src/utilities/functions.lisp index d23e0c9..1fb34f4 100644 --- a/src/utilities/functions.lisp +++ b/src/utilities/functions.lisp @@ -61,8 +61,9 @@ (mapcar (lambda (args) (apply function args)) (apply #'cart list more-lists))) (declaim (inline pair)) -(defun pair (list) - (loop :for (a . b) :on list :by #'cddr :collect (if b (list a (first b)) (list a)))) +(defun pair (list &optional (n 2)) + (loop :for x :on list :by #'(lambda (x) (nthcdr n x)) + :collect (let ((xth x)) (loop :repeat n :collect (pop xth))))) (declaim (inline zip)) (defun zip (&rest args) commit dd41ced541bba5f641349f5b0477e9c2bf0a1d39 Author: Akshay Srinivasan <aks...@gm...> Date: Sat Aug 13 14:42:00 2016 +0530 added more annotations for bit/boolean types; added order->dag diff --git a/src/base/boolean.lisp b/src/base/boolean.lisp index a8b4087..3b54a97 100644 --- a/src/base/boolean.lisp +++ b/src/base/boolean.lisp @@ -5,7 +5,7 @@ (tensor 'boolean) (deft/method (t/store-allocator #'(lambda (x) (eql (field-type x) 'boolean))) (type simple-vector-store-mixin) (size &rest initargs) `(t/store-allocator ,(tensor 'bit) ,size ,@initargs)) - (deft/method (t/store-type #'(lambda (x) (eql (field-type x) 'boolean))) (type simple-vector-store-mixin) (&optional (size '*)) + (deft/method (t/store-type #'(lambda (x) (member (field-type x) '(bit boolean)))) (type simple-vector-store-mixin) (&optional (size '*)) `(simple-bit-vector ,size)) (deft/method (t/store-ref #'(lambda (x) (eql (field-type x) 'boolean))) (type simple-vector-store-mixin) (store &rest idx) diff --git a/src/base/numeric-template.lisp b/src/base/numeric-template.lisp index 7aaeab2..15c2e5b 100644 --- a/src/base/numeric-template.lisp +++ b/src/base/numeric-template.lisp @@ -167,6 +167,9 @@ (deft/method t/strict-coerce ((from rational) (to rational)) (val) `(the rational ,val)) +(deft/method t/strict-coerce ((from boolean) (to boolean)) (val) + `(the boolean ,val)) + (deft/method t/strict-coerce ((from index-type) (to index-type)) (val) `(the index-type ,val)) ;; diff --git a/src/base/tensor-template.lisp b/src/base/tensor-template.lisp index 872f447..ad54eba 100644 --- a/src/base/tensor-template.lisp +++ b/src/base/tensor-template.lisp @@ -9,6 +9,7 @@ (defun linear-storep (cl) (match (store-type cl) ((or (list 'simple-array _ (list '*)) + (list 'simple-bit-vector '*) (guard store-type (subtypep store-type 'matlisp-ffi:foreign-vector))) t))) (defun hash-table-storep (x) (eql (store-type x) 'hash-table)) @@ -81,7 +82,9 @@ (deft/method (t/store-allocator #'linear-storep) (sym tensor) (size &rest initargs) (letv* (((&key initial-element) initargs)) (with-gensyms (sitm size-sym arr idx init) - (let ((type (second (store-type sym)))) + (let ((type (ematch (store-type sym) + ((list 'simple-array type _) type) + ((list 'simple-bit-vector _) 'bit)))) `(let*-typed ((,size-sym (t/compute-store-size ,sym (let ((,sitm ,size)) (etypecase ,sitm (index-type ,sitm) diff --git a/src/graph/graph.lisp b/src/graph/graph.lisp index 3aba27a..3045a2f 100644 --- a/src/graph/graph.lisp +++ b/src/graph/graph.lisp @@ -45,6 +45,12 @@ (collect (remove-duplicates (list i (aref order i))) result-type 'vector))) type)) +(defun order->dag (order &optional type) + (adlist->graph + (iter (for i from 0 below (length order)) + (collect (remove-duplicates (list i (aref order i))) result-type 'vector)) + type)) + (defun cliquep (g lst) (iter main (for u* on lst) (iter (for v in (cdr u*)) (or (δ-i g (car u*) v) (return-from main nil))) @@ -271,7 +277,7 @@ (declare (type graph-accessor g)) (let* ((tree (t/store-allocator index-store-vector (dimensions g 0))) (start (or start (random (length tree))))) - (setf (aref tree start) start) + (iter (for i from 0 below (length tree)) (setf (aref tree i) i)) (graphfib (g g :order (lambda (x y) (if (and x y) (< x y) (and x t)))) (:init (i) (if (= i start) 0 nil)) (:update (i w-i fib) commit 60297cf076073dde534f6197f37800d02c2852b1 Merge: 037bbdb a48ffc5 Author: Akshay Srinivasan <aks...@gm...> Date: Fri Aug 5 09:22:36 2016 +0530 Merge branch 'master' of github.com:matlisp/matlisp commit 037bbdb8d29bdaa0325ad151ad2d48bf25f02e7d Author: Akshay Srinivasan <aks...@gm...> Date: Fri Aug 5 09:22:18 2016 +0530 initialize memos slot to nil. fixes issue #11. diff --git a/src/blas/maker.lisp b/src/blas/maker.lisp index a24e847..bdadbfd 100644 --- a/src/blas/maker.lisp +++ b/src/blas/maker.lisp @@ -15,7 +15,8 @@ (slot-value ,ret 'store) ,(recursive-append (when initial-element `(if ,init (t/store-allocator ,class ,tsize :initial-element (t/coerce ,(field-type class) ,init)))) `(t/store-allocator ,class ,tsize)) - (slot-value ,ret 'parent) nil) + (slot-value ,ret 'parent) nil + (slot-value ,ret 'memos) nil) ,ret))) (deft/method (t/zeros #'hash-table-storep) (class stride-accessor) (dims &optional size) commit a48ffc59bab0eff7adbb4ae41e6172b2ccf6466f Merge: e13f678 11a6dd3 Author: akssri <aks...@gm...> Date: Fri Aug 5 09:21:15 2016 +0530 Merge pull request #12 from rigetticomputing/improve_blas_func error on unknown type to BLAS-FUNC commit 11a6dd3c1f1aad5d4c322c72df5afee323d3c186 Author: Robert Smith <ro...@ri...> Date: Thu Aug 4 10:38:27 2016 -0700 error on unknown type to BLAS-FUNC diff --git a/src/base/blas-helpers.lisp b/src/base/blas-helpers.lisp index b8fc9eb..8598cef 100644 --- a/src/base/blas-helpers.lisp +++ b/src/base/blas-helpers.lisp @@ -16,14 +16,14 @@ :finally (return (values (aref sort-std 0) perm-dims sort-std std-perm))))))))) (definline blas-func (name type) - (string+ - (cond - ((eq type 'single-float) "s") - ((eq type 'double-float) "d") - ((equal type '(complex single-float)) "c") - ((equal type '(complex double-float)) "z") - (t "error: unknown BLAS type.")) - name)) + "Return the name of a given BLAS/LAPACK function whose base name is NAME operating on the type TYPE." + (let ((prefix (cond + ((eq type 'single-float) "s") + ((eq type 'double-float) "d") + ((equal type '(complex single-float)) "c") + ((equal type '(complex double-float)) "z") + (t (error "Unknown BLAS type: ~S" type))))) + (string+ prefix name))) (definline blas-copyablep (ten-a ten-b) (declare (type stride-accessor ten-a ten-b)) diff --git a/src/utilities/macros.lisp b/src/utilities/macros.lisp index 364a8b4..3c03952 100644 --- a/src/utilities/macros.lisp +++ b/src/utilities/macros.lisp @@ -184,11 +184,6 @@ (defmacro definline (name &body rest) " Creates a function and declaims them inline: short form for defining an inlined function. - - Example: - @lisp - > (macroexpand-1 `(definline f (a b) (+ a b))) - => (INLINING (DEFUN F (A B) (+ A B))) " `(progn (declaim (inline ,name)) commit e13f6788e1c3e5dea18f37379cc7872cd02e6993 Author: Akshay Srinivasan <aks...@gm...> Date: Tue Aug 2 08:42:53 2016 +0530 saving state diff --git a/src/base/base-tensor.lisp b/src/base/base-tensor.lisp index 6def410..d6c9355 100644 --- a/src/base/base-tensor.lisp +++ b/src/base/base-tensor.lisp @@ -155,6 +155,18 @@ (deftype tensor-matrix () `(and tensor (satisfies tensor-matrixp))) (deftype tensor-square-matrix () `(and tensor (satisfies tensor-matrixp) (satisfies tensor-squarep))) ;; +(deftype tensor-type (field &key tensor order square) + (let ((types (remove nil + (list (tensor field (match tensor (* nil))) + (ematch order + (1 `(satisfies tensor-vectorp)) + (2 `(satisfies tensor-matrixp)) + (* nil)) + (ematch square + ((or '* nil) nil) + (t `(satisfies tensor-squarep))))))) + (if (cdr types) (list* 'and types) (car types)))) + (closer-mop:defgeneric tensor-generator (field tensor)) (with-memoization () diff --git a/src/blas/maker.lisp b/src/blas/maker.lisp index a635dce..a24e847 100644 --- a/src/blas/maker.lisp +++ b/src/blas/maker.lisp @@ -3,15 +3,20 @@ (deft/generic (t/zeros #'subtypep) sym (dims &optional initarg)) (deft/method t/zeros (class stride-accessor) (dims &optional initial-element) - (with-gensyms (dimsv strdv tsize init) + (with-gensyms (dimsv strdv tsize init ret) `(letv* ((,dimsv (coerce ,dims 'index-store-vector) :type index-store-vector) (,strdv ,tsize (make-stride ,dimsv) :type index-store-vector index-type) - ,@(when initial-element `((,init ,initial-element)))) - (with-no-init-checks - (make-instance ',class :dimensions ,dimsv :head 0 :strides ,strdv - :store ,(recursive-append - (when initial-element `(if ,init (t/store-allocator ,class ,tsize :initial-element (t/coerce ,(field-type class) ,init)))) - `(t/store-allocator ,class ,tsize))))))) + ,@(when initial-element `((,init ,initial-element))) + ;;(,ret (sb-pcl::allocate-standard-instance ,(sb-pcl::class-wrapper (sb-pcl::ensure-class-finalized (find-class class))))) + (,ret (allocate-instance ,(find-class class)))) + (setf (slot-value ,ret 'dimensions) ,dimsv + (slot-value ,ret 'strides) ,strdv + (slot-value ,ret 'head) 0 + (slot-value ,ret 'store) ,(recursive-append + (when initial-element `(if ,init (t/store-allocator ,class ,tsize :initial-element (t/coerce ,(field-type class) ,init)))) + `(t/store-allocator ,class ,tsize)) + (slot-value ,ret 'parent) nil) + ,ret))) (deft/method (t/zeros #'hash-table-storep) (class stride-accessor) (dims &optional size) (with-gensyms (dimsv strdv tsize) diff --git a/src/graph/graph.lisp b/src/graph/graph.lisp index 012ae7d..3aba27a 100644 --- a/src/graph/graph.lisp +++ b/src/graph/graph.lisp @@ -19,7 +19,7 @@ (iter (for u in (setf (aref ag i) (sort (aref ag i) #'< :key #'(lambda (x) (etypecase x (cons (the index-type (first x))) (index-type x)))))) (letv* ((u/ value (etypecase u (cons (the index-type (values (first u) (cdr u)))) (index-type u))) (m (aref (memoizing (fence ret)) (1+ i)))) - (setf (aref (memoizing (δ-i ret) :type index-store-vector) m) u/) + (setf (aref (memoizing (δ-i ret) :type index-store-vector) m) (modproj u/ (length ag) nil)) (if value (setf (store-ref (the graph-tensor ret) m) value))) (incf (aref (memoizing (fence ret)) (1+ i)))))) ret)) @@ -42,7 +42,7 @@ (adlist->graph (symmetrize! (iter (for i from 0 below (length order)) - (collect (if (/= (aref order i) i) (list (aref order i))) result-type 'vector))) + (collect (remove-duplicates (list i (aref order i))) result-type 'vector))) type)) (defun cliquep (g lst) diff --git a/src/packages.lisp b/src/packages.lisp index 1ef1e56..a92c09a 100644 --- a/src/packages.lisp +++ b/src/packages.lisp @@ -79,7 +79,7 @@ #:maptree-if #:maptree #:maptree-eki #:pair #:compile-and-eval #:modproj ;; - #:cart #:mapcart + #:cart #:mapcart #:infer-type #:cart-case #:cart-ecase #:cart-typecase #:cart-etypecase ;; ;;string @@ -158,7 +158,7 @@ #:tensor-class #:sparse-tensor #:stride-tensor #:dense-tensor #:simple-dense-tensor #:foreign-dense-tensor #:hash-tensor - #:orphanize #:graph-tensor #:simple-graph-tensor #:coordinate-tensor #:tensor-typep + #:orphanize #:graph-tensor #:simple-graph-tensor #:coordinate-tensor #:tensor-typep #:tensor-type #:tensor-method-generator #:define-tensor-method #:cl ;;#:tensor-matrixp #:tensor-vectorp #:tensor-squarep #:tensor-vector #:tensor-matrix #:tensor-square-matrix @@ -221,7 +221,7 @@ #:base-tensor #:tensor #:memos #:store-size #:total-size #:dorefs #:for-mod #:with-iterator #:loop-order #:uplo #:sparse-tensor #:stride-tensor #:dense-tensor #:hash-tensor #:foreign-tensor - #:orphanize #:graph-tensor #:coordinate-tensor #:tensor-typep + #:orphanize #:graph-tensor #:coordinate-tensor #:tensor-typep #:tensor-type #:tensor-method-generator #:define-tensor-method #:cl ;;#:tensor-matrixp #:tensor-vectorp #:tensor-squarep #:tensor-vector #:tensor-matrix #:tensor-square-matrix diff --git a/src/special/quaternion.lisp b/src/special/quaternion.lisp index 9aa5f93..56dc171 100644 --- a/src/special/quaternion.lisp +++ b/src/special/quaternion.lisp @@ -27,8 +27,82 @@ (b b :type ,(cl :x) :strides (1))) #i(res[0] â a[1]*b[2] - a[2]*b[1], res[1] â a[2]*b[0] - a[0]*b[2], - res[2] â a[0]*b[1] - a[1]*b[0]) + res[2] â a[0]*b[1] - a[1]*b[0]) res)) + +(definline r3-cross-ss (a b) + (declare (type #.(tensor 'double-float) a b)) + (optimize-expression ((res (make-instance ' #.(tensor 'double-float) + :dimensions #.(coerce '(3) 'index-store-vector) :strides #.(make-stride (coerce '(3) 'index-store-vector)) :head 0 :store (t/store-allocator #. (tensor 'double-float) 3)) :type #.(tensor 'double-float) :strides (1)) + (a a :type #.(tensor 'double-float) :strides (1)) + (b b :type #.(tensor 'double-float) :strides (1))) + #i(res[0] â a[1]*b[2] - a[2]*b[1], + res[1] â a[2]*b[0] - a[0]*b[2], + res[2] â a[0]*b[1] - a[1]*b[0]) + res)) + +(definline r3-cross-ss (a b) + (declare (type #.(tensor 'double-float) a b)) + ;; (make-instance ' #.(tensor 'double-float) + ;; :dimensions #.(coerce '(3) 'index-store-vector) :strides #.(make-stride (coerce '(3) 'index-store-vector)) :head 0 :store (t/store-allocator #. (tensor 'double-float) 3)) + ;; #+nil + (optimize-expression ((res (t/zeros #.(tensor 'double-float) '(3)) + #+nil(make-instance ' #.(tensor 'double-float) + :dimensions (copy-seq #.(coerce '(3) 'index-store-vector)) :strides (make-stride (copy-seq #.(coerce '(3) 'index-store-vector))) :head 0 :store (t/store-allocator #. (tensor 'double-float) 3)) :type #.(tensor 'double-float) :strides (1)) + (a a :type #.(tensor 'double-float) :strides (1)) + (b b :type #.(tensor 'double-float) :strides (1))) + #i(res[0] â a[1]*b[2] - a[2]*b[1], + res[1] â a[2]*b[0] - a[0]*b[2], + res[2] â a[0]*b[1] - a[1]*b[0]) + res)) + +;; ;;#+nil +(let ((a (randn 3)) + (b (randn 3)) + (ret 0) + (dd (idxv 3)) + (ss (idxv 1))) + (declare (type #.(tensor 'double-float) a b)) + ;;(r3-cross-ss a b) + ;;(r3-cross a b) + (time (very-quickly (dotimes (i 1000) + (r3-cross-ss a b) + ;;(r3-cross-ss a b) + ;;(aref (store (r3-cross-ss a b)) 0) + ;;(incf ret (aref (store (r3-cross-ss a b)) 0)) + #+nil + (make-instance ' #.(tensor 'double-float) + :dimensions dd :strides ss :head 0 :store (t/store-allocator #. (tensor 'double-float) 3)) + ;;(make-instance 'thingy :xx 1) + ;;(make-stride dd) + ;;(t/zeros #.(tensor 'double-float) dd) + #+nil(with-no-init-checks + (make-instance ' #.(tensor 'double-float)))))) + ;;(time (very-quickly (dotimes (i 10000) (incf ret (quaternion-x (r3-cross (the #.(quaternion 'double-float) a) (the #.(quaternion 'double-float) b))))))) + ) + +(defclass tmp () (a b)) +(allocate-instance ) + +(defmethod sb-pcl::allocate-instance ((class standard-class) &rest initargs) + (declare (ignore initargs)) + (sb-pcl::allocate-standard-instance (sb-pcl::class-wrapper class))) + + +(let ((ret 0)) + (time (very-quickly (dotimes (i 1000) + ;;(sb-pcl::allocate-standard-instance (sb-pcl::class-wrapper (find-class 'tmp))) + (allocate-instance #.(find-class 'tmp)) + )))) + +(make-instance ) + +;;TODO: remove initialize-instance methods +;;TODO: add compiler-macro to zeros + +;; (remmeth #'initialize-instance `(base-accessor) '(:after)) +;; (find-method #'initialize-instance :after (mapcar #'find-class `(stride-accessor))) + ;; (defun quat-vector~ (x) (declare (type quaternion-vector x)) @@ -76,7 +150,7 @@ (q03 #i(quat[0]*quat[3]) :type ,(field-type (cl :x))) (q11 #i(quat[1]*quat[1]) :type ,(field-type (cl :x))) (q12 #i(quat[1]*quat[2]) :type ,(field-type (cl :x))) - (q13 #i(quat[1]*quat[3]) :type ,(field-type (cl :x))) + (q13 #i(quat[1]*quat[3]) :type ,(field-type (cl :x))) (q22 #i(quat[2]*quat[2]) :type ,(field-type (cl :x))) (q23 #i(quat[2]*quat[3]) :type ,(field-type (cl :x))) (q33 #i(quat[3]*quat[3]) :type ,(field-type (cl :x)))) diff --git a/src/user/function.lisp b/src/user/function.lisp index 6c2aad7..6b0786f 100644 --- a/src/user/function.lisp +++ b/src/user/function.lisp @@ -1,5 +1,13 @@ (in-package #:matlisp-user) +;;conjugate +(definline conjugate! (a) + (tensor-conjugate! a)) + +(definline conjugate (a) + (tensor-conjugate a)) +;; + (defmacro lift-function (fn &aux (pkg (find-package "MATLISP-USER"))) (letv* ((fname (symbol-name fn)) (fpkg (symbol-package fn))) (letv* ((fn (find-symbol fname fpkg)) diff --git a/src/utilities/functions.lisp b/src/utilities/functions.lisp index 7034d68..d23e0c9 100644 --- a/src/utilities/functions.lisp +++ b/src/utilities/functions.lisp @@ -193,6 +193,22 @@ (t (assert (if open? (<= (- (1+ d)) i d) (< (- (1+ d)) i d)) nil 'tensor-index-out-of-bounds) (if (< i 0) (if (and open? (= i (- (1+ d)))) -1 (mod i d)) i)))) +(defun infer-type (expr env) + (or + (match expr + ((list 'the type _) type) + ((type number) (type-of expr)) + ((list 'quote thing) (type-of thing)) + ((type null) 'null) + #+(or sbcl) + ((type symbol) + (multiple-value-bind (binding-type localp declarations) (#+sbcl sb-cltl2:variable-information + expr env) + (declare (ignore binding-type localp)) + (let ((type-decl (find 'type declarations :key #'car))) + (and type-decl (cdr type-decl)))))) + t)) + ;; (defstruct (sap-wrap (:constructor make-sap-wrap (ptr))) ;; (ptr (cffi:null-pointer) :type cffi:foreign-pointer :read-only t)) diff --git a/src/utilities/string.lisp b/src/utilities/string.lisp index 5754f76..3998754 100644 --- a/src/utilities/string.lisp +++ b/src/utilities/string.lisp @@ -34,9 +34,10 @@ returning two values: the string and the number of bytes read." (values data fsize))) (declaim (inline split-seq)) -(defun split-seq (test seq &key max-cuts) +(defun split-seq (test seqo &key max-cuts) "Split a sequence, wherever the given character occurs." - (let ((split-list nil) (split-count 0) (deletes nil)) + (let ((seq (etypecase seqo (vector seqo) (list (coerce seqo 'vector)))) + (split-list nil) (split-count 0) (deletes nil)) (labels ((left-split (prev i) (if (not deletes) (when (< prev i) @@ -78,7 +79,9 @@ returning two values: the string and the number of bytes read." (t (left-split prev i) (setf prev (1+ i))))))))) - (values (nreverse split-list) (1- split-count)))) + (values (let ((ret (nreverse split-list))) + (etypecase seqo (vector ret) (list (mapcar #'(lambda (x) (coerce x 'list)) ret)))) + (1- split-count)))) ;; (defun splitlines (string) commit 2fb104a8a34598716dca578dea5bf8c581b6a95f Author: Akshay Srinivasan <ak...@cs...> Date: Sat Jun 18 23:10:40 2016 -0700 fixed bug in roots, added regression for polyfit; fixed bug in t:.* diff --git a/src/packages.lisp b/src/packages.lisp index b0c2c06..1ef1e56 100644 --- a/src/packages.lisp +++ b/src/packages.lisp @@ -198,7 +198,7 @@ #:norm #:psd-proj #:tensor-max #:tensor-min #:tr #:ones #:eye! #:eye #:diag #:diag~ #:rand #:randn #:randi #:rande - #:range #:linspace #:polyfit #:roots) + #:range #:linspace #:polyfit #:polyval #:roots) (:documentation "MATLISP routines")) ;;Shadowed symbols. @@ -267,7 +267,7 @@ #:norm #:psd-proj #:max #:min #:tr #:ones #:eye! #:eye #:diag #:diag~ #:rand #:randn #:randi #:rande - #:range #:linspace #:polyfit #:roots) + #:range #:linspace #:polyfit #:polyval #:roots) (:documentation "MATLISP USER")) (defpackage "MATLISP-TESTS" diff --git a/src/special/poly.lisp b/src/special/poly.lisp index cbc5ebf..171df0c 100644 --- a/src/special/poly.lisp +++ b/src/special/poly.lisp @@ -1,7 +1,8 @@ (in-package #:matlisp) -(defun polyfit (observations &aux (observations (coerce observations 'vector))) - (let* ((A (zeros (list (length observations) (length observations)))) +(defun polyfit (observations &optional n &aux (observations (coerce observations 'vector))) + (let* ((n (or n (1- (length observations)))) + (A (zeros (list (length observations) (1+ n)))) (b (zeros (dimensions A 0)))) (labels ((coeff (n k) (if (< n k) 0 (iter (for jj from n downto (- n k -1)) (multiplying jj)))) @@ -9,17 +10,22 @@ (iter (for i from 0 below (dimensions x 0)) (setf (ref x i) (* (coeff i derivative) pti)) (if (<= derivative i) (setf pti (* pti ti)))))) - (iter (for li in-vector observations) - (for (Ai bi) slicing (list A b) along 0) - (ematch li - ((λlist ti value &optional (derivative 0)) - (setf (ref bi 0) value) - (row-ti ti Ai derivative)))) - (getrs! (getrf! A) b)))) + (iter (for li in-vector observations) + (for (Ai bi) slicing (list A b) along 0) + (ematch li + ((λlist ti value &optional (derivative 0)) + (setf (ref bi 0) value) + (row-ti ti Ai derivative)))) + (lstsq A b)))) + +(defun polyval (tt poly &aux (tn 1)) + (iter (for i from 0 below (dimensions poly 0)) + (summing (* (ref poly i) tn)) + (setf tn (* tn tt)))) (defun roots (poly &aux (n (1- (dimensions poly 0)))) ;;TODO: Add a better method. (let ((A (zeros (list n n) (type-of poly)))) - (copy! 1 (diag~ A 1)) + (if (< 1 n) (copy! 1 (diag~ A 1))) (scal! (/ -1 (ref poly -1)) (copy! (subtensor~ poly '((0 -1))) (subtensor~ A '(-1 (nil nil))))) - (eig A :n))) + (eig A :nn))) diff --git a/src/user/arithmetic.lisp b/src/user/arithmetic.lisp index 1ea2a85..01a0b14 100644 --- a/src/user/arithmetic.lisp +++ b/src/user/arithmetic.lisp @@ -73,11 +73,11 @@ ((tensor null) (copy ,a)))))) (definline .* (&rest objects &aux (ret (if objects (b.* (car objects)... [truncated message content] |