Got rid of much junk inherited from geocsv-lite

.gitignore

@@ -1,18 +1,3 @@
-/resources/public/js/compiled/**
-figwheel_server.log
-pom.xml
-*jar
-/lib/
-/classes/
-/out/
-/target/
-/resources/public/vendor/
-.lein-deps-sum
-.lein-repl-history
-.lein-plugins/
-.repl
-.nrepl-port
+img/map-pins/colours/*.png
+img/map-pins/colours/*.svg
 
-resources/public/data/
-
-.rebel_readline_history

data/africa-capitals.csv

@@ -0,0 +1,58 @@
+Somaliland,Hargeisa,9.55,44.05,NULL,Africa,
+Western Sahara,El-Aaiún,27.153611,-13.203333,EH,Africa,EH
+Algeria,Algiers,36.75,3.05,DZ,Africa,DZ
+Angola,Luanda,-8.83333333333333,13.216667,AO,Africa,AO
+Benin,Porto-Novo,6.48333333333333,2.616667,BJ,Africa,BJ
+Botswana,Gaborone,-24.6333333333333,25.9,BW,Africa,BW
+Burkina Faso,Ouagadougou,12.3666666666667,-1.516667,BF,Africa,BF
+Burundi,Bujumbura,-3.36666666666667,29.35,BI,Africa,BI
+Cameroon,Yaounde,3.86666666666667,11.516667,CM,Africa,CM
+Cape Verde,Praia,14.9166666666667,-23.516667,CV,Africa,CV
+Central African Republic,Bangui,4.36666666666667,18.583333,CF,Africa,CF
+Chad,N'Djamena,12.1,15.033333,TD,Africa,TD
+Comoros,Moroni,-11.7,43.233333,KM,Africa,KM
+Democratic Republic of the Congo,Kinshasa,-4.31666666666667,15.3,CD,Africa,CD
+Republic of Congo,Brazzaville,-4.25,15.283333,CG,Africa,CG
+Cote d'Ivoire,Yamoussoukro,6.81666666666667,-5.266667,CI,Africa,CI
+Djibouti,Djibouti,11.5833333333333,43.15,DJ,Africa,DJ
+Egypt,Cairo,30.05,31.25,EG,Africa,EG
+Equatorial Guinea,Malabo,3.75,8.783333,GQ,Africa,GQ
+Eritrea,Asmara,15.3333333333333,38.933333,ER,Africa,ER
+Ethiopia,Addis Ababa,9.03333333333333,38.7,ET,Africa,ET
+Gabon,Libreville,0.383333333333333,9.45,GA,Africa,GA
+The Gambia,Banjul,13.45,-16.566667,GM,Africa,GM
+Ghana,Accra,5.55,-0.216667,GH,Africa,GH
+Guinea,Conakry,9.5,-13.7,GN,Africa,GN
+Guinea-Bissau,Bissau,11.85,-15.583333,GW,Africa,GW
+Kenya,Nairobi,-1.28333333333333,36.816667,KE,Africa,KE
+Lesotho,Maseru,-29.3166666666667,27.483333,LS,Africa,LS
+Liberia,Monrovia,6.3,-10.8,LR,Africa,LR
+Libya,Tripoli,32.8833333333333,13.166667,LY,Africa,LY
+Madagascar,Antananarivo,-18.9166666666667,47.516667,MG,Africa,MG
+Malawi,Lilongwe,-13.9666666666667,33.783333,MW,Africa,MW
+Mali,Bamako,12.65,-8,ML,Africa,ML
+Mauritania,Nouakchott,18.0666666666667,-15.966667,MR,Africa,MR
+Mauritius,Port Louis,-20.15,57.483333,MU,Africa,MU
+Morocco,Rabat,34.0166666666667,-6.816667,MA,Africa,MA
+Mozambique,Maputo,-25.95,32.583333,MZ,Africa,MZ
+Namibia,Windhoek,-22.5666666666667,17.083333,NA,Africa,NA
+Niger,Niamey,13.5166666666667,2.116667,NE,Africa,NE
+Nigeria,Abuja,9.08333333333333,7.533333,NG,Africa,NG
+Rwanda,Kigali,-1.95,30.05,RW,Africa,RW
+Saint Helena,Jamestown,-15.9333333333333,-5.716667,SH,Africa,SH
+Sao Tome and Principe,Sao Tome,0.333333333333333,6.733333,ST,Africa,ST
+Senegal,Dakar,14.7333333333333,-17.633333,SN,Africa,SN
+Seychelles,Victoria,-4.61666666666667,55.45,SC,Africa,SC
+Sierra Leone,Freetown,8.48333333333333,-13.233333,SL,Africa,SL
+Somalia,Mogadishu,2.06666666666667,45.333333,SO,Africa,SO
+South Africa,Pretoria,-25.7,28.216667,ZA,Africa,ZA
+South Sudan,Juba,4.85,31.616667,SS,Africa,SS
+Sudan,Khartoum,15.6,32.533333,SD,Africa,SD
+Swaziland,Mbabane,-26.3166666666667,31.133333,SZ,Africa,SZ
+Tanzania,Dar es Salaam,-6.8,39.283333,TZ,Africa,TZ
+Togo,Lome,6.11666666666667,1.216667,TG,Africa,TG
+Tunisia,Tunis,36.8,10.183333,TN,Africa,TN
+Uganda,Kampala,0.316666666666667,32.55,UG,Africa,UG
+Zambia,Lusaka,-15.4166666666667,28.283333,ZM,Africa,ZM
+Zimbabwe,Harare,-17.8166666666667,31.033333,ZW,Africa,ZW
+British Indian Ocean Territory,Diego Garcia,-7.3,72.4,IO,Africa,IO

data/america-capitals.csv

@@ -0,0 +1,51 @@
+Saint Martin,Marigot,18.0731,-63.0822,MF,North America,MF
+Anguilla,The Valley,18.2166666666667,-63.05,AI,North America,AI
+Antigua and Barbuda,Saint John's,17.1166666666667,-61.85,AG,North America,AG
+Argentina,Buenos Aires,-34.5833333333333,-58.666667,AR,South America,AR
+Aruba,Oranjestad,12.5166666666667,-70.033333,AW,North America,AW
+Bahamas,Nassau,25.0833333333333,-77.35,BS,North America,BS
+Barbados,Bridgetown,13.1,-59.616667,BB,North America,BB
+Belize,Belmopan,17.25,-88.766667,BZ,Central America,BZ
+Bermuda,Hamilton,32.2833333333333,-64.783333,BM,North America,BM
+Bolivia,La Paz,-16.5,-68.15,BO,South America,BO
+Brazil,Brasilia,-15.7833333333333,-47.916667,BR,South America,BR
+British Virgin Islands,Road Town,18.4166666666667,-64.616667,VG,North America,VG
+Canada,Ottawa,45.4166666666667,-75.7,CA,Central America,CA
+Cayman Islands,George Town,19.3,-81.383333,KY,North America,KY
+Chile,Santiago,-33.45,-70.666667,CL,South America,CL
+Colombia,Bogota,4.6,-74.083333,CO,South America,CO
+Costa Rica,San Jose,9.93333333333333,-84.083333,CR,Central America,CR
+Cuba,Havana,23.1166666666667,-82.35,CU,North America,CU
+Curaçao,Willemstad,12.1,-68.916667,CW,North America,CW
+Dominica,Roseau,15.3,-61.4,DM,North America,DM
+Dominican Republic,Santo Domingo,18.4666666666667,-69.9,DO,North America,DO
+Ecuador,Quito,-0.216666666666667,-78.5,EC,South America,EC
+El Salvador,San Salvador,13.7,-89.2,SV,Central America,SV
+Falkland Islands,Stanley,-51.7,-57.85,FK,South America,FK
+Greenland,Nuuk,64.1833333333333,-51.75,GL,Central America,GL
+Grenada,Saint George's,12.05,-61.75,GD,North America,GD
+Guatemala,Guatemala City,14.6166666666667,-90.516667,GT,Central America,GT
+Guyana,Georgetown,6.8,-58.15,GY,South America,GY
+Haiti,Port-au-Prince,18.5333333333333,-72.333333,HT,North America,HT
+Honduras,Tegucigalpa,14.1,-87.216667,HN,Central America,HN
+Jamaica,Kingston,18,-76.8,JM,North America,JM
+Mexico,Mexico City,19.4333333333333,-99.133333,MX,Central America,MX
+Montserrat,Plymouth,16.7,-62.216667,MS,North America,MS
+Nicaragua,Managua,12.1333333333333,-86.25,NI,Central America,NI
+Panama,Panama City,8.96666666666667,-79.533333,PA,Central America,PA
+Paraguay,Asuncion,-25.2666666666667,-57.666667,PY,South America,PY
+Peru,Lima,-12.05,-77.05,PE,South America,PE
+Puerto Rico,San Juan,18.4666666666667,-66.116667,PR,North America,PR
+Saint Barthelemy,Gustavia,17.8833333333333,-62.85,BL,North America,BL
+Saint Kitts and Nevis,Basseterre,17.3,-62.716667,KN,North America,KN
+Saint Lucia,Castries,14,-61,LC,North America,LC
+Saint Pierre and Miquelon,Saint-Pierre,46.7666666666667,-56.183333,PM,Central America,PM
+Saint Vincent and the Grenadines,Kingstown,13.1333333333333,-61.216667,VC,Central America,VC
+Sint Maarten,Philipsburg,18.0166666666667,-63.033333,SX,North America,SX
+Suriname,Paramaribo,5.83333333333333,-55.166667,SR,South America,SR
+Trinidad and Tobago,Port of Spain,10.65,-61.516667,TT,North America,TT
+Turks and Caicos Islands,Grand Turk,21.4666666666667,-71.133333,TC,North America,TC
+United States,Washington DC,38.883333,-77,US,North America,US
+Uruguay,Montevideo,-34.85,-56.166667,UY,South America,UY
+Venezuela,Caracas,10.4833333333333,-66.866667,VE,South America,VE
+US Virgin Islands,Charlotte Amalie,18.35,-64.933333,VI,North America,VI

data/asia-capitals.csv

@@ -0,0 +1,46 @@
+Palestine,Jerusalem,31.7666666666667,35.233333,PS,Asia,PS
+Afghanistan,Kabul,34.5166666666667,69.183333,AF,Asia,AF
+Bahrain,Manama,26.2333333333333,50.566667,BH,Asia,BH
+Bangladesh,Dhaka,23.7166666666667,90.4,BD,Asia,BD
+Bhutan,Thimphu,27.4666666666667,89.633333,BT,Asia,BT
+Brunei Darussalam,Bandar Seri Begawan,4.88333333333333,114.933333,BN,Asia,BN
+Myanmar,Rangoon,16.8,96.15,MM,Asia,MM
+Cambodia,Phnom Penh,11.55,104.916667,KH,Asia,KH
+China,Beijing,39.9166666666667,116.383333,CN,Asia,CN
+India,New Delhi,28.6,77.2,IN,Asia,IN
+Indonesia,Jakarta,-6.16666666666667,106.816667,ID,Asia,ID
+Iran,Tehran,35.7,51.416667,IR,Asia,IR
+Iraq,Baghdad,33.3333333333333,44.4,IQ,Asia,IQ
+Israel,Jerusalem,31.7666666666667,35.233333,IL,Asia,IL
+Japan,Tokyo,35.6833333333333,139.75,JP,Asia,JP
+Jordan,Amman,31.95,35.933333,JO,Asia,JO
+Kazakhstan,Astana,51.1666666666667,71.416667,KZ,Asia,KZ
+North Korea,Pyongyang,39.0166666666667,125.75,KP,Asia,KP
+South Korea,Seoul,37.55,126.983333,KR,Asia,KR
+Kuwait,Kuwait City,29.3666666666667,47.966667,KW,Asia,KW
+Kyrgyzstan,Bishkek,42.8666666666667,74.6,KG,Asia,KG
+Laos,Vientiane,17.9666666666667,102.6,LA,Asia,LA
+Lebanon,Beirut,33.8666666666667,35.5,LB,Asia,LB
+Malaysia,Kuala Lumpur,3.16666666666667,101.7,MY,Asia,MY
+Maldives,Male,4.16666666666667,73.5,MV,Asia,MV
+Mongolia,Ulaanbaatar,47.9166666666667,106.916667,MN,Asia,MN
+Nepal,Kathmandu,27.7166666666667,85.316667,NP,Asia,NP
+Oman,Muscat,23.6166666666667,58.583333,OM,Asia,OM
+Pakistan,Islamabad,33.6833333333333,73.05,PK,Asia,PK
+Philippines,Manila,14.6,120.966667,PH,Asia,PH
+Qatar,Doha,25.2833333333333,51.533333,QA,Asia,QA
+Saudi Arabia,Riyadh,24.65,46.7,SA,Asia,SA
+Singapore,Singapore,1.28333333333333,103.85,SG,Asia,SG
+Sri Lanka,Colombo,6.91666666666667,79.833333,LK,Asia,LK
+Syria,Damascus,33.5,36.3,SY,Asia,SY
+Taiwan,Taipei,25.0333333333333,121.516667,TW,Asia,TW
+Tajikistan,Dushanbe,38.55,68.766667,TJ,Asia,TJ
+Thailand,Bangkok,13.75,100.516667,TH,Asia,TH
+Timor-Leste,Dili,-8.58333333333333,125.6,TL,Asia,TL
+Turkmenistan,Ashgabat,37.95,58.383333,TM,Asia,TM
+United Arab Emirates,Abu Dhabi,24.4666666666667,54.366667,AE,Asia,AE
+Uzbekistan,Tashkent,41.3166666666667,69.25,UZ,Asia,UZ
+Vietnam,Hanoi,21.0333333333333,105.85,VN,Asia,VN
+Yemen,Sanaa,15.35,44.2,YE,Asia,YE
+Hong Kong,N/A,0,0,HK,Asia,HK
+Macau,N/A,0,0,MO,Asia,MO

data/country-capitals.csv

@@ -0,0 +1,246 @@
+Country,Name,Latitude,Longitude,CountryCode,Continent,Category
+Somaliland,Hargeisa,9.55,44.05,NULL,Africa,
+South Georgia and South Sandwich Islands,King Edward Point,-54.283333,-36.5,GS,Antarctica,GS
+French Southern and Antarctic Lands,Port-aux-Français,-49.35,70.216667,TF,Antarctica,TF
+Palestine,Jerusalem,31.7666666666667,35.233333,PS,Asia,PS
+Aland Islands,Mariehamn,60.116667,19.9,AX,Europe,AX
+Nauru,Yaren,-0.5477,166.920867,NR,Australia,NR
+Saint Martin,Marigot,18.0731,-63.0822,MF,North America,MF
+Tokelau,Atafu,-9.166667,-171.833333,TK,Australia,TK
+Western Sahara,El-Aaiún,27.153611,-13.203333,EH,Africa,EH
+Afghanistan,Kabul,34.5166666666667,69.183333,AF,Asia,AF
+Albania,Tirana,41.3166666666667,19.816667,AL,Europe,AL
+Algeria,Algiers,36.75,3.05,DZ,Africa,DZ
+American Samoa,Pago Pago,-14.2666666666667,-170.7,AS,Australia,AS
+Andorra,Andorra la Vella,42.5,1.516667,AD,Europe,AD
+Angola,Luanda,-8.83333333333333,13.216667,AO,Africa,AO
+Anguilla,The Valley,18.2166666666667,-63.05,AI,North America,AI
+Antigua and Barbuda,Saint John's,17.1166666666667,-61.85,AG,North America,AG
+Argentina,Buenos Aires,-34.5833333333333,-58.666667,AR,South America,AR
+Armenia,Yerevan,40.1666666666667,44.5,AM,Europe,AM
+Aruba,Oranjestad,12.5166666666667,-70.033333,AW,North America,AW
+Australia,Canberra,-35.2666666666667,149.133333,AU,Australia,AU
+Austria,Vienna,48.2,16.366667,AT,Europe,AT
+Azerbaijan,Baku,40.3833333333333,49.866667,AZ,Europe,AZ
+Bahamas,Nassau,25.0833333333333,-77.35,BS,North America,BS
+Bahrain,Manama,26.2333333333333,50.566667,BH,Asia,BH
+Bangladesh,Dhaka,23.7166666666667,90.4,BD,Asia,BD
+Barbados,Bridgetown,13.1,-59.616667,BB,North America,BB
+Belarus,Minsk,53.9,27.566667,BY,Europe,BY
+Belgium,Brussels,50.8333333333333,4.333333,BE,Europe,BE
+Belize,Belmopan,17.25,-88.766667,BZ,Central America,BZ
+Benin,Porto-Novo,6.48333333333333,2.616667,BJ,Africa,BJ
+Bermuda,Hamilton,32.2833333333333,-64.783333,BM,North America,BM
+Bhutan,Thimphu,27.4666666666667,89.633333,BT,Asia,BT
+Bolivia,La Paz,-16.5,-68.15,BO,South America,BO
+Bosnia and Herzegovina,Sarajevo,43.8666666666667,18.416667,BA,Europe,BA
+Botswana,Gaborone,-24.6333333333333,25.9,BW,Africa,BW
+Brazil,Brasilia,-15.7833333333333,-47.916667,BR,South America,BR
+British Virgin Islands,Road Town,18.4166666666667,-64.616667,VG,North America,VG
+Brunei Darussalam,Bandar Seri Begawan,4.88333333333333,114.933333,BN,Asia,BN
+Bulgaria,Sofia,42.6833333333333,23.316667,BG,Europe,BG
+Burkina Faso,Ouagadougou,12.3666666666667,-1.516667,BF,Africa,BF
+Myanmar,Rangoon,16.8,96.15,MM,Asia,MM
+Burundi,Bujumbura,-3.36666666666667,29.35,BI,Africa,BI
+Cambodia,Phnom Penh,11.55,104.916667,KH,Asia,KH
+Cameroon,Yaounde,3.86666666666667,11.516667,CM,Africa,CM
+Canada,Ottawa,45.4166666666667,-75.7,CA,Central America,CA
+Cape Verde,Praia,14.9166666666667,-23.516667,CV,Africa,CV
+Cayman Islands,George Town,19.3,-81.383333,KY,North America,KY
+Central African Republic,Bangui,4.36666666666667,18.583333,CF,Africa,CF
+Chad,N'Djamena,12.1,15.033333,TD,Africa,TD
+Chile,Santiago,-33.45,-70.666667,CL,South America,CL
+China,Beijing,39.9166666666667,116.383333,CN,Asia,CN
+Christmas Island,The Settlement,-10.4166666666667,105.716667,CX,Australia,CX
+Cocos Islands,West Island,-12.1666666666667,96.833333,CC,Australia,CC
+Colombia,Bogota,4.6,-74.083333,CO,South America,CO
+Comoros,Moroni,-11.7,43.233333,KM,Africa,KM
+Democratic Republic of the Congo,Kinshasa,-4.31666666666667,15.3,CD,Africa,CD
+Republic of Congo,Brazzaville,-4.25,15.283333,CG,Africa,CG
+Cook Islands,Avarua,-21.2,-159.766667,CK,Australia,CK
+Costa Rica,San Jose,9.93333333333333,-84.083333,CR,Central America,CR
+Cote d'Ivoire,Yamoussoukro,6.81666666666667,-5.266667,CI,Africa,CI
+Croatia,Zagreb,45.8,16,HR,Europe,HR
+Cuba,Havana,23.1166666666667,-82.35,CU,North America,CU
+Curaçao,Willemstad,12.1,-68.916667,CW,North America,CW
+Cyprus,Nicosia,35.1666666666667,33.366667,CY,Europe,CY
+Czech Republic,Prague,50.0833333333333,14.466667,CZ,Europe,CZ
+Denmark,Copenhagen,55.6666666666667,12.583333,DK,Europe,DK
+Djibouti,Djibouti,11.5833333333333,43.15,DJ,Africa,DJ
+Dominica,Roseau,15.3,-61.4,DM,North America,DM
+Dominican Republic,Santo Domingo,18.4666666666667,-69.9,DO,North America,DO
+Ecuador,Quito,-0.216666666666667,-78.5,EC,South America,EC
+Egypt,Cairo,30.05,31.25,EG,Africa,EG
+El Salvador,San Salvador,13.7,-89.2,SV,Central America,SV
+Equatorial Guinea,Malabo,3.75,8.783333,GQ,Africa,GQ
+Eritrea,Asmara,15.3333333333333,38.933333,ER,Africa,ER
+Estonia,Tallinn,59.4333333333333,24.716667,EE,Europe,EE
+Ethiopia,Addis Ababa,9.03333333333333,38.7,ET,Africa,ET
+Falkland Islands,Stanley,-51.7,-57.85,FK,South America,FK
+Faroe Islands,Torshavn,62,-6.766667,FO,Europe,FO
+Fiji,Suva,-18.1333333333333,178.416667,FJ,Australia,FJ
+Finland,Helsinki,60.1666666666667,24.933333,FI,Europe,FI
+France,Paris,48.8666666666667,2.333333,FR,Europe,FR
+French Polynesia,Papeete,-17.5333333333333,-149.566667,PF,Australia,PF
+Gabon,Libreville,0.383333333333333,9.45,GA,Africa,GA
+The Gambia,Banjul,13.45,-16.566667,GM,Africa,GM
+Georgia,Tbilisi,41.6833333333333,44.833333,GE,Europe,GE
+Germany,Berlin,52.5166666666667,13.4,DE,Europe,DE
+Ghana,Accra,5.55,-0.216667,GH,Africa,GH
+Gibraltar,Gibraltar,36.1333333333333,-5.35,GI,Europe,GI
+Greece,Athens,37.9833333333333,23.733333,GR,Europe,GR
+Greenland,Nuuk,64.1833333333333,-51.75,GL,Central America,GL
+Grenada,Saint George's,12.05,-61.75,GD,North America,GD
+Guam,Hagatna,13.4666666666667,144.733333,GU,Australia,GU
+Guatemala,Guatemala City,14.6166666666667,-90.516667,GT,Central America,GT
+Guernsey,Saint Peter Port,49.45,-2.533333,GG,Europe,GG
+Guinea,Conakry,9.5,-13.7,GN,Africa,GN
+Guinea-Bissau,Bissau,11.85,-15.583333,GW,Africa,GW
+Guyana,Georgetown,6.8,-58.15,GY,South America,GY
+Haiti,Port-au-Prince,18.5333333333333,-72.333333,HT,North America,HT
+Vatican City,Vatican City,41.9,12.45,VA,Europe,VA
+Honduras,Tegucigalpa,14.1,-87.216667,HN,Central America,HN
+Hungary,Budapest,47.5,19.083333,HU,Europe,HU
+Iceland,Reykjavik,64.15,-21.95,IS,Europe,IS
+India,New Delhi,28.6,77.2,IN,Asia,IN
+Indonesia,Jakarta,-6.16666666666667,106.816667,ID,Asia,ID
+Iran,Tehran,35.7,51.416667,IR,Asia,IR
+Iraq,Baghdad,33.3333333333333,44.4,IQ,Asia,IQ
+Ireland,Dublin,53.3166666666667,-6.233333,IE,Europe,IE
+Isle of Man,Douglas,54.15,-4.483333,IM,Europe,IM
+Israel,Jerusalem,31.7666666666667,35.233333,IL,Asia,IL
+Italy,Rome,41.9,12.483333,IT,Europe,IT
+Jamaica,Kingston,18,-76.8,JM,North America,JM
+Japan,Tokyo,35.6833333333333,139.75,JP,Asia,JP
+Jersey,Saint Helier,49.1833333333333,-2.1,JE,Europe,JE
+Jordan,Amman,31.95,35.933333,JO,Asia,JO
+Kazakhstan,Astana,51.1666666666667,71.416667,KZ,Asia,KZ
+Kenya,Nairobi,-1.28333333333333,36.816667,KE,Africa,KE
+Kiribati,Tarawa,-0.883333333333333,169.533333,KI,Australia,KI
+North Korea,Pyongyang,39.0166666666667,125.75,KP,Asia,KP
+South Korea,Seoul,37.55,126.983333,KR,Asia,KR
+Kosovo,Pristina,42.6666666666667,21.166667,KO,Europe,KO
+Kuwait,Kuwait City,29.3666666666667,47.966667,KW,Asia,KW
+Kyrgyzstan,Bishkek,42.8666666666667,74.6,KG,Asia,KG
+Laos,Vientiane,17.9666666666667,102.6,LA,Asia,LA
+Latvia,Riga,56.95,24.1,LV,Europe,LV
+Lebanon,Beirut,33.8666666666667,35.5,LB,Asia,LB
+Lesotho,Maseru,-29.3166666666667,27.483333,LS,Africa,LS
+Liberia,Monrovia,6.3,-10.8,LR,Africa,LR
+Libya,Tripoli,32.8833333333333,13.166667,LY,Africa,LY
+Liechtenstein,Vaduz,47.1333333333333,9.516667,LI,Europe,LI
+Lithuania,Vilnius,54.6833333333333,25.316667,LT,Europe,LT
+Luxembourg,Luxembourg,49.6,6.116667,LU,Europe,LU
+Macedonia,Skopje,42,21.433333,MK,Europe,MK
+Madagascar,Antananarivo,-18.9166666666667,47.516667,MG,Africa,MG
+Malawi,Lilongwe,-13.9666666666667,33.783333,MW,Africa,MW
+Malaysia,Kuala Lumpur,3.16666666666667,101.7,MY,Asia,MY
+Maldives,Male,4.16666666666667,73.5,MV,Asia,MV
+Mali,Bamako,12.65,-8,ML,Africa,ML
+Malta,Valletta,35.8833333333333,14.5,MT,Europe,MT
+Marshall Islands,Majuro,7.1,171.383333,MH,Australia,MH
+Mauritania,Nouakchott,18.0666666666667,-15.966667,MR,Africa,MR
+Mauritius,Port Louis,-20.15,57.483333,MU,Africa,MU
+Mexico,Mexico City,19.4333333333333,-99.133333,MX,Central America,MX
+Federated States of Micronesia,Palikir,6.91666666666667,158.15,FM,Australia,FM
+Moldova,Chisinau,47,28.85,MD,Europe,MD
+Monaco,Monaco,43.7333333333333,7.416667,MC,Europe,MC
+Mongolia,Ulaanbaatar,47.9166666666667,106.916667,MN,Asia,MN
+Montenegro,Podgorica,42.4333333333333,19.266667,ME,Europe,ME
+Montserrat,Plymouth,16.7,-62.216667,MS,North America,MS
+Morocco,Rabat,34.0166666666667,-6.816667,MA,Africa,MA
+Mozambique,Maputo,-25.95,32.583333,MZ,Africa,MZ
+Namibia,Windhoek,-22.5666666666667,17.083333,NA,Africa,NA
+Nepal,Kathmandu,27.7166666666667,85.316667,NP,Asia,NP
+Netherlands,Amsterdam,52.35,4.916667,NL,Europe,NL
+New Caledonia,Noumea,-22.2666666666667,166.45,NC,Australia,NC
+New Zealand,Wellington,-41.3,174.783333,NZ,Australia,NZ
+Nicaragua,Managua,12.1333333333333,-86.25,NI,Central America,NI
+Niger,Niamey,13.5166666666667,2.116667,NE,Africa,NE
+Nigeria,Abuja,9.08333333333333,7.533333,NG,Africa,NG
+Niue,Alofi,-19.0166666666667,-169.916667,NU,Australia,NU
+Norfolk Island,Kingston,-29.05,167.966667,NF,Australia,NF
+Northern Mariana Islands,Saipan,15.2,145.75,MP,Australia,MP
+Norway,Oslo,59.9166666666667,10.75,NO,Europe,NO
+Oman,Muscat,23.6166666666667,58.583333,OM,Asia,OM
+Pakistan,Islamabad,33.6833333333333,73.05,PK,Asia,PK
+Palau,Melekeok,7.48333333333333,134.633333,PW,Australia,PW
+Panama,Panama City,8.96666666666667,-79.533333,PA,Central America,PA
+Papua New Guinea,Port Moresby,-9.45,147.183333,PG,Australia,PG
+Paraguay,Asuncion,-25.2666666666667,-57.666667,PY,South America,PY
+Peru,Lima,-12.05,-77.05,PE,South America,PE
+Philippines,Manila,14.6,120.966667,PH,Asia,PH
+Pitcairn Islands,Adamstown,-25.0666666666667,-130.083333,PN,Australia,PN
+Poland,Warsaw,52.25,21,PL,Europe,PL
+Portugal,Lisbon,38.7166666666667,-9.133333,PT,Europe,PT
+Puerto Rico,San Juan,18.4666666666667,-66.116667,PR,North America,PR
+Qatar,Doha,25.2833333333333,51.533333,QA,Asia,QA
+Romania,Bucharest,44.4333333333333,26.1,RO,Europe,RO
+Russia,Moscow,55.75,37.6,RU,Europe,RU
+Rwanda,Kigali,-1.95,30.05,RW,Africa,RW
+Saint Barthelemy,Gustavia,17.8833333333333,-62.85,BL,North America,BL
+Saint Helena,Jamestown,-15.9333333333333,-5.716667,SH,Africa,SH
+Saint Kitts and Nevis,Basseterre,17.3,-62.716667,KN,North America,KN
+Saint Lucia,Castries,14,-61,LC,North America,LC
+Saint Pierre and Miquelon,Saint-Pierre,46.7666666666667,-56.183333,PM,Central America,PM
+Saint Vincent and the Grenadines,Kingstown,13.1333333333333,-61.216667,VC,Central America,VC
+Samoa,Apia,-13.8166666666667,-171.766667,WS,Australia,WS
+San Marino,San Marino,43.9333333333333,12.416667,SM,Europe,SM
+Sao Tome and Principe,Sao Tome,0.333333333333333,6.733333,ST,Africa,ST
+Saudi Arabia,Riyadh,24.65,46.7,SA,Asia,SA
+Senegal,Dakar,14.7333333333333,-17.633333,SN,Africa,SN
+Serbia,Belgrade,44.8333333333333,20.5,RS,Europe,RS
+Seychelles,Victoria,-4.61666666666667,55.45,SC,Africa,SC
+Sierra Leone,Freetown,8.48333333333333,-13.233333,SL,Africa,SL
+Singapore,Singapore,1.28333333333333,103.85,SG,Asia,SG
+Sint Maarten,Philipsburg,18.0166666666667,-63.033333,SX,North America,SX
+Slovakia,Bratislava,48.15,17.116667,SK,Europe,SK
+Slovenia,Ljubljana,46.05,14.516667,SI,Europe,SI
+Solomon Islands,Honiara,-9.43333333333333,159.95,SB,Australia,SB
+Somalia,Mogadishu,2.06666666666667,45.333333,SO,Africa,SO
+South Africa,Pretoria,-25.7,28.216667,ZA,Africa,ZA
+South Sudan,Juba,4.85,31.616667,SS,Africa,SS
+Spain,Madrid,40.4,-3.683333,ES,Europe,ES
+Sri Lanka,Colombo,6.91666666666667,79.833333,LK,Asia,LK
+Sudan,Khartoum,15.6,32.533333,SD,Africa,SD
+Suriname,Paramaribo,5.83333333333333,-55.166667,SR,South America,SR
+Svalbard,Longyearbyen,78.2166666666667,15.633333,SJ,Europe,SJ
+Swaziland,Mbabane,-26.3166666666667,31.133333,SZ,Africa,SZ
+Sweden,Stockholm,59.3333333333333,18.05,SE,Europe,SE
+Switzerland,Bern,46.9166666666667,7.466667,CH,Europe,CH
+Syria,Damascus,33.5,36.3,SY,Asia,SY
+Taiwan,Taipei,25.0333333333333,121.516667,TW,Asia,TW
+Tajikistan,Dushanbe,38.55,68.766667,TJ,Asia,TJ
+Tanzania,Dar es Salaam,-6.8,39.283333,TZ,Africa,TZ
+Thailand,Bangkok,13.75,100.516667,TH,Asia,TH
+Timor-Leste,Dili,-8.58333333333333,125.6,TL,Asia,TL
+Togo,Lome,6.11666666666667,1.216667,TG,Africa,TG
+Tonga,Nuku'alofa,-21.1333333333333,-175.2,TO,Australia,TO
+Trinidad and Tobago,Port of Spain,10.65,-61.516667,TT,North America,TT
+Tunisia,Tunis,36.8,10.183333,TN,Africa,TN
+Turkey,Ankara,39.9333333333333,32.866667,TR,Europe,TR
+Turkmenistan,Ashgabat,37.95,58.383333,TM,Asia,TM
+Turks and Caicos Islands,Grand Turk,21.4666666666667,-71.133333,TC,North America,TC
+Tuvalu,Funafuti,-8.51666666666667,179.216667,TV,Australia,TV
+Uganda,Kampala,0.316666666666667,32.55,UG,Africa,UG
+Ukraine,Kyiv,50.4333333333333,30.516667,UA,Europe,UA
+United Arab Emirates,Abu Dhabi,24.4666666666667,54.366667,AE,Asia,AE
+United Kingdom,London,51.5,-0.083333,GB,Europe,GB
+United States,Washington DC,38.883333,-77,US,North America,US
+Uruguay,Montevideo,-34.85,-56.166667,UY,South America,UY
+Uzbekistan,Tashkent,41.3166666666667,69.25,UZ,Asia,UZ
+Vanuatu,Port-Vila,-17.7333333333333,168.316667,VU,Australia,VU
+Venezuela,Caracas,10.4833333333333,-66.866667,VE,South America,VE
+Vietnam,Hanoi,21.0333333333333,105.85,VN,Asia,VN
+US Virgin Islands,Charlotte Amalie,18.35,-64.933333,VI,North America,VI
+Wallis and Futuna,Mata-Utu,-13.95,-171.933333,WF,Australia,WF
+Yemen,Sanaa,15.35,44.2,YE,Asia,YE
+Zambia,Lusaka,-15.4166666666667,28.283333,ZM,Africa,ZM
+Zimbabwe,Harare,-17.8166666666667,31.033333,ZW,Africa,ZW
+US Minor Outlying Islands,Washington DC,38.883333,-77,US,Australia,US
+Antarctica,N/A,0,0,AQ,Antarctica,AQ
+Northern Cyprus,North Nicosia,35.183333,33.366667,NULL,Europe,
+Hong Kong,N/A,0,0,HK,Asia,HK
+Heard Island and McDonald Islands,N/A,0,0,HM,Antarctica,HM
+British Indian Ocean Territory,Diego Garcia,-7.3,72.4,IO,Africa,IO
+Macau,N/A,0,0,MO,Asia,MO

data/europe-capitals.csv

@@ -0,0 +1,58 @@
+Aland Islands,Mariehamn,60.116667,19.9,AX,Europe,AX
+Albania,Tirana,41.3166666666667,19.816667,AL,Europe,AL
+Andorra,Andorra la Vella,42.5,1.516667,AD,Europe,AD
+Armenia,Yerevan,40.1666666666667,44.5,AM,Europe,AM
+Austria,Vienna,48.2,16.366667,AT,Europe,AT
+Azerbaijan,Baku,40.3833333333333,49.866667,AZ,Europe,AZ
+Belarus,Minsk,53.9,27.566667,BY,Europe,BY
+Belgium,Brussels,50.8333333333333,4.333333,BE,Europe,BE
+Bosnia and Herzegovina,Sarajevo,43.8666666666667,18.416667,BA,Europe,BA
+Bulgaria,Sofia,42.6833333333333,23.316667,BG,Europe,BG
+Croatia,Zagreb,45.8,16,HR,Europe,HR
+Cyprus,Nicosia,35.1666666666667,33.366667,CY,Europe,CY
+Czech Republic,Prague,50.0833333333333,14.466667,CZ,Europe,CZ
+Denmark,Copenhagen,55.6666666666667,12.583333,DK,Europe,DK
+Estonia,Tallinn,59.4333333333333,24.716667,EE,Europe,EE
+Faroe Islands,Torshavn,62,-6.766667,FO,Europe,FO
+Finland,Helsinki,60.1666666666667,24.933333,FI,Europe,FI
+France,Paris,48.8666666666667,2.333333,FR,Europe,FR
+Georgia,Tbilisi,41.6833333333333,44.833333,GE,Europe,GE
+Germany,Berlin,52.5166666666667,13.4,DE,Europe,DE
+Gibraltar,Gibraltar,36.1333333333333,-5.35,GI,Europe,GI
+Greece,Athens,37.9833333333333,23.733333,GR,Europe,GR
+Guernsey,Saint Peter Port,49.45,-2.533333,GG,Europe,GG
+Vatican City,Vatican City,41.9,12.45,VA,Europe,VA
+Hungary,Budapest,47.5,19.083333,HU,Europe,HU
+Iceland,Reykjavik,64.15,-21.95,IS,Europe,IS
+Ireland,Dublin,53.3166666666667,-6.233333,IE,Europe,IE
+Isle of Man,Douglas,54.15,-4.483333,IM,Europe,IM
+Italy,Rome,41.9,12.483333,IT,Europe,IT
+Jersey,Saint Helier,49.1833333333333,-2.1,JE,Europe,JE
+Kosovo,Pristina,42.6666666666667,21.166667,KO,Europe,KO
+Latvia,Riga,56.95,24.1,LV,Europe,LV
+Liechtenstein,Vaduz,47.1333333333333,9.516667,LI,Europe,LI
+Lithuania,Vilnius,54.6833333333333,25.316667,LT,Europe,LT
+Luxembourg,Luxembourg,49.6,6.116667,LU,Europe,LU
+Macedonia,Skopje,42,21.433333,MK,Europe,MK
+Malta,Valletta,35.8833333333333,14.5,MT,Europe,MT
+Moldova,Chisinau,47,28.85,MD,Europe,MD
+Monaco,Monaco,43.7333333333333,7.416667,MC,Europe,MC
+Montenegro,Podgorica,42.4333333333333,19.266667,ME,Europe,ME
+Netherlands,Amsterdam,52.35,4.916667,NL,Europe,NL
+Norway,Oslo,59.9166666666667,10.75,NO,Europe,NO
+Poland,Warsaw,52.25,21,PL,Europe,PL
+Portugal,Lisbon,38.7166666666667,-9.133333,PT,Europe,PT
+Romania,Bucharest,44.4333333333333,26.1,RO,Europe,RO
+Russia,Moscow,55.75,37.6,RU,Europe,RU
+San Marino,San Marino,43.9333333333333,12.416667,SM,Europe,SM
+Serbia,Belgrade,44.8333333333333,20.5,RS,Europe,RS
+Slovakia,Bratislava,48.15,17.116667,SK,Europe,SK
+Slovenia,Ljubljana,46.05,14.516667,SI,Europe,SI
+Spain,Madrid,40.4,-3.683333,ES,Europe,ES
+Svalbard,Longyearbyen,78.2166666666667,15.633333,SJ,Europe,SJ
+Sweden,Stockholm,59.3333333333333,18.05,SE,Europe,SE
+Switzerland,Bern,46.9166666666667,7.466667,CH,Europe,CH
+Turkey,Ankara,39.9333333333333,32.866667,TR,Europe,TR
+Ukraine,Kyiv,50.4333333333333,30.516667,UA,Europe,UA
+United Kingdom,London,51.5,-0.083333,GB,Europe,GB
+Northern Cyprus,North Nicosia,35.183333,33.366667,NULL,Europe,

data/foo

@@ -0,0 +1,59 @@
+"Country,Name,Latitude,Longitude,CountryCode,Continent\n" +
+"Somaliland,Hargeisa,9.55,44.050000,NULL,Africa\n" +
+"Western Sahara,El-Aaiún,27.153611,-13.203333,EH,Africa\n" +
+"Algeria,Algiers,36.75,3.050000,DZ,Africa\n" +
+"Angola,Luanda,-8.833333333333334,13.216667,AO,Africa\n" +
+"Benin,Porto-Novo,6.483333333333333,2.616667,BJ,Africa\n" +
+"Botswana,Gaborone,-24.633333333333333,25.900000,BW,Africa\n" +
+"Burkina Faso,Ouagadougou,12.366666666666667,-1.516667,BF,Africa\n" +
+"Burundi,Bujumbura,-3.3666666666666667,29.350000,BI,Africa\n" +
+"Cameroon,Yaounde,3.8666666666666667,11.516667,CM,Africa\n" +
+"Cape Verde,Praia,14.916666666666666,-23.516667,CV,Africa\n" +
+"Central African Republic,Bangui,4.366666666666666,18.583333,CF,Africa\n" +
+"Chad,N'Djamena,12.1,15.033333,TD,Africa\n" +
+"Comoros,Moroni,-11.7,43.233333,KM,Africa\n" +
+"Democratic Republic of the Congo,Kinshasa,-4.316666666666666,15.300000,CD,Africa\n" +
+"Republic of Congo,Brazzaville,-4.25,15.283333,CG,Africa\n" +
+"Cote d'Ivoire,Yamoussoukro,6.816666666666666,-5.266667,CI,Africa\n" +
+"Djibouti,Djibouti,11.583333333333334,43.150000,DJ,Africa\n" +
+"Egypt,Cairo,30.05,31.250000,EG,Africa\n" +
+"Equatorial Guinea,Malabo,3.75,8.783333,GQ,Africa\n" +
+"Eritrea,Asmara,15.333333333333334,38.933333,ER,Africa\n" +
+"Ethiopia,Addis Ababa,9.033333333333333,38.700000,ET,Africa\n" +
+"Gabon,Libreville,0.38333333333333336,9.450000,GA,Africa\n" +
+"The Gambia,Banjul,13.45,-16.566667,GM,Africa\n" +
+"Ghana,Accra,5.55,-0.216667,GH,Africa\n" +
+"Guinea,Conakry,9.5,-13.700000,GN,Africa\n" +
+"Guinea-Bissau,Bissau,11.85,-15.583333,GW,Africa\n" +
+"Kenya,Nairobi,-1.2833333333333332,36.816667,KE,Africa\n" +
+"Lesotho,Maseru,-29.316666666666666,27.483333,LS,Africa\n" +
+"Liberia,Monrovia,6.3,-10.800000,LR,Africa\n" +
+"Libya,Tripoli,32.88333333333333,13.166667,LY,Africa\n" +
+"Madagascar,Antananarivo,-18.916666666666668,47.516667,MG,Africa\n" +
+"Malawi,Lilongwe,-13.966666666666667,33.783333,MW,Africa\n" +
+"Mali,Bamako,12.65,-8.000000,ML,Africa\n" +
+"Mauritania,Nouakchott,18.066666666666666,-15.966667,MR,Africa\n" +
+"Mauritius,Port Louis,-20.15,57.483333,MU,Africa\n" +
+"Morocco,Rabat,34.016666666666666,-6.816667,MA,Africa\n" +
+"Mozambique,Maputo,-25.95,32.583333,MZ,Africa\n" +
+"Namibia,Windhoek,-22.566666666666666,17.083333,NA,Africa\n" +
+"Niger,Niamey,13.516666666666667,2.116667,NE,Africa\n" +
+"Nigeria,Abuja,9.083333333333334,7.533333,NG,Africa\n" +
+"Rwanda,Kigali,-1.95,30.050000,RW,Africa\n" +
+"Saint Helena,Jamestown,-15.933333333333334,-5.716667,SH,Africa\n" +
+"Sao Tome and Principe,Sao Tome,0.3333333333333333,6.733333,ST,Africa\n" +
+"Senegal,Dakar,14.733333333333333,-17.633333,SN,Africa\n" +
+"Seychelles,Victoria,-4.616666666666667,55.450000,SC,Africa\n" +
+"Sierra Leone,Freetown,8.483333333333333,-13.233333,SL,Africa\n" +
+"Somalia,Mogadishu,2.066666666666667,45.333333,SO,Africa\n" +
+"South Africa,Pretoria,-25.7,28.216667,ZA,Africa\n" +
+"South Sudan,Juba,4.85,31.616667,SS,Africa\n" +
+"Sudan,Khartoum,15.6,32.533333,SD,Africa\n" +
+"Swaziland,Mbabane,-26.316666666666666,31.133333,SZ,Africa\n" +
+"Tanzania,Dar es Salaam,-6.8,39.283333,TZ,Africa\n" +
+"Togo,Lome,6.116666666666666,1.216667,TG,Africa\n" +
+"Tunisia,Tunis,36.8,10.183333,TN,Africa\n" +
+"Uganda,Kampala,0.31666666666666665,32.550000,UG,Africa\n" +
+"Zambia,Lusaka,-15.416666666666666,28.283333,ZM,Africa\n" +
+"Zimbabwe,Harare,-17.816666666666666,31.033333,ZW,Africa\n" +
+"British Indian Ocean Territory,Diego Garcia,-7.3,72.400000,IO,Africa\n" +

dev/user.clj

@@ -1,42 +0,0 @@
-(ns user
-  (:require
-   [figwheel-sidecar.repl-api :as f]))
-
-;; user is a namespace that the Clojure runtime looks for and
-;; loads if its available
-
-;; You can place helper functions in here. This is great for starting
-;; and stopping your webserver and other development services
-
-;; The definitions in here will be available if you run "lein repl" or launch a
-;; Clojure repl some other way
-
-;; You have to ensure that the libraries you :require are listed in your dependencies
-
-;; Once you start down this path
-;; you will probably want to look at
-;; tools.namespace https://github.com/clojure/tools.namespace
-;; and Component https://github.com/stuartsierra/component
-
-
-(defn fig-start
-  "This starts the figwheel server and watch based auto-compiler."
-  []
-  ;; this call will only work as long as your :cljsbuild and
-  ;; :figwheel configurations are at the top level of your project.clj
-  ;; and are not spread across different lein profiles
-
-  ;; otherwise you can pass a configuration into start-figwheel! manually
-  (f/start-figwheel!))
-
-(defn fig-stop
-  "Stop the figwheel server and watch based auto-compiler."
-  []
-  (f/stop-figwheel!))
-
-;; if you are in an nREPL environment you will need to make sure you
-;; have setup piggieback for this to work
-(defn cljs-repl
-  "Launch a ClojureScript REPL that is connected to your build and host environment."
-  []
-  (f/cljs-repl))

docs/data/africa-capitals.csv

@@ -1,59 +0,0 @@
-Country,Name,Latitude,Longitude,CountryCode,Continent
-Somaliland,Hargeisa,9.55,44.050000,NULL,Africa
-Western Sahara,El-Aaiún,27.153611,-13.203333,EH,Africa
-Algeria,Algiers,36.75,3.050000,DZ,Africa
-Angola,Luanda,-8.833333333333334,13.216667,AO,Africa
-Benin,Porto-Novo,6.483333333333333,2.616667,BJ,Africa
-Botswana,Gaborone,-24.633333333333333,25.900000,BW,Africa
-Burkina Faso,Ouagadougou,12.366666666666667,-1.516667,BF,Africa
-Burundi,Bujumbura,-3.3666666666666667,29.350000,BI,Africa
-Cameroon,Yaounde,3.8666666666666667,11.516667,CM,Africa
-Cape Verde,Praia,14.916666666666666,-23.516667,CV,Africa
-Central African Republic,Bangui,4.366666666666666,18.583333,CF,Africa
-Chad,N'Djamena,12.1,15.033333,TD,Africa
-Comoros,Moroni,-11.7,43.233333,KM,Africa
-Democratic Republic of the Congo,Kinshasa,-4.316666666666666,15.300000,CD,Africa
-Republic of Congo,Brazzaville,-4.25,15.283333,CG,Africa
-Cote d'Ivoire,Yamoussoukro,6.816666666666666,-5.266667,CI,Africa
-Djibouti,Djibouti,11.583333333333334,43.150000,DJ,Africa
-Egypt,Cairo,30.05,31.250000,EG,Africa
-Equatorial Guinea,Malabo,3.75,8.783333,GQ,Africa
-Eritrea,Asmara,15.333333333333334,38.933333,ER,Africa
-Ethiopia,Addis Ababa,9.033333333333333,38.700000,ET,Africa
-Gabon,Libreville,0.38333333333333336,9.450000,GA,Africa
-The Gambia,Banjul,13.45,-16.566667,GM,Africa
-Ghana,Accra,5.55,-0.216667,GH,Africa
-Guinea,Conakry,9.5,-13.700000,GN,Africa
-Guinea-Bissau,Bissau,11.85,-15.583333,GW,Africa
-Kenya,Nairobi,-1.2833333333333332,36.816667,KE,Africa
-Lesotho,Maseru,-29.316666666666666,27.483333,LS,Africa
-Liberia,Monrovia,6.3,-10.800000,LR,Africa
-Libya,Tripoli,32.88333333333333,13.166667,LY,Africa
-Madagascar,Antananarivo,-18.916666666666668,47.516667,MG,Africa
-Malawi,Lilongwe,-13.966666666666667,33.783333,MW,Africa
-Mali,Bamako,12.65,-8.000000,ML,Africa
-Mauritania,Nouakchott,18.066666666666666,-15.966667,MR,Africa
-Mauritius,Port Louis,-20.15,57.483333,MU,Africa
-Morocco,Rabat,34.016666666666666,-6.816667,MA,Africa
-Mozambique,Maputo,-25.95,32.583333,MZ,Africa
-Namibia,Windhoek,-22.566666666666666,17.083333,NA,Africa
-Niger,Niamey,13.516666666666667,2.116667,NE,Africa
-Nigeria,Abuja,9.083333333333334,7.533333,NG,Africa
-Rwanda,Kigali,-1.95,30.050000,RW,Africa
-Saint Helena,Jamestown,-15.933333333333334,-5.716667,SH,Africa
-Sao Tome and Principe,Sao Tome,0.3333333333333333,6.733333,ST,Africa
-Senegal,Dakar,14.733333333333333,-17.633333,SN,Africa
-Seychelles,Victoria,-4.616666666666667,55.450000,SC,Africa
-Sierra Leone,Freetown,8.483333333333333,-13.233333,SL,Africa
-Somalia,Mogadishu,2.066666666666667,45.333333,SO,Africa
-South Africa,Pretoria,-25.7,28.216667,ZA,Africa
-South Sudan,Juba,4.85,31.616667,SS,Africa
-Sudan,Khartoum,15.6,32.533333,SD,Africa
-Swaziland,Mbabane,-26.316666666666666,31.133333,SZ,Africa
-Tanzania,Dar es Salaam,-6.8,39.283333,TZ,Africa
-Togo,Lome,6.116666666666666,1.216667,TG,Africa
-Tunisia,Tunis,36.8,10.183333,TN,Africa
-Uganda,Kampala,0.31666666666666665,32.550000,UG,Africa
-Zambia,Lusaka,-15.416666666666666,28.283333,ZM,Africa
-Zimbabwe,Harare,-17.816666666666666,31.033333,ZW,Africa
-British Indian Ocean Territory,Diego Garcia,-7.3,72.400000,IO,Africa

docs/data/america-capitals.csv

@@ -1,53 +0,0 @@
-Country,Name,Latitude,Longitude,CountryCode,Continent
-Saint Martin,Marigot,18.0731,-63.082200,MF,North America
-American Samoa,Pago Pago,-14.266666666666667,-170.700000,AS,Australia
-Anguilla,The Valley,18.216666666666665,-63.050000,AI,North America
-Antigua and Barbuda,Saint John's,17.116666666666667,-61.850000,AG,North America
-Argentina,Buenos Aires,-34.583333333333336,-58.666667,AR,South America
-Aruba,Oranjestad,12.516666666666667,-70.033333,AW,North America
-Bahamas,Nassau,25.083333333333332,-77.350000,BS,North America
-Barbados,Bridgetown,13.1,-59.616667,BB,North America
-Belize,Belmopan,17.25,-88.766667,BZ,Central America
-Bermuda,Hamilton,32.28333333333333,-64.783333,BM,North America
-Bolivia,La Paz,-16.5,-68.150000,BO,South America
-Brazil,Brasilia,-15.783333333333333,-47.916667,BR,South America
-British Virgin Islands,Road Town,18.416666666666668,-64.616667,VG,North America
-Canada,Ottawa,45.416666666666664,-75.700000,CA,Central America
-Cayman Islands,George Town,19.3,-81.383333,KY,North America
-Chile,Santiago,-33.45,-70.666667,CL,South America
-Colombia,Bogota,4.6,-74.083333,CO,South America
-Costa Rica,San Jose,9.933333333333334,-84.083333,CR,Central America
-Cuba,Havana,23.116666666666667,-82.350000,CU,North America
-Curaçao,Willemstad,12.1,-68.916667,CW,North America
-Dominica,Roseau,15.3,-61.400000,DM,North America
-Dominican Republic,Santo Domingo,18.466666666666665,-69.900000,DO,North America
-Ecuador,Quito,-0.21666666666666667,-78.500000,EC,South America
-El Salvador,San Salvador,13.7,-89.200000,SV,Central America
-Falkland Islands,Stanley,-51.7,-57.850000,FK,South America
-Greenland,Nuuk,64.18333333333334,-51.750000,GL,Central America
-Grenada,Saint George's,12.05,-61.750000,GD,North America
-Guatemala,Guatemala City,14.616666666666667,-90.516667,GT,Central America
-Guyana,Georgetown,6.8,-58.150000,GY,South America
-Haiti,Port-au-Prince,18.533333333333335,-72.333333,HT,North America
-Honduras,Tegucigalpa,14.1,-87.216667,HN,Central America
-Jamaica,Kingston,18,-76.800000,JM,North America
-Mexico,Mexico City,19.433333333333334,-99.133333,MX,Central America
-Montserrat,Plymouth,16.7,-62.216667,MS,North America
-Nicaragua,Managua,12.133333333333333,-86.250000,NI,Central America
-Panama,Panama City,8.966666666666667,-79.533333,PA,Central America
-Paraguay,Asuncion,-25.266666666666666,-57.666667,PY,South America
-Peru,Lima,-12.05,-77.050000,PE,South America
-Puerto Rico,San Juan,18.466666666666665,-66.116667,PR,North America
-Saint Barthelemy,Gustavia,17.883333333333333,-62.850000,BL,North America
-Saint Kitts and Nevis,Basseterre,17.3,-62.716667,KN,North America
-Saint Lucia,Castries,14,-61.000000,LC,North America
-Saint Pierre and Miquelon,Saint-Pierre,46.766666666666666,-56.183333,PM,Central America
-Saint Vincent and the Grenadines,Kingstown,13.133333333333333,-61.216667,VC,Central America
-Sint Maarten,Philipsburg,18.016666666666666,-63.033333,SX,North America
-Suriname,Paramaribo,5.833333333333333,-55.166667,SR,South America
-Trinidad and Tobago,Port of Spain,10.65,-61.516667,TT,North America
-Turks and Caicos Islands,Grand Turk,21.466666666666665,-71.133333,TC,North America
-United States,Washington, D.C.,38.883333,-77.000000,US,Central America
-Uruguay,Montevideo,-34.85,-56.166667,UY,South America
-Venezuela,Caracas,10.483333333333333,-66.866667,VE,South America
-US Virgin Islands,Charlotte Amalie,18.35,-64.933333,VI,North America

docs/data/country-capitals.csv

@@ -1,246 +0,0 @@
-Country,Name,Latitude,Longitude,CountryCode,Continent
-Somaliland,Hargeisa,9.55,44.050000,NULL,Africa
-South Georgia and South Sandwich Islands,King Edward Point,-54.283333,-36.500000,GS,Antarctica
-French Southern and Antarctic Lands,Port-aux-Français,-49.35,70.216667,TF,Antarctica
-Palestine,Jerusalem,31.766666666666666,35.233333,PS,Asia
-Aland Islands,Mariehamn,60.116667,19.900000,AX,Europe
-Nauru,Yaren,-0.5477,166.920867,NR,Australia
-Saint Martin,Marigot,18.0731,-63.082200,MF,North America
-Tokelau,Atafu,-9.166667,-171.833333,TK,Australia
-Western Sahara,El-Aaiún,27.153611,-13.203333,EH,Africa
-Afghanistan,Kabul,34.516666666666666,69.183333,AF,Asia
-Albania,Tirana,41.31666666666667,19.816667,AL,Europe
-Algeria,Algiers,36.75,3.050000,DZ,Africa
-American Samoa,Pago Pago,-14.266666666666667,-170.700000,AS,Australia
-Andorra,Andorra la Vella,42.5,1.516667,AD,Europe
-Angola,Luanda,-8.833333333333334,13.216667,AO,Africa
-Anguilla,The Valley,18.216666666666665,-63.050000,AI,North America
-Antigua and Barbuda,Saint John's,17.116666666666667,-61.850000,AG,North America
-Argentina,Buenos Aires,-34.583333333333336,-58.666667,AR,South America
-Armenia,Yerevan,40.166666666666664,44.500000,AM,Europe
-Aruba,Oranjestad,12.516666666666667,-70.033333,AW,North America
-Australia,Canberra,-35.266666666666666,149.133333,AU,Australia
-Austria,Vienna,48.2,16.366667,AT,Europe
-Azerbaijan,Baku,40.38333333333333,49.866667,AZ,Europe
-Bahamas,Nassau,25.083333333333332,-77.350000,BS,North America
-Bahrain,Manama,26.233333333333334,50.566667,BH,Asia
-Bangladesh,Dhaka,23.716666666666665,90.400000,BD,Asia
-Barbados,Bridgetown,13.1,-59.616667,BB,North America
-Belarus,Minsk,53.9,27.566667,BY,Europe
-Belgium,Brussels,50.833333333333336,4.333333,BE,Europe
-Belize,Belmopan,17.25,-88.766667,BZ,Central America
-Benin,Porto-Novo,6.483333333333333,2.616667,BJ,Africa
-Bermuda,Hamilton,32.28333333333333,-64.783333,BM,North America
-Bhutan,Thimphu,27.466666666666665,89.633333,BT,Asia
-Bolivia,La Paz,-16.5,-68.150000,BO,South America
-Bosnia and Herzegovina,Sarajevo,43.86666666666667,18.416667,BA,Europe
-Botswana,Gaborone,-24.633333333333333,25.900000,BW,Africa
-Brazil,Brasilia,-15.783333333333333,-47.916667,BR,South America
-British Virgin Islands,Road Town,18.416666666666668,-64.616667,VG,North America
-Brunei Darussalam,Bandar Seri Begawan,4.883333333333333,114.933333,BN,Asia
-Bulgaria,Sofia,42.68333333333333,23.316667,BG,Europe
-Burkina Faso,Ouagadougou,12.366666666666667,-1.516667,BF,Africa
-Myanmar,Rangoon,16.8,96.150000,MM,Asia
-Burundi,Bujumbura,-3.3666666666666667,29.350000,BI,Africa
-Cambodia,Phnom Penh,11.55,104.916667,KH,Asia
-Cameroon,Yaounde,3.8666666666666667,11.516667,CM,Africa
-Canada,Ottawa,45.416666666666664,-75.700000,CA,Central America
-Cape Verde,Praia,14.916666666666666,-23.516667,CV,Africa
-Cayman Islands,George Town,19.3,-81.383333,KY,North America
-Central African Republic,Bangui,4.366666666666666,18.583333,CF,Africa
-Chad,N'Djamena,12.1,15.033333,TD,Africa
-Chile,Santiago,-33.45,-70.666667,CL,South America
-China,Beijing,39.916666666666664,116.383333,CN,Asia
-Christmas Island,The Settlement,-10.416666666666666,105.716667,CX,Australia
-Cocos Islands,West Island,-12.166666666666666,96.833333,CC,Australia
-Colombia,Bogota,4.6,-74.083333,CO,South America
-Comoros,Moroni,-11.7,43.233333,KM,Africa
-Democratic Republic of the Congo,Kinshasa,-4.316666666666666,15.300000,CD,Africa
-Republic of Congo,Brazzaville,-4.25,15.283333,CG,Africa
-Cook Islands,Avarua,-21.2,-159.766667,CK,Australia
-Costa Rica,San Jose,9.933333333333334,-84.083333,CR,Central America
-Cote d'Ivoire,Yamoussoukro,6.816666666666666,-5.266667,CI,Africa
-Croatia,Zagreb,45.8,16.000000,HR,Europe
-Cuba,Havana,23.116666666666667,-82.350000,CU,North America
-Curaçao,Willemstad,12.1,-68.916667,CW,North America
-Cyprus,Nicosia,35.166666666666664,33.366667,CY,Europe
-Czech Republic,Prague,50.083333333333336,14.466667,CZ,Europe
-Denmark,Copenhagen,55.666666666666664,12.583333,DK,Europe
-Djibouti,Djibouti,11.583333333333334,43.150000,DJ,Africa
-Dominica,Roseau,15.3,-61.400000,DM,North America
-Dominican Republic,Santo Domingo,18.466666666666665,-69.900000,DO,North America
-Ecuador,Quito,-0.21666666666666667,-78.500000,EC,South America
-Egypt,Cairo,30.05,31.250000,EG,Africa
-El Salvador,San Salvador,13.7,-89.200000,SV,Central America
-Equatorial Guinea,Malabo,3.75,8.783333,GQ,Africa
-Eritrea,Asmara,15.333333333333334,38.933333,ER,Africa
-Estonia,Tallinn,59.43333333333333,24.716667,EE,Europe
-Ethiopia,Addis Ababa,9.033333333333333,38.700000,ET,Africa
-Falkland Islands,Stanley,-51.7,-57.850000,FK,South America
-Faroe Islands,Torshavn,62,-6.766667,FO,Europe
-Fiji,Suva,-18.133333333333333,178.416667,FJ,Australia
-Finland,Helsinki,60.166666666666664,24.933333,FI,Europe
-France,Paris,48.86666666666667,2.333333,FR,Europe
-French Polynesia,Papeete,-17.533333333333335,-149.566667,PF,Australia
-Gabon,Libreville,0.38333333333333336,9.450000,GA,Africa
-The Gambia,Banjul,13.45,-16.566667,GM,Africa
-Georgia,Tbilisi,41.68333333333333,44.833333,GE,Europe
-Germany,Berlin,52.516666666666666,13.400000,DE,Europe
-Ghana,Accra,5.55,-0.216667,GH,Africa
-Gibraltar,Gibraltar,36.13333333333333,-5.350000,GI,Europe
-Greece,Athens,37.983333333333334,23.733333,GR,Europe
-Greenland,Nuuk,64.18333333333334,-51.750000,GL,Central America
-Grenada,Saint George's,12.05,-61.750000,GD,North America
-Guam,Hagatna,13.466666666666667,144.733333,GU,Australia
-Guatemala,Guatemala City,14.616666666666667,-90.516667,GT,Central America
-Guernsey,Saint Peter Port,49.45,-2.533333,GG,Europe
-Guinea,Conakry,9.5,-13.700000,GN,Africa
-Guinea-Bissau,Bissau,11.85,-15.583333,GW,Africa
-Guyana,Georgetown,6.8,-58.150000,GY,South America
-Haiti,Port-au-Prince,18.533333333333335,-72.333333,HT,North America
-Vatican City,Vatican City,41.9,12.450000,VA,Europe
-Honduras,Tegucigalpa,14.1,-87.216667,HN,Central America
-Hungary,Budapest,47.5,19.083333,HU,Europe
-Iceland,Reykjavik,64.15,-21.950000,IS,Europe
-India,New Delhi,28.6,77.200000,IN,Asia
-Indonesia,Jakarta,-6.166666666666667,106.816667,ID,Asia
-Iran,Tehran,35.7,51.416667,IR,Asia
-Iraq,Baghdad,33.333333333333336,44.400000,IQ,Asia
-Ireland,Dublin,53.31666666666667,-6.233333,IE,Europe
-Isle of Man,Douglas,54.15,-4.483333,IM,Europe
-Israel,Jerusalem,31.766666666666666,35.233333,IL,Asia
-Italy,Rome,41.9,12.483333,IT,Europe
-Jamaica,Kingston,18,-76.800000,JM,North America
-Japan,Tokyo,35.68333333333333,139.750000,JP,Asia
-Jersey,Saint Helier,49.18333333333333,-2.100000,JE,Europe
-Jordan,Amman,31.95,35.933333,JO,Asia
-Kazakhstan,Astana,51.166666666666664,71.416667,KZ,Asia
-Kenya,Nairobi,-1.2833333333333332,36.816667,KE,Africa
-Kiribati,Tarawa,-0.8833333333333333,169.533333,KI,Australia
-North Korea,Pyongyang,39.016666666666666,125.750000,KP,Asia
-South Korea,Seoul,37.55,126.983333,KR,Asia
-Kosovo,Pristina,42.666666666666664,21.166667,KO,Europe
-Kuwait,Kuwait City,29.366666666666667,47.966667,KW,Asia
-Kyrgyzstan,Bishkek,42.86666666666667,74.600000,KG,Asia
-Laos,Vientiane,17.966666666666665,102.600000,LA,Asia
-Latvia,Riga,56.95,24.100000,LV,Europe
-Lebanon,Beirut,33.86666666666667,35.500000,LB,Asia
-Lesotho,Maseru,-29.316666666666666,27.483333,LS,Africa
-Liberia,Monrovia,6.3,-10.800000,LR,Africa
-Libya,Tripoli,32.88333333333333,13.166667,LY,Africa
-Liechtenstein,Vaduz,47.13333333333333,9.516667,LI,Europe
-Lithuania,Vilnius,54.68333333333333,25.316667,LT,Europe
-Luxembourg,Luxembourg,49.6,6.116667,LU,Europe
-Macedonia,Skopje,42,21.433333,MK,Europe
-Madagascar,Antananarivo,-18.916666666666668,47.516667,MG,Africa
-Malawi,Lilongwe,-13.966666666666667,33.783333,MW,Africa
-Malaysia,Kuala Lumpur,3.1666666666666665,101.700000,MY,Asia
-Maldives,Male,4.166666666666667,73.500000,MV,Asia
-Mali,Bamako,12.65,-8.000000,ML,Africa
-Malta,Valletta,35.88333333333333,14.500000,MT,Europe
-Marshall Islands,Majuro,7.1,171.383333,MH,Australia
-Mauritania,Nouakchott,18.066666666666666,-15.966667,MR,Africa
-Mauritius,Port Louis,-20.15,57.483333,MU,Africa
-Mexico,Mexico City,19.433333333333334,-99.133333,MX,Central America
-Federated States of Micronesia,Palikir,6.916666666666667,158.150000,FM,Australia
-Moldova,Chisinau,47,28.850000,MD,Europe
-Monaco,Monaco,43.733333333333334,7.416667,MC,Europe
-Mongolia,Ulaanbaatar,47.916666666666664,106.916667,MN,Asia
-Montenegro,Podgorica,42.43333333333333,19.266667,ME,Europe
-Montserrat,Plymouth,16.7,-62.216667,MS,North America
-Morocco,Rabat,34.016666666666666,-6.816667,MA,Africa
-Mozambique,Maputo,-25.95,32.583333,MZ,Africa
-Namibia,Windhoek,-22.566666666666666,17.083333,NA,Africa
-Nepal,Kathmandu,27.716666666666665,85.316667,NP,Asia
-Netherlands,Amsterdam,52.35,4.916667,NL,Europe
-New Caledonia,Noumea,-22.266666666666666,166.450000,NC,Australia
-New Zealand,Wellington,-41.3,174.783333,NZ,Australia
-Nicaragua,Managua,12.133333333333333,-86.250000,NI,Central America
-Niger,Niamey,13.516666666666667,2.116667,NE,Africa
-Nigeria,Abuja,9.083333333333334,7.533333,NG,Africa
-Niue,Alofi,-19.016666666666666,-169.916667,NU,Australia
-Norfolk Island,Kingston,-29.05,167.966667,NF,Australia
-Northern Mariana Islands,Saipan,15.2,145.750000,MP,Australia
-Norway,Oslo,59.916666666666664,10.750000,NO,Europe
-Oman,Muscat,23.616666666666667,58.583333,OM,Asia
-Pakistan,Islamabad,33.68333333333333,73.050000,PK,Asia
-Palau,Melekeok,7.483333333333333,134.633333,PW,Australia
-Panama,Panama City,8.966666666666667,-79.533333,PA,Central America
-Papua New Guinea,Port Moresby,-9.45,147.183333,PG,Australia
-Paraguay,Asuncion,-25.266666666666666,-57.666667,PY,South America
-Peru,Lima,-12.05,-77.050000,PE,South America
-Philippines,Manila,14.6,120.966667,PH,Asia
-Pitcairn Islands,Adamstown,-25.066666666666666,-130.083333,PN,Australia
-Poland,Warsaw,52.25,21.000000,PL,Europe
-Portugal,Lisbon,38.71666666666667,-9.133333,PT,Europe
-Puerto Rico,San Juan,18.466666666666665,-66.116667,PR,North America
-Qatar,Doha,25.283333333333335,51.533333,QA,Asia
-Romania,Bucharest,44.43333333333333,26.100000,RO,Europe
-Russia,Moscow,55.75,37.600000,RU,Europe
-Rwanda,Kigali,-1.95,30.050000,RW,Africa
-Saint Barthelemy,Gustavia,17.883333333333333,-62.850000,BL,North America
-Saint Helena,Jamestown,-15.933333333333334,-5.716667,SH,Africa
-Saint Kitts and Nevis,Basseterre,17.3,-62.716667,KN,North America
-Saint Lucia,Castries,14,-61.000000,LC,North America
-Saint Pierre and Miquelon,Saint-Pierre,46.766666666666666,-56.183333,PM,Central America
-Saint Vincent and the Grenadines,Kingstown,13.133333333333333,-61.216667,VC,Central America
-Samoa,Apia,-13.816666666666666,-171.766667,WS,Australia
-San Marino,San Marino,43.93333333333333,12.416667,SM,Europe
-Sao Tome and Principe,Sao Tome,0.3333333333333333,6.733333,ST,Africa
-Saudi Arabia,Riyadh,24.65,46.700000,SA,Asia
-Senegal,Dakar,14.733333333333333,-17.633333,SN,Africa
-Serbia,Belgrade,44.833333333333336,20.500000,RS,Europe
-Seychelles,Victoria,-4.616666666666667,55.450000,SC,Africa
-Sierra Leone,Freetown,8.483333333333333,-13.233333,SL,Africa
-Singapore,Singapore,1.2833333333333332,103.850000,SG,Asia
-Sint Maarten,Philipsburg,18.016666666666666,-63.033333,SX,North America
-Slovakia,Bratislava,48.15,17.116667,SK,Europe
-Slovenia,Ljubljana,46.05,14.516667,SI,Europe
-Solomon Islands,Honiara,-9.433333333333334,159.950000,SB,Australia
-Somalia,Mogadishu,2.066666666666667,45.333333,SO,Africa
-South Africa,Pretoria,-25.7,28.216667,ZA,Africa
-South Sudan,Juba,4.85,31.616667,SS,Africa
-Spain,Madrid,40.4,-3.683333,ES,Europe
-Sri Lanka,Colombo,6.916666666666667,79.833333,LK,Asia
-Sudan,Khartoum,15.6,32.533333,SD,Africa
-Suriname,Paramaribo,5.833333333333333,-55.166667,SR,South America
-Svalbard,Longyearbyen,78.21666666666667,15.633333,SJ,Europe
-Swaziland,Mbabane,-26.316666666666666,31.133333,SZ,Africa
-Sweden,Stockholm,59.333333333333336,18.050000,SE,Europe
-Switzerland,Bern,46.916666666666664,7.466667,CH,Europe
-Syria,Damascus,33.5,36.300000,SY,Asia
-Taiwan,Taipei,25.033333333333335,121.516667,TW,Asia
-Tajikistan,Dushanbe,38.55,68.766667,TJ,Asia
-Tanzania,Dar es Salaam,-6.8,39.283333,TZ,Africa
-Thailand,Bangkok,13.75,100.516667,TH,Asia
-Timor-Leste,Dili,-8.583333333333334,125.600000,TL,Asia
-Togo,Lome,6.116666666666666,1.216667,TG,Africa
-Tonga,Nuku'alofa,-21.133333333333333,-175.200000,TO,Australia
-Trinidad and Tobago,Port of Spain,10.65,-61.516667,TT,North America
-Tunisia,Tunis,36.8,10.183333,TN,Africa
-Turkey,Ankara,39.93333333333333,32.866667,TR,Europe
-Turkmenistan,Ashgabat,37.95,58.383333,TM,Asia
-Turks and Caicos Islands,Grand Turk,21.466666666666665,-71.133333,TC,North America
-Tuvalu,Funafuti,-8.516666666666667,179.216667,TV,Australia
-Uganda,Kampala,0.31666666666666665,32.550000,UG,Africa
-Ukraine,Kyiv,50.43333333333333,30.516667,UA,Europe
-United Arab Emirates,Abu Dhabi,24.466666666666665,54.366667,AE,Asia
-United Kingdom,London,51.5,-0.083333,GB,Europe
-United States,Washington, D.C.,38.883333,-77.000000,US,Central America
-Uruguay,Montevideo,-34.85,-56.166667,UY,South America
-Uzbekistan,Tashkent,41.31666666666667,69.250000,UZ,Asia
-Vanuatu,Port-Vila,-17.733333333333334,168.316667,VU,Australia
-Venezuela,Caracas,10.483333333333333,-66.866667,VE,South America
-Vietnam,Hanoi,21.033333333333335,105.850000,VN,Asia
-US Virgin Islands,Charlotte Amalie,18.35,-64.933333,VI,North America
-Wallis and Futuna,Mata-Utu,-13.95,-171.933333,WF,Australia
-Yemen,Sanaa,15.35,44.200000,YE,Asia
-Zambia,Lusaka,-15.416666666666666,28.283333,ZM,Africa
-Zimbabwe,Harare,-17.816666666666666,31.033333,ZW,Africa
-US Minor Outlying Islands,Washington, D.C.,38.883333,-77.000000,UM,Australia
-Antarctica,N/A,0,0.000000,AQ,Antarctica
-Northern Cyprus,North Nicosia,35.183333,33.366667,NULL,Europe
-Hong Kong,N/A,0,0.000000,HK,Asia
-Heard Island and McDonald Islands,N/A,0,0.000000,HM,Antarctica
-British Indian Ocean Territory,Diego Garcia,-7.3,72.400000,IO,Africa
-Macau,N/A,0,0.000000,MO,Asia

docs/data/data.csv

@@ -1,126 +0,0 @@
-Councils by Population Size,Name,Organisation ,Category,Population,,Latitude,Longitude,Co-ordinates,Demand - local (tonnes),Demand - wider (tonnes),,,
-1,Glasgow,Glasgow City Council,Planning authority - engaged,626,,55.86,-4.25,"55.86, -4.25",14398,48070,,,http://goldsmith.journeyman.cc:4444/?docid=1k5SAiQc1Llzal1x4WaR10SovEZaaKb19M1dvIeG-t1s#/map
-2,Edinburgh,City of Edinburgh Council ,Planning authority not engaged,518,,55.96,-3.18,"55.96, -3.18",11914,20631,,,
-3,Fife,Fife Council,Planning authority not engaged,372,,56.2,-3.16,"56.20, -3.16",8556,11983,,,
-4,North Lanarkshire,North Lanarkshire Council,Planning authority not engaged,340,,55.95,-3.99,"55.95, -3.99",7820,,,,
-5,South Lanarkshire,South Lanarkshire Council,Planning authority not engaged,319,,55.78,-4.05,"55.78, -4.05",7337,,,,
-6,Aberdeenshire,Aberdeenshire Council,Planning authority - engaged,261,,57.28,-2.37,"57.28, -2.37",6003,,,,
-7,Highland,Highland Council,Planning authority not engaged,235,,57.48,-4.22,"57.48, -4.22",5405,,,,
-8,Aberdeen,Aberdeen City Council.,Planning authority not engaged,228,,57.155,-2.264,"57.155, -2.264",5244,,,,
-9,West Lothian,West Lothian Council,Planning authority not engaged,182,,55.93,-3.46,"55.93, -3.46",4186,,,,
-10,Renfrewshire,Renfrewshire Council,Planning authority not engaged,178,3259,55.84,-4.42,"55.84, -4.42",4094,,,,
-11,Falkirk,Falkirk Council,Planning authority not engaged,160,,55.99,-3.78,"55.99,-3.78",3680,,,,
-12,Perth and Kinross,Perth and Kinross Council,Planning authority not engaged,151,,56.39,-3.43,"56.39, -3.43",3473,,,,
-13,Dumfries and Galloway,Dumfries and Galloway Council.,Planning authority not engaged,149,,55.07,-3.603,"55.07,-3.603",3427,,,,
-14,Dundee,Dundee City Council.,Planning authority not engaged,149,,56.28,-2.58,"56.28, -2.58",3427,,,,
-15,North Ayrshire,North Ayrshire Council,Planning authority not engaged,135,,55.61,-4.67,"55.61, -4.67",3105,,,,
-16,East Ayrshire,East Ayrshire Council,Planning authority not engaged,122,,55.61,-4.5,"55.61, -4.5",2806,,,,
-17,Angus,Angus Council.,Planning authority not engaged,116,,56.65,-2.88,"56.65, -2.88",2668,,,,
-18,Scottish Borders,Scottish Borders Council,Planning authority not engaged,115,,55.61,-2.8,"55.61, -2.80",2645,,,,
-19,South Ayrshire,South Ayrshire Council,Planning authority not engaged,113,,55.46,-4.62,"55.46, -4.62",2599,,,,
-20,East Dunbartonshire,East Dunbartonshire Council,Planning authority not engaged,108,,55.94,-5.15,"55.95, -5.15",2484,,,,
-21,East Lothian,East Lothian Council,Planning authority not engaged,106,,55.95,-2.78,"55.95, -2.78",2438,,,,
-22,Moray,Moray Council,Planning authority not engaged,96,,57.65,-3.31,"57.65, -3.31",2208,,,,
-23,East Renfrewshire,East Renfrewshire Council,Planning authority not engaged,95,,55.79,-4.31,"55.79, -4.31",2185,,,,
-24,Stirling,Stirling Council,Planning authority not engaged,94,,56.11,-3.94,"56.11, -3.94",2162,,,,
-25,Midlothian,Midlothian Council,Planning authority not engaged,91,,55.89,-3.07,"55.89, -3.07",2093,,,,
-26,West Dunbartonshire,West Dunbartonshire Council,Planning authority not engaged,89,,55.94,-4.56,"55.94, -4.56",2047,,,,
-27,Argyll and Bute,Argyll and Bute Council.,Planning authority not engaged,86,,56.03,-5.45,"56.03, -5.45",1978,,,,
-28,Inverclyde,Inverclyde Council,Planning authority not engaged,78,,55.95,-4.76,"55.95, -4.76",1794,,,,
-29,Clackmannanshire,Clackmannanshire Council.,Planning authority not engaged,51,,56.11,-3.789,"56.11, -3.789",1173,,,,
-30,Na h-Eileanan Siar,Comhairle nan Eilean Siar (Western Isles) Council,Planning authority not engaged,26,,58.209,-6.378,"58.209, -6.378",598,,,,
-31,Shetland,Shetland Islands Council,Planning authority not engaged,23,,60.25,-1.146,"60.25, -1.146",529,,,,
-32,Orkney,Orkney Islands Council,Planning authority - engaged,22,,58.97,-2.97,"58.97, -2.97",506,,,,
-,,,Total,5434,,,,,,,,,
-Orkney ,"Orkney Power
-",,Power supplier,,,59,-3,"59, -3",,,,,
-,Orkney Estates,,Landowner,,,58.98,-2.95,"58.98, -2.95",,,,,
-,Orkney College,,Operator,,,58.97,-2.96,,,,,,
-,UHI,,Higher education,,,58.986,-2.947,,,,,,
-,Orkney Council,,Champion,,,58.99,-2.93,,,,,,
-,,,,,,,,,,,,,
-,,,,,,,,,,,,,
-Glasgow,Glasgow Markets,,Landowner,,,55.869,-4.212,,,,,,
-,SEC,,Anchor Customer,,,55.86,-4.287,,,,,,
-,Regent Capital,,Developer,,,55.86,-4.26,,,,,,
-,Scottish Power,,Power supplier,,,55.866,-4.2,,,,,,
-,"
-",,Operator,,,,,,,,,,
-,City of Glasgow Council,,Champion,,,55.85,-4.25,,,,,,
-,City Fibre,,Broadband-supplier,,,55.87,-4.22,,,,,,
-,,,,,,,,,,,,,
-Fife ,,,Landowner,,,,,,,,,,
-,,,Anchor Customer,,,,,,,,,,
-,,,Developer,,,,,,,,,,
-,SSE,,Power supplier,,,56.33,-2.98,,,,,,
-,East of Scotland Growers ,,Operator,,,56.33,-2.97,,,,,,
-,BT,,Broadband-supplier,,,56.32,-2.97,,,,,,
-,Fife Council,,Champion,,,56.32,-2.975,,,,,,
-Gleneagles,Gleneagles Hotel,"
-",Landowner,,,56.28,-3.75,,,,,,
-,Gleneagles Hotel,,Anchor Customer,,,56.285,-3.74,,,,,,
-,Ennismore,,Developer,,,56.29,-3.73,,,,,,
-,SSE,,Power supplier,,,56.28,-3.73,,,,,,
-,,,Operator,,,,,,,,,,
-,BT,,Broadband-supplier,,,56.286,-3.745,,,,,,
-,Perth & Kinross Council,,Champion,,,56.285,-3.73,,,,,,
-,,,,,,,,,,,,,
-Edinburgh ,Forth Ports,,Landowner,,,55.979,-3.159,,,,,,
-,Edinburgh Restaurants Alliance,,Anchor Customer,,,55.976,-3.172,,,,,,
-,Regent Capital,,Developer,,,55.977,-3.166,,,,,,
-,Scottish Power,,Power supplier,,,55.976,-3.164,,,,,,
-,,,Operator,,,,,,,,,,
-,City Fibre,,Broadband-supplier,,,55.974,-3.169,,,,,,
-,"Scottish Government 
-",,Champion,,,55.977,-3.174,,,,,,
-,,,,,,,,,,,,,
-Moray,Baxters Foods ,,Landowner,,,57.625,-3.099,,,,,,
-,Baxter Foods,,Anchor Customer,,,57.62,-3.105,,,,,,
-,Regent Capital,,Developer,,,57.62,-3.12,,,,,,
-,SSE,,Power supplier,,,57.63,-3.108,,,,,,
-,,,Operator,,,,,,,,,,
-,BT,,Broadband-supplier,,,57.63,-3.15,,,,,,
-,Moray Council,,Champion,,,57.62,-3.14,,,,,,
-,,,,,,,,,,,,,
-Falkirk ,Scottish Canals,,Landowner,,,55.999,-3.839,,,,,,
-,Scottish Co-ops,,Anchor Customer,,,56.002,-3.836,,,,,,
-,Regent Capital,,Developer,,,56,-3.846,,,,,,
-,Scottish Power,,Power supplier,,,56,-3.854,,,,,,
-,,,Operator,,,,,,,,,,
-,Vodaphone,,Broadband-supplier,,,56,-3.82,,,,,,
-,Falkirk Council,,Champion,,,55.99,-3.839,,,,,,
-,,,,,,,,,,,,,
-,,,,,,,,,,,,,
-Fort William,Liberty Steel/GFG,,Landowner,,,56.829,-5.072,,,,,,
-,Multiples,,Anchor Customer,,,56.828,-5.081,,,,,,
-,GFG,,Developer,,,56.829,-5.076,,,,,,
-,GFG,,Power supplier,,,56.84,-5.069,,,,,,
-,,,Operator,,,,,,,,,,
-,Vodaphone,,Broadband-supplier,,,56.827,-5.084,,,,,,
-,Highland Council,,Champion,,,56.822,-5.087,,,,,,
-,,,,,,,,,,,,,
-,,,,,,,,,,,,,
-Aberdeen,Wood Group,,Landowner,,,57.187,-2.083,,,,,,
-,,,Anchor Customer,,,,,,,,,,
-,Regent Capital,,Developer,,,57.17,-2.113,,,,,,
-,SSE,,Power supplier,,,57.188,-2.127,,,,,,
-,ONE,,Operator,,,57.125,-2.097,,,,,,
-,IFB,,Broadband-supplier,,,57.138,-2.074,,,,,,
-,Opportunity North East,,Champion,,,57.148,-2.105,,,,,,
-,,,,,,,,,,,,,
-,,,,,,,,,,,,,
-Western Isles,Western Isles Council,,Landowner,,,58.208,-6.425,,,,,,
-,,,Anchor Customer,,,,,,,,,,
-,,,Developer,,,,,,,,,,
-,Point & Sandwick Trust,,Power supplier,,,58.201,-6.272,,,,,,
-,,,Operator,,,,,,,,,,
-,Vodaphone,,Broadband-supplier,,,58.209,-6.397,,,,,,
-,Western Isles Council,,Champion,,,58.21,-6.377,,,,,,
-,,,,,,,,,,,,,
-Galloway,,,Landowner,,,54.849,-3.869,,,,,,
-,,,Anchor Customer,,,,,,,,,,
-,,,Developer,,,,,,,,,,
-,SSE,,Power supplier,,,54.847,-3.881,,,,,,
-,,,Operator,,,,,,,,,,
-,Vodaphone,,Broadband-supplier,,,,,,,,,,
-,South of Scotland Enterprise Partnership,,Champion,,,54.834,-3.877,,,,,,

docs/data/europe-capitals.csv

@@ -1,59 +0,0 @@
-Country,Name,Latitude,Longitude,CountryCode,Continent
-Aland Islands,Mariehamn,60.116667,19.900000,AX,Europe
-Albania,Tirana,41.31666666666667,19.816667,AL,Europe
-Andorra,Andorra la Vella,42.5,1.516667,AD,Europe
-Armenia,Yerevan,40.166666666666664,44.500000,AM,Europe
-Austria,Vienna,48.2,16.366667,AT,Europe
-Azerbaijan,Baku,40.38333333333333,49.866667,AZ,Europe
-Belarus,Minsk,53.9,27.566667,BY,Europe
-Belgium,Brussels,50.833333333333336,4.333333,BE,Europe
-Bosnia and Herzegovina,Sarajevo,43.86666666666667,18.416667,BA,Europe
-Bulgaria,Sofia,42.68333333333333,23.316667,BG,Europe
-Croatia,Zagreb,45.8,16.000000,HR,Europe
-Cyprus,Nicosia,35.166666666666664,33.366667,CY,Europe
-Czech Republic,Prague,50.083333333333336,14.466667,CZ,Europe
-Denmark,Copenhagen,55.666666666666664,12.583333,DK,Europe
-Estonia,Tallinn,59.43333333333333,24.716667,EE,Europe
-Faroe Islands,Torshavn,62,-6.766667,FO,Europe
-Finland,Helsinki,60.166666666666664,24.933333,FI,Europe
-France,Paris,48.86666666666667,2.333333,FR,Europe
-Georgia,Tbilisi,41.68333333333333,44.833333,GE,Europe
-Germany,Berlin,52.516666666666666,13.400000,DE,Europe
-Gibraltar,Gibraltar,36.13333333333333,-5.350000,GI,Europe
-Greece,Athens,37.983333333333334,23.733333,GR,Europe
-Guernsey,Saint Peter Port,49.45,-2.533333,GG,Europe
-Vatican City,Vatican City,41.9,12.450000,VA,Europe
-Hungary,Budapest,47.5,19.083333,HU,Europe
-Iceland,Reykjavik,64.15,-21.950000,IS,Europe
-Ireland,Dublin,53.31666666666667,-6.233333,IE,Europe
-Isle of Man,Douglas,54.15,-4.483333,IM,Europe
-Italy,Rome,41.9,12.483333,IT,Europe
-Jersey,Saint Helier,49.18333333333333,-2.100000,JE,Europe
-Kosovo,Pristina,42.666666666666664,21.166667,KO,Europe
-Latvia,Riga,56.95,24.100000,LV,Europe
-Liechtenstein,Vaduz,47.13333333333333,9.516667,LI,Europe
-Lithuania,Vilnius,54.68333333333333,25.316667,LT,Europe
-Luxembourg,Luxembourg,49.6,6.116667,LU,Europe
-Macedonia,Skopje,42,21.433333,MK,Europe
-Malta,Valletta,35.88333333333333,14.500000,MT,Europe
-Moldova,Chisinau,47,28.850000,MD,Europe
-Monaco,Monaco,43.733333333333334,7.416667,MC,Europe
-Montenegro,Podgorica,42.43333333333333,19.266667,ME,Europe
-Netherlands,Amsterdam,52.35,4.916667,NL,Europe
-Norway,Oslo,59.916666666666664,10.750000,NO,Europe
-Poland,Warsaw,52.25,21.000000,PL,Europe
-Portugal,Lisbon,38.71666666666667,-9.133333,PT,Europe
-Romania,Bucharest,44.43333333333333,26.100000,RO,Europe
-Russia,Moscow,55.75,37.600000,RU,Europe
-San Marino,San Marino,43.93333333333333,12.416667,SM,Europe
-Serbia,Belgrade,44.833333333333336,20.500000,RS,Europe
-Slovakia,Bratislava,48.15,17.116667,SK,Europe
-Slovenia,Ljubljana,46.05,14.516667,SI,Europe
-Spain,Madrid,40.4,-3.683333,ES,Europe
-Svalbard,Longyearbyen,78.21666666666667,15.633333,SJ,Europe
-Sweden,Stockholm,59.333333333333336,18.050000,SE,Europe
-Switzerland,Bern,46.916666666666664,7.466667,CH,Europe
-Turkey,Ankara,39.93333333333333,32.866667,TR,Europe
-Ukraine,Kyiv,50.43333333333333,30.516667,UA,Europe
-United Kingdom,London,51.5,-0.083333,GB,Europe
-Northern Cyprus,North Nicosia,35.183333,33.366667,NULL,Europe

docs/index.html

@@ -1,263 +0,0 @@
-<!DOCTYPE html>
-<html>
-  <head>
-    <title>GeoCSV Lite</title>
-    <meta charset="UTF-8">
-    <meta name="viewport" content="width=device-width, initial-scale=1">
-    <link href="css/style.css" rel="stylesheet" type="text/css">
-    <link rel="icon" href="favicon.ico">
-    <if you prefer loading libraries from standard hosts, uncomment this and
-comment out the local source -->
-    <link rel="stylesheet" href="https://unpkg.com/leaflet@1.6.0/dist/leaflet.css"
-integrity="sha512-xwE/Az9zrjBIphAcBb3F6JVqxf46+CDLwfLMHloNu6KEQCAWi6HcDUbeOfBIptF7tcCzusKFjFw2yuvEpDL9wQ=="
-crossorigin=""/ -->
-    <!-- link rel="stylesheet" href="vendor/node_modules/leaflet/dist/leaflet.css" type="text/css" -->
-    <!-- if you prefer loading libraries from standard hosts, un comment this and
-  comment out the local source -->
-    <script src="https://unpkg.com/leaflet@1.6.0/dist/leaflet.js"
-  integrity="sha512-gZwIG9x3wUXg2hdXF6+rVkLF/0Vi9U8D2Ntg4Ga5I5BZpVkVxlJWbSQtXPSiUTtC0TjtGOmxa1AJPuV0CPthew=="
-  crossorigin=""></script>
-    <script src="https://cdnjs.cloudflare.com/ajax/libs/PapaParse/5.1.0/papaparse.min.js"></script>
-    <!-- script src="vendor/node_modules/leaflet/dist/leaflet.js"></script -->
-    <!-- script src="vendor/node_modules/papaparse/papaparse.min.js"></script -->
-  </head>
-  <body>
-    <h1>GeoCSV Lite</h1>
-    <h4>
-      An ultra-lightweight tool to show comma-separated value data on a map
-    </h4>
-    <p id="message"></p>
-    <p id="error"></p>
-    <div id="app">
-      <p>
-      </p>
-      <h2>
-        Map using data from element content
-      </h2>
-      <p>
-        To make this work, you need a <samp>&lt;pre&gt;</samp> tag wrapping
-        the data. View source of this page to see this work.</samp>
-      </p>
-      <div id="element-content-map"
-           style="height: 600px; width: 80%; border: thin solid gray;">
-        <pre>
-        Country,Name,Latitude,Longitude,CountryCode,Continent
-        Saint Martin,Marigot,18.0731,-63.082200,MF,North America
-        American Samoa,Pago Pago,-14.266666666666667,-170.700000,AS,Australia
-        Anguilla,The Valley,18.216666666666665,-63.050000,AI,North America
-        Antigua and Barbuda,Saint John's,17.116666666666667,-61.850000,AG,North America
-        Argentina,Buenos Aires,-34.583333333333336,-58.666667,AR,South America
-        Aruba,Oranjestad,12.516666666666667,-70.033333,AW,North America
-        Bahamas,Nassau,25.083333333333332,-77.350000,BS,North America
-        Barbados,Bridgetown,13.1,-59.616667,BB,North America
-        Belize,Belmopan,17.25,-88.766667,BZ,Central America
-        Bermuda,Hamilton,32.28333333333333,-64.783333,BM,North America
-        Bolivia,La Paz,-16.5,-68.150000,BO,South America
-        Brazil,Brasilia,-15.783333333333333,-47.916667,BR,South America
-        British Virgin Islands,Road Town,18.416666666666668,-64.616667,VG,North America
-        Canada,Ottawa,45.416666666666664,-75.700000,CA,Central America
-        Cayman Islands,George Town,19.3,-81.383333,KY,North America
-        Chile,Santiago,-33.45,-70.666667,CL,South America
-        Colombia,Bogota,4.6,-74.083333,CO,South America
-        Costa Rica,San Jose,9.933333333333334,-84.083333,CR,Central America
-        Cuba,Havana,23.116666666666667,-82.350000,CU,North America
-        Curaçao,Willemstad,12.1,-68.916667,CW,North America
-        Dominica,Roseau,15.3,-61.400000,DM,North America
-        Dominican Republic,Santo Domingo,18.466666666666665,-69.900000,DO,North America
-        Ecuador,Quito,-0.21666666666666667,-78.500000,EC,South America
-        El Salvador,San Salvador,13.7,-89.200000,SV,Central America
-        Falkland Islands,Stanley,-51.7,-57.850000,FK,South America
-        Greenland,Nuuk,64.18333333333334,-51.750000,GL,Central America
-        Grenada,Saint George's,12.05,-61.750000,GD,North America
-        Guatemala,Guatemala City,14.616666666666667,-90.516667,GT,Central America
-        Guyana,Georgetown,6.8,-58.150000,GY,South America
-        Haiti,Port-au-Prince,18.533333333333335,-72.333333,HT,North America
-        Honduras,Tegucigalpa,14.1,-87.216667,HN,Central America
-        Jamaica,Kingston,18,-76.800000,JM,North America
-        Mexico,Mexico City,19.433333333333334,-99.133333,MX,Central America
-        Montserrat,Plymouth,16.7,-62.216667,MS,North America
-        Nicaragua,Managua,12.133333333333333,-86.250000,NI,Central America
-        Panama,Panama City,8.966666666666667,-79.533333,PA,Central America
-        Paraguay,Asuncion,-25.266666666666666,-57.666667,PY,South America
-        Peru,Lima,-12.05,-77.050000,PE,South America
-        Puerto Rico,San Juan,18.466666666666665,-66.116667,PR,North America
-        Saint Barthelemy,Gustavia,17.883333333333333,-62.850000,BL,North America
-        Saint Kitts and Nevis,Basseterre,17.3,-62.716667,KN,North America
-        Saint Lucia,Castries,14,-61.000000,LC,North America
-        Saint Pierre and Miquelon,Saint-Pierre,46.766666666666666,-56.183333,PM,Central America
-        Saint Vincent and the Grenadines,Kingstown,13.133333333333333,-61.216667,VC,Central America
-        Sint Maarten,Philipsburg,18.016666666666666,-63.033333,SX,North America
-        Suriname,Paramaribo,5.833333333333333,-55.166667,SR,South America
-        Trinidad and Tobago,Port of Spain,10.65,-61.516667,TT,North America
-        Turks and Caicos Islands,Grand Turk,21.466666,-71.133333,TC,North America
-        United States,Washington D.C.,38.883333,-77.000000,US,Central America
-        Uruguay,Montevideo,-34.85,-56.166667,UY,South America
-        Venezuela,Caracas,10.483333333333333,-66.866667,VE,South America
-        US Virgin Islands,Charlotte Amalie,18.35,-64.933333,VI,North America
-        </pre>
-      </div>
-      <h2>
-        Map using inline CSV
-      </h2>
-      <div id="inline-csv-map"
-           style="height: 600px; width: 80%; border: thin solid gray;"></div>
-      <h2>
-        Map using CSV from URL
-      </h2>
-      <p>
-        This is more limited than I would like, because of cross-site scripting
-        blocks; the URL <b>must</b> be sourced from the same host as the page.
-      </p>
-      <div id="url-map"
-           style="height: 600px; width: 80%; border: thin solid gray;"></div>
-      <div id="doc">
-        <p>
-          Use this page as a crib for how to use <b>GeoCSV Lite</b> in your projects. In order
-          for it to work, you need:
-        </p>
-        <ol>
-          <li>Javascript dependencies:
-            <ol>
-              <li><a href="">Leaflet</a> (provides mapping);</li>
-              <li><a href="">PapaParse</a> (provides CSV parsing);</li>
-            </ol>
-          </li>
-          <li>
-            A line which includes the geocsv_lite library, which should be
-            <em>after</em> those including the dependencies: <br/>
-            <samp>&lt;script src="js/compiled/geocsv_lite.js"
-              type="text/javascript"&gt;&lt;/script&gt;</samp>
-          </li>
-          <li>One (or more) <code>div</code> elements to contain your maps. It
-            is a requirement of Leaflet that these must have a fixed pixel height.
-            Each must have a distinct <code>id</code>;</li>
-          <li>
-            For each <code>div</code> which you wish to contain a map view,
-            an invocation of the function
-            <code>geocsv_lite.core.initialise_map_element(id, data-source)</code>: <br/>
-            <samp>&lt;script&gt;geocsv_lite.core.initialise_map_element("map", "data/data.csv");&lt;/script&gt;</samp>
-          </li>
-        </ol>
-        <p>
-          The value passed as <var>data-source</var> may be CSV text, or it
-          may be a URL from which CSV text can be sourced.
-        </p>
-        <h2>
-          Custom map pins
-        </h2>
-        <p>
-          <img src="img/map-pins/Anchor-customer-pin.png"/>
-          <img src="img/map-pins/Broadband-supplier-pin.png"/>
-          <img src="img/map-pins/Champion-pin.png"/>
-          <img src="img/map-pins/Developer-pin.png"/>
-          <img src="img/map-pins/Further-education-pin.png"/>
-          <img src="img/map-pins/Higher-education-pin.png"/>
-          <img src="img/map-pins/Investor-pin.png"/>
-          <img src="img/map-pins/Landowner-pin.png"/>
-          <img src="img/map-pins/Operator-pin.png"/>
-          <img src="img/map-pins/Unknown-pin.png"/>
-        </p>
-        <p>
-          If your CSV document has a column called <samp>category</samp> (case insensitive),
-          then, as with the full-fat GeoCSV, if there is an image file in the
-          <samp>img/map-pins</samp> subdirectory whose name is the value of that
-          column with <samp>-pin.png</samp> appended, then that image will be
-          used as the image for the map pin. The image should be 40 pixels high
-          and 30 wide. It will be anchored centre bottom. You are advised to use
-          <samp>Unknown-pin.png</samp> as the basis for your design.
-        </p>
-        <p>
-          <strong>WARNING:</strong> if you have a column called <samp>category</samp>,
-          and you don't have an appropriate pin image for each value present,
-          then you will get 'broken' pin images appearing on your map.
-        </p>
-    </div>
-    </div>
-  <footer>
-    <div id="credits">
-      <div>
-        <img height="16" width="16" alt="Clojure"
-             src="img/credits/clojure-icon.gif"/> Powered by
-        <a href="http://clojure.org">Clojure</a> ||
-        <img height="16" width="16" alt="GitHub"
-             src="img/credits/github-logo-transparent.png"/>Find me/fork me on
-        <a href="https://github.com/simon-brooke/geocsv-lite">Github</a> ||
-        <img height="16" width="16"
-             alt="Free Software Foundation"
-             src="img/credits/gnu.small.png"/>Licensed under the
-        <a href="http://www.gnu.org/licenses/gpl-2.0.html">GNU General Public License version 2.0</a>
-      </div>
-    </div>
-  </footer>
-  <script src="js/compiled/geocsv_lite.js" type="text/javascript"></script>
-  <script>
-    /* Map using data from element content */
-    geocsv_lite.core.initialise_map_element("element-content-map",
-                                            document.getElementById("element-content-map").innerText);
-    /* Map using inline CSV passed to the function */
-    geocsv_lite.core.initialise_map_element("inline-csv-map",
-                                            "Country,Name,Latitude,Longitude,CountryCode,Continent\n" +
-                                            "Somaliland,Hargeisa,9.55,44.050000,NULL,Africa\n" +
-                                            "Western Sahara,El-Aaiún,27.153611,-13.203333,EH,Africa\n" +
-                                            "Algeria,Algiers,36.75,3.050000,DZ,Africa\n" +
-                                            "Angola,Luanda,-8.833333333333334,13.216667,AO,Africa\n" +
-                                            "Benin,Porto-Novo,6.483333333333333,2.616667,BJ,Africa\n" +
-                                            "Botswana,Gaborone,-24.633333333333333,25.900000,BW,Africa\n" +
-                                            "Burkina Faso,Ouagadougou,12.366666666666667,-1.516667,BF,Africa\n" +
-                                            "Burundi,Bujumbura,-3.3666666666666667,29.350000,BI,Africa\n" +
-                                            "Cameroon,Yaounde,3.8666666666666667,11.516667,CM,Africa\n" +
-                                            "Cape Verde,Praia,14.916666666666666,-23.516667,CV,Africa\n" +
-                                            "Central African Republic,Bangui,4.366666666666666,18.583333,CF,Africa\n" +
-                                            "Chad,N'Djamena,12.1,15.033333,TD,Africa\n" +
-                                            "Comoros,Moroni,-11.7,43.233333,KM,Africa\n" +
-                                            "Democratic Republic of the Congo,Kinshasa,-4.316666666666666,15.300000,CD,Africa\n" +
-                                            "Republic of Congo,Brazzaville,-4.25,15.283333,CG,Africa\n" +
-                                            "Cote d'Ivoire,Yamoussoukro,6.816666666666666,-5.266667,CI,Africa\n" +
-                                            "Djibouti,Djibouti,11.583333333333334,43.150000,DJ,Africa\n" +
-                                            "Egypt,Cairo,30.05,31.250000,EG,Africa\n" +
-                                            "Equatorial Guinea,Malabo,3.75,8.783333,GQ,Africa\n" +
-                                            "Eritrea,Asmara,15.333333333333334,38.933333,ER,Africa\n" +
-                                            "Ethiopia,Addis Ababa,9.033333333333333,38.700000,ET,Africa\n" +
-                                            "Gabon,Libreville,0.38333333333333336,9.450000,GA,Africa\n" +
-                                            "The Gambia,Banjul,13.45,-16.566667,GM,Africa\n" +
-                                            "Ghana,Accra,5.55,-0.216667,GH,Africa\n" +
-                                            "Guinea,Conakry,9.5,-13.700000,GN,Africa\n" +
-                                            "Guinea-Bissau,Bissau,11.85,-15.583333,GW,Africa\n" +
-                                            "Kenya,Nairobi,-1.2833333333333332,36.816667,KE,Africa\n" +
-                                            "Lesotho,Maseru,-29.316666666666666,27.483333,LS,Africa\n" +
-                                            "Liberia,Monrovia,6.3,-10.800000,LR,Africa\n" +
-                                            "Libya,Tripoli,32.88333333333333,13.166667,LY,Africa\n" +
-                                            "Madagascar,Antananarivo,-18.916666666666668,47.516667,MG,Africa\n" +
-                                            "Malawi,Lilongwe,-13.966666666666667,33.783333,MW,Africa\n" +
-                                            "Mali,Bamako,12.65,-8.000000,ML,Africa\n" +
-                                            "Mauritania,Nouakchott,18.066666666666666,-15.966667,MR,Africa\n" +
-                                            "Mauritius,Port Louis,-20.15,57.483333,MU,Africa\n" +
-                                            "Morocco,Rabat,34.016666666666666,-6.816667,MA,Africa\n" +
-                                            "Mozambique,Maputo,-25.95,32.583333,MZ,Africa\n" +
-                                            "Namibia,Windhoek,-22.566666666666666,17.083333,NA,Africa\n" +
-                                            "Niger,Niamey,13.516666666666667,2.116667,NE,Africa\n" +
-                                            "Nigeria,Abuja,9.083333333333334,7.533333,NG,Africa\n" +
-                                            "Rwanda,Kigali,-1.95,30.050000,RW,Africa\n" +
-                                            "Saint Helena,Jamestown,-15.933333333333334,-5.716667,SH,Africa\n" +
-                                            "Sao Tome and Principe,Sao Tome,0.3333333333333333,6.733333,ST,Africa\n" +
-                                            "Senegal,Dakar,14.733333333333333,-17.633333,SN,Africa\n" +
-                                            "Seychelles,Victoria,-4.616666666666667,55.450000,SC,Africa\n" +
-                                            "Sierra Leone,Freetown,8.483333333333333,-13.233333,SL,Africa\n" +
-                                            "Somalia,Mogadishu,2.066666666666667,45.333333,SO,Africa\n" +
-                                            "South Africa,Pretoria,-25.7,28.216667,ZA,Africa\n" +
-                                            "South Sudan,Juba,4.85,31.616667,SS,Africa\n" +
-                                            "Sudan,Khartoum,15.6,32.533333,SD,Africa\n" +
-                                            "Swaziland,Mbabane,-26.316666666666666,31.133333,SZ,Africa\n" +
-                                            "Tanzania,Dar es Salaam,-6.8,39.283333,TZ,Africa\n" +
-                                            "Togo,Lome,6.116666666666666,1.216667,TG,Africa\n" +
-                                            "Tunisia,Tunis,36.8,10.183333,TN,Africa\n" +
-                                            "Uganda,Kampala,0.31666666666666665,32.550000,UG,Africa\n" +
-                                            "Zambia,Lusaka,-15.416666666666666,28.283333,ZM,Africa\n" +
-                                            "Zimbabwe,Harare,-17.816666666666666,31.033333,ZW,Africa\n" +
-                                            "British Indian Ocean Territory,Diego Garcia,-7.3,72.400000,IO,Africa\n" );
-    /* Map using CSV from URL */
-    var url = window.location.href.substring(0, window.location.href.lastIndexOf('/')) + "/data/europe-capitals.csv";
-    geocsv_lite.core.initialise_map_element("url-map", url);
-  </script>
-  </body>
-</html>

docs/js/compiled/geocsv_lite.js

@@ -1,12 +0,0 @@
-var CLOSURE_UNCOMPILED_DEFINES = {};
-var CLOSURE_NO_DEPS = true;
-if(typeof goog == "undefined") document.write('<script src="js/compiled/out/goog/base.js"></script>');
-document.write('<script src="js/compiled/out/goog/deps.js"></script>');
-document.write('<script src="js/compiled/out/cljs_deps.js"></script>');
-document.write('<script>if (typeof goog == "undefined") console.warn("ClojureScript could not load :main, did you forget to specify :asset-path?");</script>');
-document.write('<script>goog.require("devtools.preload");</script>');
-document.write('<script>goog.require("figwheel.connect");</script>');
-document.write('<script>goog.require("process.env");</script>');
-document.write('<script>goog.require("geocsv_lite.core");</script>');
-
-document.write("<script>figwheel.connect.start();</script>");

docs/js/compiled/out/.figwheel-compile-stamp

@@ -1 +0,0 @@
--1623538622

docs/js/compiled/out/cljs/core/async.cljs

@@ -1,925 +0,0 @@
-(ns cljs.core.async
-    (:refer-clojure :exclude [reduce transduce into merge map take partition partition-by])
-    (:require [cljs.core.async.impl.protocols :as impl]
-              [cljs.core.async.impl.channels :as channels]
-              [cljs.core.async.impl.buffers :as buffers]
-              [cljs.core.async.impl.timers :as timers]
-              [cljs.core.async.impl.dispatch :as dispatch]
-              [cljs.core.async.impl.ioc-helpers :as helpers]
-              [goog.array :as garray])
-    (:require-macros [cljs.core.async.impl.ioc-macros :as ioc]
-                     [cljs.core.async :refer [go go-loop]]))
-
-(defn- fn-handler
-  ([f] (fn-handler f true))
-  ([f blockable]
-   (reify
-     impl/Handler
-     (active? [_] true)
-     (blockable? [_] blockable)
-     (commit [_] f))))
-
-(defn buffer
-  "Returns a fixed buffer of size n. When full, puts will block/park."
-  [n]
-  (buffers/fixed-buffer n))
-
-(defn dropping-buffer
-  "Returns a buffer of size n. When full, puts will complete but
-  val will be dropped (no transfer)."
-  [n]
-  (buffers/dropping-buffer n))
-
-(defn sliding-buffer
-  "Returns a buffer of size n. When full, puts will complete, and be
-  buffered, but oldest elements in buffer will be dropped (not
-  transferred)."
-  [n]
-  (buffers/sliding-buffer n))
-
-(defn unblocking-buffer?
-  "Returns true if a channel created with buff will never block. That is to say,
-   puts into this buffer will never cause the buffer to be full. "
-  [buff]
-  (satisfies? impl/UnblockingBuffer buff))
-
-(defn chan
-  "Creates a channel with an optional buffer, an optional transducer (like (map f),
-  (filter p) etc or a composition thereof), and an optional exception handler.
-  If buf-or-n is a number, will create and use a fixed buffer of that size. If a
-  transducer is supplied a buffer must be specified. ex-handler must be a
-  fn of one argument - if an exception occurs during transformation it will be called
-  with the thrown value as an argument, and any non-nil return value will be placed
-  in the channel."
-  ([] (chan nil))
-  ([buf-or-n] (chan buf-or-n nil nil))
-  ([buf-or-n xform] (chan buf-or-n xform nil))
-  ([buf-or-n xform ex-handler]
-   (let [buf-or-n (if (= buf-or-n 0)
-                    nil
-                    buf-or-n)]
-     (when xform (assert buf-or-n "buffer must be supplied when transducer is"))
-     (channels/chan (if (number? buf-or-n)
-                      (buffer buf-or-n)
-                      buf-or-n)
-                    xform
-                    ex-handler))))
-
-(defn promise-chan
-  "Creates a promise channel with an optional transducer, and an optional
-  exception-handler. A promise channel can take exactly one value that consumers
-  will receive. Once full, puts complete but val is dropped (no transfer).
-  Consumers will block until either a value is placed in the channel or the
-  channel is closed. See chan for the semantics of xform and ex-handler."
-  ([] (promise-chan nil))
-  ([xform] (promise-chan xform nil))
-  ([xform ex-handler]
-   (chan (buffers/promise-buffer) xform ex-handler)))
-
-(defn timeout
-  "Returns a channel that will close after msecs"
-  [msecs]
-  (timers/timeout msecs))
-
-(defn <!
-  "takes a val from port. Must be called inside a (go ...) block. Will
-  return nil if closed. Will park if nothing is available.
-  Returns true unless port is already closed"
-  [port]
-  (throw (js/Error. "<! used not in (go ...) block")))
-
-(defn take!
-  "Asynchronously takes a val from port, passing to fn1. Will pass nil
-   if closed. If on-caller? (default true) is true, and value is
-   immediately available, will call fn1 on calling thread.
-   Returns nil."
-  ([port fn1] (take! port fn1 true))
-  ([port fn1 on-caller?]
-     (let [ret (impl/take! port (fn-handler fn1))]
-       (when ret
-         (let [val @ret]
-           (if on-caller?
-             (fn1 val)
-             (dispatch/run #(fn1 val)))))
-       nil)))
-
-(defn- nop [_])
-(def ^:private fhnop (fn-handler nop))
-
-(defn >!
-  "puts a val into port. nil values are not allowed. Must be called
-  inside a (go ...) block. Will park if no buffer space is available.
-  Returns true unless port is already closed."
-  [port val]
-  (throw (js/Error. ">! used not in (go ...) block")))
-
-(defn put!
-  "Asynchronously puts a val into port, calling fn1 (if supplied) when
-   complete. nil values are not allowed. Will throw if closed. If
-   on-caller? (default true) is true, and the put is immediately
-   accepted, will call fn1 on calling thread.  Returns nil."
-  ([port val]
-     (if-let [ret (impl/put! port val fhnop)]
-       @ret
-       true))
-  ([port val fn1] (put! port val fn1 true))
-  ([port val fn1 on-caller?]
-     (if-let [retb (impl/put! port val (fn-handler fn1))]
-       (let [ret @retb]
-         (if on-caller?
-           (fn1 ret)
-           (dispatch/run #(fn1 ret)))
-         ret)
-       true)))
-
-(defn close!
-  ([port]
-     (impl/close! port)))
-
-
-(defn- random-array
-  [n]
-  (let [a (make-array n)]
-    (dotimes [x n]
-      (aset a x x))
-    (garray/shuffle a)
-    a))
-
-(defn- alt-flag []
-  (let [flag (atom true)]
-    (reify
-      impl/Handler
-      (active? [_] @flag)
-      (blockable? [_] true)
-      (commit [_]
-        (reset! flag nil)
-        true))))
-
-(defn- alt-handler [flag cb]
-  (reify
-    impl/Handler
-    (active? [_] (impl/active? flag))
-    (blockable? [_] true)
-    (commit [_]
-      (impl/commit flag)
-      cb)))
-
-(defn do-alts
-  "returns derefable [val port] if immediate, nil if enqueued"
-  [fret ports opts]
-  (assert (pos? (count ports)) "alts must have at least one channel operation")
-  (let [flag (alt-flag)
-        n (count ports)
-        idxs (random-array n)
-        priority (:priority opts)
-        ret
-        (loop [i 0]
-          (when (< i n)
-            (let [idx (if priority i (aget idxs i))
-                  port (nth ports idx)
-                  wport (when (vector? port) (port 0))
-                  vbox (if wport
-                         (let [val (port 1)]
-                           (impl/put! wport val (alt-handler flag #(fret [% wport]))))
-                         (impl/take! port (alt-handler flag #(fret [% port]))))]
-              (if vbox
-                (channels/box [@vbox (or wport port)])
-                (recur (inc i))))))]
-    (or
-     ret
-     (when (contains? opts :default)
-       (when-let [got (and (impl/active? flag) (impl/commit flag))]
-         (channels/box [(:default opts) :default]))))))
-
-(defn alts!
-  "Completes at most one of several channel operations. Must be called
-   inside a (go ...) block. ports is a vector of channel endpoints,
-   which can be either a channel to take from or a vector of
-  [channel-to-put-to val-to-put], in any combination. Takes will be
-  made as if by <!, and puts will be made as if by >!. Unless
-  the :priority option is true, if more than one port operation is
-  ready a non-deterministic choice will be made. If no operation is
-  ready and a :default value is supplied, [default-val :default] will
-  be returned, otherwise alts! will park until the first operation to
-  become ready completes. Returns [val port] of the completed
-  operation, where val is the value taken for takes, and a
-  boolean (true unless already closed, as per put!) for puts.
-
-  opts are passed as :key val ... Supported options:
-
-  :default val - the value to use if none of the operations are immediately ready
-  :priority true - (default nil) when true, the operations will be tried in order.
-
-  Note: there is no guarantee that the port exps or val exprs will be
-  used, nor in what order should they be, so they should not be
-  depended upon for side effects."
-
-  [ports & {:as opts}]
-  (throw (js/Error. "alts! used not in (go ...) block")))
-
-(defn offer!
-  "Puts a val into port if it's possible to do so immediately.
-  nil values are not allowed. Never blocks. Returns true if offer succeeds."
-  [port val]
-  (let [ret (impl/put! port val (fn-handler nop false))]
-    (when ret @ret)))
-
-(defn poll!
-  "Takes a val from port if it's possible to do so immediately.
-  Never blocks. Returns value if successful, nil otherwise."
-  [port]
-  (let [ret (impl/take! port (fn-handler nop false))]
-    (when ret @ret)))
-
-;;;;;;; channel ops
-
-(defn pipe
-  "Takes elements from the from channel and supplies them to the to
-   channel. By default, the to channel will be closed when the from
-   channel closes, but can be determined by the close?  parameter. Will
-   stop consuming the from channel if the to channel closes"
-
-  ([from to] (pipe from to true))
-  ([from to close?]
-     (go-loop []
-      (let [v (<! from)]
-        (if (nil? v)
-          (when close? (close! to))
-          (when (>! to v)
-              (recur)))))
-     to))
-
-(defn- pipeline*
-  ([n to xf from close? ex-handler type]
-     (assert (pos? n))
-     (let [jobs (chan n)
-           results (chan n)
-           process (fn [[v p :as job]]
-                     (if (nil? job)
-                       (do (close! results) nil)
-                       (let [res (chan 1 xf ex-handler)]
-                         (go
-                           (>! res v)
-                           (close! res))
-                         (put! p res)
-                         true)))
-           async (fn [[v p :as job]]
-                   (if (nil? job)
-                     (do (close! results) nil)
-                     (let [res (chan 1)]
-                       (xf v res)
-                       (put! p res)
-                       true)))]
-       (dotimes [_ n]
-         (case type
-           :compute  (go-loop []
-                               (let [job (<! jobs)]
-                                 (when (process job)
-                                   (recur))))
-           :async (go-loop []
-                           (let [job (<! jobs)]
-                             (when (async job)
-                               (recur))))))
-       (go-loop []
-                  (let [v (<! from)]
-                    (if (nil? v)
-                      (close! jobs)
-                      (let [p (chan 1)]
-                        (>! jobs [v p])
-                        (>! results p)
-                        (recur)))))
-       (go-loop []
-                  (let [p (<! results)]
-                    (if (nil? p)
-                      (when close? (close! to))
-                      (let [res (<! p)]
-                        (loop []
-                          (let [v (<! res)]
-                            (when (and (not (nil? v)) (>! to v))
-                              (recur))))
-                        (recur))))))))
-
-(defn pipeline-async
-  "Takes elements from the from channel and supplies them to the to
-  channel, subject to the async function af, with parallelism n. af
-  must be a function of two arguments, the first an input value and
-  the second a channel on which to place the result(s). af must close!
-  the channel before returning.  The presumption is that af will
-  return immediately, having launched some asynchronous operation
-  whose completion/callback will manipulate the result channel. Outputs
-  will be returned in order relative to  the inputs. By default, the to
-  channel will be closed when the from channel closes, but can be
-  determined by the close?  parameter. Will stop consuming the from
-  channel if the to channel closes."
-  ([n to af from] (pipeline-async n to af from true))
-  ([n to af from close?] (pipeline* n to af from close? nil :async)))
-
-(defn pipeline
-  "Takes elements from the from channel and supplies them to the to
-  channel, subject to the transducer xf, with parallelism n. Because
-  it is parallel, the transducer will be applied independently to each
-  element, not across elements, and may produce zero or more outputs
-  per input.  Outputs will be returned in order relative to the
-  inputs. By default, the to channel will be closed when the from
-  channel closes, but can be determined by the close?  parameter. Will
-  stop consuming the from channel if the to channel closes.
-
-  Note this is supplied for API compatibility with the Clojure version.
-  Values of N > 1 will not result in actual concurrency in a
-  single-threaded runtime."
-  ([n to xf from] (pipeline n to xf from true))
-  ([n to xf from close?] (pipeline n to xf from close? nil))
-  ([n to xf from close? ex-handler] (pipeline* n to xf from close? ex-handler :compute)))
-
-(defn split
-  "Takes a predicate and a source channel and returns a vector of two
-  channels, the first of which will contain the values for which the
-  predicate returned true, the second those for which it returned
-  false.
-
-  The out channels will be unbuffered by default, or two buf-or-ns can
-  be supplied. The channels will close after the source channel has
-  closed."
-  ([p ch] (split p ch nil nil))
-  ([p ch t-buf-or-n f-buf-or-n]
-     (let [tc (chan t-buf-or-n)
-           fc (chan f-buf-or-n)]
-       (go-loop []
-                (let [v (<! ch)]
-                  (if (nil? v)
-                    (do (close! tc) (close! fc))
-                    (when (>! (if (p v) tc fc) v)
-                      (recur)))))
-       [tc fc])))
-
-(defn reduce
-  "f should be a function of 2 arguments. Returns a channel containing
-  the single result of applying f to init and the first item from the
-  channel, then applying f to that result and the 2nd item, etc. If
-  the channel closes without yielding items, returns init and f is not
-  called. ch must close before reduce produces a result."
-  [f init ch]
-  (go-loop [ret init]
-    (let [v (<! ch)]
-      (if (nil? v)
-        ret
-        (let [ret' (f ret v)]
-          (if (reduced? ret')
-            @ret'
-            (recur ret')))))))
-
-(defn transduce
-  "async/reduces a channel with a transformation (xform f).
-  Returns a channel containing the result.  ch must close before
-  transduce produces a result."
-  [xform f init ch]
-  (let [f (xform f)]
-    (go
-      (let [ret (<! (reduce f init ch))]
-        (f ret)))))
-
-(defn onto-chan
-  "Puts the contents of coll into the supplied channel.
-
-  By default the channel will be closed after the items are copied,
-  but can be determined by the close? parameter.
-
-  Returns a channel which will close after the items are copied."
-  ([ch coll] (onto-chan ch coll true))
-  ([ch coll close?]
-     (go-loop [vs (seq coll)]
-              (if (and vs (>! ch (first vs)))
-                (recur (next vs))
-                (when close?
-                  (close! ch))))))
-
-
-(defn to-chan
-  "Creates and returns a channel which contains the contents of coll,
-  closing when exhausted."
-  [coll]
-  (let [ch (chan (bounded-count 100 coll))]
-    (onto-chan ch coll)
-    ch))
-
-
-(defprotocol Mux
-  (muxch* [_]))
-
-(defprotocol Mult
-  (tap* [m ch close?])
-  (untap* [m ch])
-  (untap-all* [m]))
-
-(defn mult
-  "Creates and returns a mult(iple) of the supplied channel. Channels
-  containing copies of the channel can be created with 'tap', and
-  detached with 'untap'.
-
-  Each item is distributed to all taps in parallel and synchronously,
-  i.e. each tap must accept before the next item is distributed. Use
-  buffering/windowing to prevent slow taps from holding up the mult.
-
-  Items received when there are no taps get dropped.
-
-  If a tap puts to a closed channel, it will be removed from the mult."
-  [ch]
-  (let [cs (atom {}) ;;ch->close?
-        m (reify
-           Mux
-           (muxch* [_] ch)
-
-           Mult
-           (tap* [_ ch close?] (swap! cs assoc ch close?) nil)
-           (untap* [_ ch] (swap! cs dissoc ch) nil)
-           (untap-all* [_] (reset! cs {}) nil))
-        dchan (chan 1)
-        dctr (atom nil)
-        done (fn [_] (when (zero? (swap! dctr dec))
-                      (put! dchan true)))]
-    (go-loop []
-     (let [val (<! ch)]
-       (if (nil? val)
-         (doseq [[c close?] @cs]
-           (when close? (close! c)))
-         (let [chs (keys @cs)]
-           (reset! dctr (count chs))
-           (doseq [c chs]
-               (when-not (put! c val done)
-                 (done nil)
-                 (untap* m c)))
-           ;;wait for all
-           (when (seq chs)
-             (<! dchan))
-           (recur)))))
-    m))
-
-(defn tap
-  "Copies the mult source onto the supplied channel.
-
-  By default the channel will be closed when the source closes,
-  but can be determined by the close? parameter."
-  ([mult ch] (tap mult ch true))
-  ([mult ch close?] (tap* mult ch close?) ch))
-
-(defn untap
-  "Disconnects a target channel from a mult"
-  [mult ch]
-  (untap* mult ch))
-
-(defn untap-all
-  "Disconnects all target channels from a mult"
-  [mult] (untap-all* mult))
-
-(defprotocol Mix
-  (admix* [m ch])
-  (unmix* [m ch])
-  (unmix-all* [m])
-  (toggle* [m state-map])
-  (solo-mode* [m mode]))
-
-(defn ioc-alts! [state cont-block ports & {:as opts}]
-  (ioc/aset-all! state helpers/STATE-IDX cont-block)
-  (when-let [cb (cljs.core.async/do-alts
-                  (fn [val]
-                    (ioc/aset-all! state helpers/VALUE-IDX val)
-                    (helpers/run-state-machine-wrapped state))
-                  ports
-                  opts)]
-    (ioc/aset-all! state helpers/VALUE-IDX @cb)
-    :recur))
-
-(defn mix
-  "Creates and returns a mix of one or more input channels which will
-  be put on the supplied out channel. Input sources can be added to
-  the mix with 'admix', and removed with 'unmix'. A mix supports
-  soloing, muting and pausing multiple inputs atomically using
-  'toggle', and can solo using either muting or pausing as determined
-  by 'solo-mode'.
-
-  Each channel can have zero or more boolean modes set via 'toggle':
-
-  :solo - when true, only this (ond other soloed) channel(s) will appear
-          in the mix output channel. :mute and :pause states of soloed
-          channels are ignored. If solo-mode is :mute, non-soloed
-          channels are muted, if :pause, non-soloed channels are
-          paused.
-
-  :mute - muted channels will have their contents consumed but not included in the mix
-  :pause - paused channels will not have their contents consumed (and thus also not included in the mix)
-"
-  [out]
-  (let [cs (atom {}) ;;ch->attrs-map
-        solo-modes #{:mute :pause}
-        attrs (conj solo-modes :solo)
-        solo-mode (atom :mute)
-        change (chan)
-        changed #(put! change true)
-        pick (fn [attr chs]
-               (reduce-kv
-                   (fn [ret c v]
-                     (if (attr v)
-                       (conj ret c)
-                       ret))
-                   #{} chs))
-        calc-state (fn []
-                     (let [chs @cs
-                           mode @solo-mode
-                           solos (pick :solo chs)
-                           pauses (pick :pause chs)]
-                       {:solos solos
-                        :mutes (pick :mute chs)
-                        :reads (conj
-                                (if (and (= mode :pause) (not (empty? solos)))
-                                  (vec solos)
-                                  (vec (remove pauses (keys chs))))
-                                change)}))
-        m (reify
-           Mux
-           (muxch* [_] out)
-           Mix
-           (admix* [_ ch] (swap! cs assoc ch {}) (changed))
-           (unmix* [_ ch] (swap! cs dissoc ch) (changed))
-           (unmix-all* [_] (reset! cs {}) (changed))
-           (toggle* [_ state-map] (swap! cs (partial merge-with cljs.core/merge) state-map) (changed))
-           (solo-mode* [_ mode]
-             (assert (solo-modes mode) (str "mode must be one of: " solo-modes))
-             (reset! solo-mode mode)
-             (changed)))]
-    (go-loop [{:keys [solos mutes reads] :as state} (calc-state)]
-      (let [[v c] (alts! reads)]
-        (if (or (nil? v) (= c change))
-          (do (when (nil? v)
-                (swap! cs dissoc c))
-              (recur (calc-state)))
-          (if (or (solos c)
-                  (and (empty? solos) (not (mutes c))))
-            (when (>! out v)
-              (recur state))
-            (recur state)))))
-    m))
-
-(defn admix
-  "Adds ch as an input to the mix"
-  [mix ch]
-  (admix* mix ch))
-
-(defn unmix
-  "Removes ch as an input to the mix"
-  [mix ch]
-  (unmix* mix ch))
-
-(defn unmix-all
-  "removes all inputs from the mix"
-  [mix]
-  (unmix-all* mix))
-
-(defn toggle
-  "Atomically sets the state(s) of one or more channels in a mix. The
-  state map is a map of channels -> channel-state-map. A
-  channel-state-map is a map of attrs -> boolean, where attr is one or
-  more of :mute, :pause or :solo. Any states supplied are merged with
-  the current state.
-
-  Note that channels can be added to a mix via toggle, which can be
-  used to add channels in a particular (e.g. paused) state."
-  [mix state-map]
-  (toggle* mix state-map))
-
-(defn solo-mode
-  "Sets the solo mode of the mix. mode must be one of :mute or :pause"
-  [mix mode]
-  (solo-mode* mix mode))
-
-
-(defprotocol Pub
-  (sub* [p v ch close?])
-  (unsub* [p v ch])
-  (unsub-all* [p] [p v]))
-
-(defn pub
-  "Creates and returns a pub(lication) of the supplied channel,
-  partitioned into topics by the topic-fn. topic-fn will be applied to
-  each value on the channel and the result will determine the 'topic'
-  on which that value will be put. Channels can be subscribed to
-  receive copies of topics using 'sub', and unsubscribed using
-  'unsub'. Each topic will be handled by an internal mult on a
-  dedicated channel. By default these internal channels are
-  unbuffered, but a buf-fn can be supplied which, given a topic,
-  creates a buffer with desired properties.
-
-  Each item is distributed to all subs in parallel and synchronously,
-  i.e. each sub must accept before the next item is distributed. Use
-  buffering/windowing to prevent slow subs from holding up the pub.
-
-  Items received when there are no matching subs get dropped.
-
-  Note that if buf-fns are used then each topic is handled
-  asynchronously, i.e. if a channel is subscribed to more than one
-  topic it should not expect them to be interleaved identically with
-  the source."
-  ([ch topic-fn] (pub ch topic-fn (constantly nil)))
-  ([ch topic-fn buf-fn]
-     (let [mults (atom {}) ;;topic->mult
-           ensure-mult (fn [topic]
-                         (or (get @mults topic)
-                             (get (swap! mults
-                                         #(if (% topic) % (assoc % topic (mult (chan (buf-fn topic))))))
-                                  topic)))
-           p (reify
-              Mux
-              (muxch* [_] ch)
-
-              Pub
-              (sub* [p topic ch close?]
-                    (let [m (ensure-mult topic)]
-                      (tap m ch close?)))
-              (unsub* [p topic ch]
-                      (when-let [m (get @mults topic)]
-                        (untap m ch)))
-              (unsub-all* [_] (reset! mults {}))
-              (unsub-all* [_ topic] (swap! mults dissoc topic)))]
-       (go-loop []
-         (let [val (<! ch)]
-           (if (nil? val)
-             (doseq [m (vals @mults)]
-               (close! (muxch* m)))
-             (let [topic (topic-fn val)
-                   m (get @mults topic)]
-               (when m
-                 (when-not (>! (muxch* m) val)
-                   (swap! mults dissoc topic)))
-               (recur)))))
-       p)))
-
-(defn sub
-  "Subscribes a channel to a topic of a pub.
-
-  By default the channel will be closed when the source closes,
-  but can be determined by the close? parameter."
-  ([p topic ch] (sub p topic ch true))
-  ([p topic ch close?] (sub* p topic ch close?)))
-
-(defn unsub
-  "Unsubscribes a channel from a topic of a pub"
-  [p topic ch]
-  (unsub* p topic ch))
-
-(defn unsub-all
-  "Unsubscribes all channels from a pub, or a topic of a pub"
-  ([p] (unsub-all* p))
-  ([p topic] (unsub-all* p topic)))
-
-
-;;;;
-
-(defn map
-  "Takes a function and a collection of source channels, and returns a
-  channel which contains the values produced by applying f to the set
-  of first items taken from each source channel, followed by applying
-  f to the set of second items from each channel, until any one of the
-  channels is closed, at which point the output channel will be
-  closed. The returned channel will be unbuffered by default, or a
-  buf-or-n can be supplied"
-  ([f chs] (map f chs nil))
-  ([f chs buf-or-n]
-     (let [chs (vec chs)
-           out (chan buf-or-n)
-           cnt (count chs)
-           rets (object-array cnt)
-           dchan (chan 1)
-           dctr (atom nil)
-           done (mapv (fn [i]
-                         (fn [ret]
-                           (aset rets i ret)
-                           (when (zero? (swap! dctr dec))
-                             (put! dchan (.slice rets 0)))))
-                       (range cnt))]
-       (go-loop []
-         (reset! dctr cnt)
-         (dotimes [i cnt]
-           (try
-             (take! (chs i) (done i))
-             (catch js/Object e
-               (swap! dctr dec))))
-         (let [rets (<! dchan)]
-           (if (some nil? rets)
-             (close! out)
-             (do (>! out (apply f rets))
-                 (recur)))))
-       out)))
-
-(defn merge
-  "Takes a collection of source channels and returns a channel which
-  contains all values taken from them. The returned channel will be
-  unbuffered by default, or a buf-or-n can be supplied. The channel
-  will close after all the source channels have closed."
-  ([chs] (merge chs nil))
-  ([chs buf-or-n]
-     (let [out (chan buf-or-n)]
-       (go-loop [cs (vec chs)]
-         (if (pos? (count cs))
-           (let [[v c] (alts! cs)]
-             (if (nil? v)
-               (recur (filterv #(not= c %) cs))
-               (do (>! out v)
-                   (recur cs))))
-           (close! out)))
-       out)))
-
-(defn into
-  "Returns a channel containing the single (collection) result of the
-  items taken from the channel conjoined to the supplied
-  collection. ch must close before into produces a result."
-  [coll ch]
-  (reduce conj coll ch))
-
-(defn take
-  "Returns a channel that will return, at most, n items from ch. After n items
-   have been returned, or ch has been closed, the return chanel will close.
-
-  The output channel is unbuffered by default, unless buf-or-n is given."
-  ([n ch]
-     (take n ch nil))
-  ([n ch buf-or-n]
-     (let [out (chan buf-or-n)]
-       (go (loop [x 0]
-             (when (< x n)
-               (let [v (<! ch)]
-                 (when (not (nil? v))
-                   (>! out v)
-                   (recur (inc x))))))
-           (close! out))
-       out)))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; deprecated - do not use ;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(defn map<
-  "Deprecated - this function will be removed. Use transducer instead"
-  [f ch]
-  (reify
-   impl/Channel
-   (close! [_] (impl/close! ch))
-   (closed? [_] (impl/closed? ch))
-
-   impl/ReadPort
-   (take! [_ fn1]
-     (let [ret
-       (impl/take! ch
-         (reify
-          impl/Handler
-          (active? [_] (impl/active? fn1))
-          (blockable? [_] true)
-          #_(lock-id [_] (impl/lock-id fn1))
-          (commit [_]
-           (let [f1 (impl/commit fn1)]
-             #(f1 (if (nil? %) nil (f %)))))))]
-       (if (and ret (not (nil? @ret)))
-         (channels/box (f @ret))
-         ret)))
-
-   impl/WritePort
-   (put! [_ val fn1] (impl/put! ch val fn1))))
-
-(defn map>
-  "Deprecated - this function will be removed. Use transducer instead"
-  [f ch]
-  (reify
-   impl/Channel
-   (close! [_] (impl/close! ch))
-
-   impl/ReadPort
-   (take! [_ fn1] (impl/take! ch fn1))
-
-   impl/WritePort
-   (put! [_ val fn1]
-     (impl/put! ch (f val) fn1))))
-
-(defn filter>
-  "Deprecated - this function will be removed. Use transducer instead"
-  [p ch]
-  (reify
-   impl/Channel
-   (close! [_] (impl/close! ch))
-   (closed? [_] (impl/closed? ch))
-
-   impl/ReadPort
-   (take! [_ fn1] (impl/take! ch fn1))
-
-   impl/WritePort
-   (put! [_ val fn1]
-    (if (p val)
-      (impl/put! ch val fn1)
-      (channels/box (not (impl/closed? ch)))))))
-
-(defn remove>
-  "Deprecated - this function will be removed. Use transducer instead"
-  [p ch]
-  (filter> (complement p) ch))
-
-(defn filter<
-  "Deprecated - this function will be removed. Use transducer instead"
-  ([p ch] (filter< p ch nil))
-  ([p ch buf-or-n]
-     (let [out (chan buf-or-n)]
-       (go-loop []
-         (let [val (<! ch)]
-           (if (nil? val)
-             (close! out)
-             (do (when (p val)
-                   (>! out val))
-                 (recur)))))
-       out)))
-
-(defn remove<
-  "Deprecated - this function will be removed. Use transducer instead"
-  ([p ch] (remove< p ch nil))
-  ([p ch buf-or-n] (filter< (complement p) ch buf-or-n)))
-
-(defn- mapcat* [f in out]
-  (go-loop []
-    (let [val (<! in)]
-      (if (nil? val)
-        (close! out)
-        (do (doseq [v (f val)]
-              (>! out v))
-            (when-not (impl/closed? out)
-              (recur)))))))
-
-(defn mapcat<
-  "Deprecated - this function will be removed. Use transducer instead"
-  ([f in] (mapcat< f in nil))
-  ([f in buf-or-n]
-    (let [out (chan buf-or-n)]
-      (mapcat* f in out)
-      out)))
-
-(defn mapcat>
-  "Deprecated - this function will be removed. Use transducer instead"
-  ([f out] (mapcat> f out nil))
-  ([f out buf-or-n]
-     (let [in (chan buf-or-n)]
-       (mapcat* f in out)
-       in)))
-
-(defn unique
-  "Deprecated - this function will be removed. Use transducer instead"
-  ([ch]
-     (unique ch nil))
-  ([ch buf-or-n]
-     (let [out (chan buf-or-n)]
-       (go (loop [last nil]
-             (let [v (<! ch)]
-               (when (not (nil? v))
-                 (if (= v last)
-                   (recur last)
-                   (do (>! out v)
-                       (recur v))))))
-           (close! out))
-       out)))
-
-(defn partition
-  "Deprecated - this function will be removed. Use transducer instead"
-  ([n ch]
-     (partition n ch nil))
-  ([n ch buf-or-n]
-     (let [out (chan buf-or-n)]
-       (go  (loop [arr (make-array n)
-                   idx 0]
-              (let [v (<! ch)]
-                (if (not (nil? v))
-                  (do (aset ^objects arr idx v)
-                      (let [new-idx (inc idx)]
-                        (if (< new-idx n)
-                          (recur arr new-idx)
-                          (do (>! out (vec arr))
-                              (recur (make-array n) 0)))))
-                  (do (when (> idx 0)
-                        (>! out (vec arr)))
-                      (close! out))))))
-       out)))
-
-
-(defn partition-by
-  "Deprecated - this function will be removed. Use transducer instead"
-  ([f ch]
-     (partition-by f ch nil))
-  ([f ch buf-or-n]
-     (let [out (chan buf-or-n)]
-       (go (loop [lst (make-array 0)
-                  last ::nothing]
-             (let [v (<! ch)]
-               (if (not (nil? v))
-                 (let [new-itm (f v)]
-                   (if (or (= new-itm last)
-                           (keyword-identical? last ::nothing))
-                     (do (.push lst v)
-                         (recur lst new-itm))
-                     (do (>! out (vec lst))
-                         (let [new-lst (make-array 0)]
-                           (.push new-lst v)
-                           (recur new-lst new-itm)))))
-                 (do (when (> (alength lst) 0)
-                       (>! out (vec lst)))
-                     (close! out))))))
-       out)))

docs/js/compiled/out/cljs/core/async/impl/buffers.cljs

@@ -1,159 +0,0 @@
-;;   Copyright (c) Rich Hickey and contributors. All rights reserved.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.core.async.impl.buffers
-  (:require [cljs.core.async.impl.protocols :as impl]))
-
-;; -----------------------------------------------------------------------------
-;; DO NOT USE, this is internal buffer representation
-
-(defn acopy [src src-start dest dest-start len]
-  (loop [cnt 0]
-    (when (< cnt len)
-      (aset dest
-            (+ dest-start cnt)
-            (aget src (+ src-start cnt)))
-      (recur (inc cnt)))))
-
-(deftype RingBuffer [^:mutable head ^:mutable tail ^:mutable length ^:mutable arr]
-  Object
-  (pop [_]
-    (when-not (zero? length)
-      (let [x (aget arr tail)]
-        (aset arr tail nil)
-        (set! tail (js-mod (inc tail) (alength arr)))
-        (set! length (dec length))
-        x)))
-
-  (unshift [_ x]
-    (aset arr head x)
-    (set! head (js-mod (inc head) (alength arr)))
-    (set! length (inc length))
-    nil)
-
-  (unbounded-unshift [this x]
-    (if (== (inc length) (alength arr))
-      (.resize this))
-    (.unshift this x))
-
-  ;; Doubles the size of the buffer while retaining all the existing values
-  (resize
-    [_]
-    (let [new-arr-size (* (alength arr) 2)
-          new-arr (make-array new-arr-size)]
-      (cond
-       (< tail head)
-       (do (acopy arr tail new-arr 0 length)
-           (set! tail 0)
-           (set! head length)
-           (set! arr new-arr))
-
-       (> tail head)
-       (do (acopy arr tail new-arr 0 (- (alength arr) tail))
-           (acopy arr 0 new-arr (- (alength arr) tail) head)
-           (set! tail 0)
-           (set! head length)
-           (set! arr new-arr))
-
-       (== tail head)
-       (do (set! tail 0)
-           (set! head 0)
-           (set! arr new-arr)))))
-
-  (cleanup [this keep?]
-    (dotimes [x length]
-      (let [v (.pop this)]
-        (when ^boolean (keep? v)
-          (.unshift this v))))))
-
-(defn ring-buffer [n]
-  (assert (> n 0) "Can't create a ring buffer of size 0")
-  (RingBuffer. 0 0 0 (make-array n)))
-
-;; -----------------------------------------------------------------------------
-
-(deftype FixedBuffer [buf n]
-  impl/Buffer
-  (full? [this]
-    (== (.-length buf) n))
-  (remove! [this]
-    (.pop buf))
-  (add!* [this itm]
-    (.unbounded-unshift buf itm)
-    this)
-  (close-buf! [this])
-  cljs.core/ICounted
-  (-count [this]
-    (.-length buf)))
-
-(defn fixed-buffer [n]
-  (FixedBuffer. (ring-buffer n) n))
-
-(deftype DroppingBuffer [buf n]
-  impl/UnblockingBuffer
-  impl/Buffer
-  (full? [this]
-    false)
-  (remove! [this]
-    (.pop buf))
-  (add!* [this itm]
-    (when-not (== (.-length buf) n)
-      (.unshift buf itm))
-    this)
-  (close-buf! [this])
-  cljs.core/ICounted
-  (-count [this]
-    (.-length buf)))
-
-(defn dropping-buffer [n]
-  (DroppingBuffer. (ring-buffer n) n))
-
-(deftype SlidingBuffer [buf n]
-  impl/UnblockingBuffer
-  impl/Buffer
-  (full? [this]
-    false)
-  (remove! [this]
-    (.pop buf))
-  (add!* [this itm]
-    (when (== (.-length buf) n)
-      (impl/remove! this))
-    (.unshift buf itm)
-    this)
-  (close-buf! [this])
-  cljs.core/ICounted
-  (-count [this]
-    (.-length buf)))
-
-(defn sliding-buffer [n]
-  (SlidingBuffer. (ring-buffer n) n))
-
-(defonce ^:private NO-VAL (js/Object.))
-(defn- undelivered? [val]
-  (identical? NO-VAL val))
-
-(deftype PromiseBuffer [^:mutable val]
-  impl/UnblockingBuffer
-  impl/Buffer
-  (full? [_]
-    false)
-  (remove! [_]
-    val)
-  (add!* [this itm]
-    (when (undelivered? val)
-      (set! val itm))
-    this)
-  (close-buf! [_]
-    (when (undelivered? val)
-      (set! val nil)))
-  cljs.core/ICounted
-  (-count [_]
-    (if (undelivered? val) 0 1)))
-
-(defn promise-buffer []
-  (PromiseBuffer. NO-VAL))

docs/js/compiled/out/cljs/core/async/impl/buffers.js

@@ -1,466 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.core.async.impl.buffers');
-goog.require('cljs.core');
-goog.require('cljs.core.async.impl.protocols');
-cljs.core.async.impl.buffers.acopy = (function cljs$core$async$impl$buffers$acopy(src,src_start,dest,dest_start,len){
-var cnt = (0);
-while(true){
-if((cnt < len)){
-(dest[(dest_start + cnt)] = (src[(src_start + cnt)]));
-
-var G__20837 = (cnt + (1));
-cnt = G__20837;
-continue;
-} else {
-return null;
-}
-break;
-}
-});
-
-/**
-* @constructor
- * @implements {cljs.core.async.impl.buffers.Object}
-*/
-cljs.core.async.impl.buffers.RingBuffer = (function (head,tail,length,arr){
-this.head = head;
-this.tail = tail;
-this.length = length;
-this.arr = arr;
-});
-cljs.core.async.impl.buffers.RingBuffer.prototype.pop = (function (){
-var self__ = this;
-var _ = this;
-if((self__.length === (0))){
-return null;
-} else {
-var x = (self__.arr[self__.tail]);
-(self__.arr[self__.tail] = null);
-
-self__.tail = ((self__.tail + (1)) % self__.arr.length);
-
-self__.length = (self__.length - (1));
-
-return x;
-}
-});
-
-cljs.core.async.impl.buffers.RingBuffer.prototype.unshift = (function (x){
-var self__ = this;
-var _ = this;
-(self__.arr[self__.head] = x);
-
-self__.head = ((self__.head + (1)) % self__.arr.length);
-
-self__.length = (self__.length + (1));
-
-return null;
-});
-
-cljs.core.async.impl.buffers.RingBuffer.prototype.unbounded_unshift = (function (x){
-var self__ = this;
-var this$ = this;
-if(((self__.length + (1)) === self__.arr.length)){
-this$.resize();
-} else {
-}
-
-return this$.unshift(x);
-});
-
-cljs.core.async.impl.buffers.RingBuffer.prototype.resize = (function (){
-var self__ = this;
-var _ = this;
-var new_arr_size = (self__.arr.length * (2));
-var new_arr = (new Array(new_arr_size));
-if((self__.tail < self__.head)){
-cljs.core.async.impl.buffers.acopy.call(null,self__.arr,self__.tail,new_arr,(0),self__.length);
-
-self__.tail = (0);
-
-self__.head = self__.length;
-
-return self__.arr = new_arr;
-} else {
-if((self__.tail > self__.head)){
-cljs.core.async.impl.buffers.acopy.call(null,self__.arr,self__.tail,new_arr,(0),(self__.arr.length - self__.tail));
-
-cljs.core.async.impl.buffers.acopy.call(null,self__.arr,(0),new_arr,(self__.arr.length - self__.tail),self__.head);
-
-self__.tail = (0);
-
-self__.head = self__.length;
-
-return self__.arr = new_arr;
-} else {
-if((self__.tail === self__.head)){
-self__.tail = (0);
-
-self__.head = (0);
-
-return self__.arr = new_arr;
-} else {
-return null;
-}
-}
-}
-});
-
-cljs.core.async.impl.buffers.RingBuffer.prototype.cleanup = (function (keep_QMARK_){
-var self__ = this;
-var this$ = this;
-var n__4607__auto__ = self__.length;
-var x = (0);
-while(true){
-if((x < n__4607__auto__)){
-var v_20838 = this$.pop();
-if(keep_QMARK_.call(null,v_20838)){
-this$.unshift(v_20838);
-} else {
-}
-
-var G__20839 = (x + (1));
-x = G__20839;
-continue;
-} else {
-return null;
-}
-break;
-}
-});
-
-cljs.core.async.impl.buffers.RingBuffer.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 4, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.with_meta(new cljs.core.Symbol(null,"head","head",869147608,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"tail","tail",494507963,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"length","length",-2065447907,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"arr","arr",2115492975,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null))], null);
-});
-
-cljs.core.async.impl.buffers.RingBuffer.cljs$lang$type = true;
-
-cljs.core.async.impl.buffers.RingBuffer.cljs$lang$ctorStr = "cljs.core.async.impl.buffers/RingBuffer";
-
-cljs.core.async.impl.buffers.RingBuffer.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.buffers/RingBuffer");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.buffers/RingBuffer.
- */
-cljs.core.async.impl.buffers.__GT_RingBuffer = (function cljs$core$async$impl$buffers$__GT_RingBuffer(head,tail,length,arr){
-return (new cljs.core.async.impl.buffers.RingBuffer(head,tail,length,arr));
-});
-
-cljs.core.async.impl.buffers.ring_buffer = (function cljs$core$async$impl$buffers$ring_buffer(n){
-if((n > (0))){
-} else {
-throw (new Error(["Assert failed: ","Can't create a ring buffer of size 0","\n","(> n 0)"].join('')));
-}
-
-return (new cljs.core.async.impl.buffers.RingBuffer((0),(0),(0),(new Array(n))));
-});
-
-/**
-* @constructor
- * @implements {cljs.core.ICounted}
- * @implements {cljs.core.async.impl.protocols.Buffer}
-*/
-cljs.core.async.impl.buffers.FixedBuffer = (function (buf,n){
-this.buf = buf;
-this.n = n;
-this.cljs$lang$protocol_mask$partition0$ = 2;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.buffers.FixedBuffer.prototype.cljs$core$async$impl$protocols$Buffer$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.buffers.FixedBuffer.prototype.cljs$core$async$impl$protocols$Buffer$full_QMARK_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return (self__.buf.length === self__.n);
-});
-
-cljs.core.async.impl.buffers.FixedBuffer.prototype.cljs$core$async$impl$protocols$Buffer$remove_BANG_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return self__.buf.pop();
-});
-
-cljs.core.async.impl.buffers.FixedBuffer.prototype.cljs$core$async$impl$protocols$Buffer$add_BANG__STAR_$arity$2 = (function (this$,itm){
-var self__ = this;
-var this$__$1 = this;
-self__.buf.unbounded_unshift(itm);
-
-return this$__$1;
-});
-
-cljs.core.async.impl.buffers.FixedBuffer.prototype.cljs$core$async$impl$protocols$Buffer$close_buf_BANG_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return null;
-});
-
-cljs.core.async.impl.buffers.FixedBuffer.prototype.cljs$core$ICounted$_count$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return self__.buf.length;
-});
-
-cljs.core.async.impl.buffers.FixedBuffer.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"buf","buf",1426618187,null),new cljs.core.Symbol(null,"n","n",-2092305744,null)], null);
-});
-
-cljs.core.async.impl.buffers.FixedBuffer.cljs$lang$type = true;
-
-cljs.core.async.impl.buffers.FixedBuffer.cljs$lang$ctorStr = "cljs.core.async.impl.buffers/FixedBuffer";
-
-cljs.core.async.impl.buffers.FixedBuffer.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.buffers/FixedBuffer");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.buffers/FixedBuffer.
- */
-cljs.core.async.impl.buffers.__GT_FixedBuffer = (function cljs$core$async$impl$buffers$__GT_FixedBuffer(buf,n){
-return (new cljs.core.async.impl.buffers.FixedBuffer(buf,n));
-});
-
-cljs.core.async.impl.buffers.fixed_buffer = (function cljs$core$async$impl$buffers$fixed_buffer(n){
-return (new cljs.core.async.impl.buffers.FixedBuffer(cljs.core.async.impl.buffers.ring_buffer.call(null,n),n));
-});
-
-/**
-* @constructor
- * @implements {cljs.core.ICounted}
- * @implements {cljs.core.async.impl.protocols.UnblockingBuffer}
- * @implements {cljs.core.async.impl.protocols.Buffer}
-*/
-cljs.core.async.impl.buffers.DroppingBuffer = (function (buf,n){
-this.buf = buf;
-this.n = n;
-this.cljs$lang$protocol_mask$partition0$ = 2;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.buffers.DroppingBuffer.prototype.cljs$core$async$impl$protocols$UnblockingBuffer$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.buffers.DroppingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.buffers.DroppingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$full_QMARK_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return false;
-});
-
-cljs.core.async.impl.buffers.DroppingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$remove_BANG_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return self__.buf.pop();
-});
-
-cljs.core.async.impl.buffers.DroppingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$add_BANG__STAR_$arity$2 = (function (this$,itm){
-var self__ = this;
-var this$__$1 = this;
-if((self__.buf.length === self__.n)){
-} else {
-self__.buf.unshift(itm);
-}
-
-return this$__$1;
-});
-
-cljs.core.async.impl.buffers.DroppingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$close_buf_BANG_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return null;
-});
-
-cljs.core.async.impl.buffers.DroppingBuffer.prototype.cljs$core$ICounted$_count$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return self__.buf.length;
-});
-
-cljs.core.async.impl.buffers.DroppingBuffer.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"buf","buf",1426618187,null),new cljs.core.Symbol(null,"n","n",-2092305744,null)], null);
-});
-
-cljs.core.async.impl.buffers.DroppingBuffer.cljs$lang$type = true;
-
-cljs.core.async.impl.buffers.DroppingBuffer.cljs$lang$ctorStr = "cljs.core.async.impl.buffers/DroppingBuffer";
-
-cljs.core.async.impl.buffers.DroppingBuffer.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.buffers/DroppingBuffer");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.buffers/DroppingBuffer.
- */
-cljs.core.async.impl.buffers.__GT_DroppingBuffer = (function cljs$core$async$impl$buffers$__GT_DroppingBuffer(buf,n){
-return (new cljs.core.async.impl.buffers.DroppingBuffer(buf,n));
-});
-
-cljs.core.async.impl.buffers.dropping_buffer = (function cljs$core$async$impl$buffers$dropping_buffer(n){
-return (new cljs.core.async.impl.buffers.DroppingBuffer(cljs.core.async.impl.buffers.ring_buffer.call(null,n),n));
-});
-
-/**
-* @constructor
- * @implements {cljs.core.ICounted}
- * @implements {cljs.core.async.impl.protocols.UnblockingBuffer}
- * @implements {cljs.core.async.impl.protocols.Buffer}
-*/
-cljs.core.async.impl.buffers.SlidingBuffer = (function (buf,n){
-this.buf = buf;
-this.n = n;
-this.cljs$lang$protocol_mask$partition0$ = 2;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.buffers.SlidingBuffer.prototype.cljs$core$async$impl$protocols$UnblockingBuffer$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.buffers.SlidingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.buffers.SlidingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$full_QMARK_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return false;
-});
-
-cljs.core.async.impl.buffers.SlidingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$remove_BANG_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return self__.buf.pop();
-});
-
-cljs.core.async.impl.buffers.SlidingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$add_BANG__STAR_$arity$2 = (function (this$,itm){
-var self__ = this;
-var this$__$1 = this;
-if((self__.buf.length === self__.n)){
-cljs.core.async.impl.protocols.remove_BANG_.call(null,this$__$1);
-} else {
-}
-
-self__.buf.unshift(itm);
-
-return this$__$1;
-});
-
-cljs.core.async.impl.buffers.SlidingBuffer.prototype.cljs$core$async$impl$protocols$Buffer$close_buf_BANG_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return null;
-});
-
-cljs.core.async.impl.buffers.SlidingBuffer.prototype.cljs$core$ICounted$_count$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-return self__.buf.length;
-});
-
-cljs.core.async.impl.buffers.SlidingBuffer.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"buf","buf",1426618187,null),new cljs.core.Symbol(null,"n","n",-2092305744,null)], null);
-});
-
-cljs.core.async.impl.buffers.SlidingBuffer.cljs$lang$type = true;
-
-cljs.core.async.impl.buffers.SlidingBuffer.cljs$lang$ctorStr = "cljs.core.async.impl.buffers/SlidingBuffer";
-
-cljs.core.async.impl.buffers.SlidingBuffer.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.buffers/SlidingBuffer");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.buffers/SlidingBuffer.
- */
-cljs.core.async.impl.buffers.__GT_SlidingBuffer = (function cljs$core$async$impl$buffers$__GT_SlidingBuffer(buf,n){
-return (new cljs.core.async.impl.buffers.SlidingBuffer(buf,n));
-});
-
-cljs.core.async.impl.buffers.sliding_buffer = (function cljs$core$async$impl$buffers$sliding_buffer(n){
-return (new cljs.core.async.impl.buffers.SlidingBuffer(cljs.core.async.impl.buffers.ring_buffer.call(null,n),n));
-});
-if((typeof cljs !== 'undefined') && (typeof cljs.core !== 'undefined') && (typeof cljs.core.async !== 'undefined') && (typeof cljs.core.async.impl !== 'undefined') && (typeof cljs.core.async.impl.buffers !== 'undefined') && (typeof cljs.core.async.impl.buffers.NO_VAL !== 'undefined')){
-} else {
-cljs.core.async.impl.buffers.NO_VAL = (new Object());
-}
-cljs.core.async.impl.buffers.undelivered_QMARK_ = (function cljs$core$async$impl$buffers$undelivered_QMARK_(val){
-return (cljs.core.async.impl.buffers.NO_VAL === val);
-});
-
-/**
-* @constructor
- * @implements {cljs.core.ICounted}
- * @implements {cljs.core.async.impl.protocols.UnblockingBuffer}
- * @implements {cljs.core.async.impl.protocols.Buffer}
-*/
-cljs.core.async.impl.buffers.PromiseBuffer = (function (val){
-this.val = val;
-this.cljs$lang$protocol_mask$partition0$ = 2;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.buffers.PromiseBuffer.prototype.cljs$core$async$impl$protocols$UnblockingBuffer$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.buffers.PromiseBuffer.prototype.cljs$core$async$impl$protocols$Buffer$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.buffers.PromiseBuffer.prototype.cljs$core$async$impl$protocols$Buffer$full_QMARK_$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-return false;
-});
-
-cljs.core.async.impl.buffers.PromiseBuffer.prototype.cljs$core$async$impl$protocols$Buffer$remove_BANG_$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-return self__.val;
-});
-
-cljs.core.async.impl.buffers.PromiseBuffer.prototype.cljs$core$async$impl$protocols$Buffer$add_BANG__STAR_$arity$2 = (function (this$,itm){
-var self__ = this;
-var this$__$1 = this;
-if(cljs.core.async.impl.buffers.undelivered_QMARK_.call(null,self__.val)){
-self__.val = itm;
-} else {
-}
-
-return this$__$1;
-});
-
-cljs.core.async.impl.buffers.PromiseBuffer.prototype.cljs$core$async$impl$protocols$Buffer$close_buf_BANG_$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-if(cljs.core.async.impl.buffers.undelivered_QMARK_.call(null,self__.val)){
-return self__.val = null;
-} else {
-return null;
-}
-});
-
-cljs.core.async.impl.buffers.PromiseBuffer.prototype.cljs$core$ICounted$_count$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-if(cljs.core.async.impl.buffers.undelivered_QMARK_.call(null,self__.val)){
-return (0);
-} else {
-return (1);
-}
-});
-
-cljs.core.async.impl.buffers.PromiseBuffer.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.with_meta(new cljs.core.Symbol(null,"val","val",1769233139,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null))], null);
-});
-
-cljs.core.async.impl.buffers.PromiseBuffer.cljs$lang$type = true;
-
-cljs.core.async.impl.buffers.PromiseBuffer.cljs$lang$ctorStr = "cljs.core.async.impl.buffers/PromiseBuffer";
-
-cljs.core.async.impl.buffers.PromiseBuffer.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.buffers/PromiseBuffer");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.buffers/PromiseBuffer.
- */
-cljs.core.async.impl.buffers.__GT_PromiseBuffer = (function cljs$core$async$impl$buffers$__GT_PromiseBuffer(val){
-return (new cljs.core.async.impl.buffers.PromiseBuffer(val));
-});
-
-cljs.core.async.impl.buffers.promise_buffer = (function cljs$core$async$impl$buffers$promise_buffer(){
-return (new cljs.core.async.impl.buffers.PromiseBuffer(cljs.core.async.impl.buffers.NO_VAL));
-});
-
-//# sourceMappingURL=buffers.js.map?rel=1582560146496

docs/js/compiled/out/cljs/core/async/impl/channels.cljs

@@ -1,192 +0,0 @@
-;;   Copyright (c) Rich Hickey and contributors. All rights reserved.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.core.async.impl.channels
-  (:require [cljs.core.async.impl.protocols :as impl]
-            [cljs.core.async.impl.dispatch :as dispatch]
-            [cljs.core.async.impl.buffers :as buffers]))
-
-
-
-(defn box [val]
-  (reify cljs.core/IDeref
-    (-deref [_] val)))
-
-(deftype PutBox [handler val])
-
-(defn put-active? [box]
-  (impl/active? (.-handler box)))
-
-(def ^:const MAX_DIRTY 64)
-
-(defprotocol MMC
-  (abort [this]))
-
-(deftype ManyToManyChannel [takes ^:mutable dirty-takes puts ^:mutable dirty-puts ^not-native buf ^:mutable closed add!]
-  MMC
-  (abort [this]
-    (loop []
-      (let [putter (.pop puts)]
-        (when-not (nil? putter)
-          (let [^not-native put-handler (.-handler putter)
-                val (.-val putter)]
-            (if ^boolean (impl/active? put-handler)
-              (let [put-cb (impl/commit put-handler)]
-                (dispatch/run #(put-cb true)))
-              (recur))))))
-    (.cleanup puts (constantly false))
-    (impl/close! this))
-  impl/WritePort
-  (put! [this val ^not-native handler]
-    (assert (not (nil? val)) "Can't put nil on a channel")
-    ;; bug in CLJS compiler boolean inference - David
-    (let [^boolean closed closed]
-      (if (or closed (not ^boolean (impl/active? handler)))
-        (box (not closed))
-        (if (and buf (not (impl/full? buf)))
-          (do
-            (impl/commit handler)
-            (let [done? (reduced? (add! buf val))
-                  take-cbs (loop [takers []]
-                             (if (and (pos? (.-length takes)) (pos? (count buf)))
-                               (let [^not-native taker (.pop takes)]
-                                 (if ^boolean (impl/active? taker)
-                                   (let [ret (impl/commit taker)
-                                         val (impl/remove! buf)]
-                                     (recur (conj takers (fn [] (ret val)))))
-                                   (recur takers)))
-                               takers))]
-              (when done? (abort this))
-              (when (seq take-cbs)
-                (doseq [f take-cbs]
-                  (dispatch/run f)))
-              (box true)))
-          (let [taker (loop []
-                        (let [^not-native taker (.pop takes)]
-                          (when taker
-                            (if (impl/active? taker)
-                              taker
-                              (recur)))))]
-            (if taker
-              (let [take-cb (impl/commit taker)]
-                (impl/commit handler)
-                (dispatch/run (fn [] (take-cb val)))
-                (box true))
-              (do
-                (if (> dirty-puts MAX_DIRTY)
-                  (do (set! dirty-puts 0)
-                      (.cleanup puts put-active?))
-                  (set! dirty-puts (inc dirty-puts)))
-                (when (impl/blockable? handler)
-                  (assert (< (.-length puts) impl/MAX-QUEUE-SIZE)
-                    (str "No more than " impl/MAX-QUEUE-SIZE
-                         " pending puts are allowed on a single channel."
-                         " Consider using a windowed buffer."))
-                  (.unbounded-unshift puts (PutBox. handler val)))
-                nil)))))))
-  impl/ReadPort
-  (take! [this ^not-native handler]
-    (if (not ^boolean (impl/active? handler))
-      nil
-      (if (and (not (nil? buf)) (pos? (count buf)))
-        (do
-          (if-let [take-cb (impl/commit handler)]
-            (let [val (impl/remove! buf)
-                  [done? cbs] (when (pos? (.-length puts))
-                                (loop [cbs []]
-                                  (let [putter (.pop puts)
-                                        ^not-native put-handler (.-handler putter)
-                                        val (.-val putter)
-                                        cb (and ^boolean (impl/active? put-handler) (impl/commit put-handler))
-                                        cbs (if cb (conj cbs cb) cbs)
-                                        done? (when cb (reduced? (add! buf val)))]
-                                    (if (and (not done?) (not (impl/full? buf)) (pos? (.-length puts)))
-                                      (recur cbs)
-                                      [done? cbs]))))]
-              (when done?
-                (abort this))
-              (doseq [cb cbs]
-                (dispatch/run #(cb true)))
-              (box val))))
-        (let [putter (loop []
-                       (let [putter (.pop puts)]
-                         (when putter
-                           (if ^boolean (impl/active? (.-handler putter))
-                             putter
-                             (recur)))))]
-          (if putter
-            (let [put-cb (impl/commit (.-handler putter))]
-              (impl/commit handler)
-              (dispatch/run #(put-cb true))
-              (box (.-val putter)))
-            (if closed
-              (do
-                (when buf (add! buf))
-                (if (and (impl/active? handler) (impl/commit handler))
-                  (let [has-val (and buf (pos? (count buf)))]
-                    (let [val (when has-val (impl/remove! buf))]
-                      (box val)))
-                  nil))
-              (do
-                (if (> dirty-takes MAX_DIRTY)
-                  (do (set! dirty-takes 0)
-                      (.cleanup takes impl/active?))
-                  (set! dirty-takes (inc dirty-takes)))
-                (when (impl/blockable? handler)
-                  (assert (< (.-length takes) impl/MAX-QUEUE-SIZE)
-                    (str "No more than " impl/MAX-QUEUE-SIZE
-                         " pending takes are allowed on a single channel."))
-                  (.unbounded-unshift takes handler))
-                nil)))))))
-  impl/Channel
-  (closed? [_] closed)
-  (close! [this]
-    (if ^boolean closed
-        nil
-        (do (set! closed true)
-            (when (and buf (zero? (.-length puts)))
-                    (add! buf))
-            (loop []
-              (let [^not-native taker (.pop takes)]
-                (when-not (nil? taker)
-                  (when ^boolean (impl/active? taker)
-                    (let [take-cb (impl/commit taker)
-                          val (when (and buf (pos? (count buf))) (impl/remove! buf))]
-                      (dispatch/run (fn [] (take-cb val)))))
-                  (recur))))
-            (when buf (impl/close-buf! buf))
-            nil))))
-
-(defn- ex-handler [ex]
-  (.log js/console ex)
-  nil)
-
-(defn- handle [buf exh t]
-  (let [else ((or exh ex-handler) t)]
-    (if (nil? else)
-      buf
-      (impl/add! buf else))))
-
-(defn chan
-  ([buf] (chan buf nil))
-  ([buf xform] (chan buf xform nil))
-  ([buf xform exh]
-     (ManyToManyChannel. (buffers/ring-buffer 32) 0 (buffers/ring-buffer 32)
-                         0 buf false
-                         (let [add! (if xform (xform impl/add!) impl/add!)]
-                           (fn
-                             ([buf]
-                              (try
-                                (add! buf)
-                                (catch :default t
-                                  (handle buf exh t))))
-                             ([buf val]
-                              (try
-                                (add! buf val)
-                                (catch :default t
-                                  (handle buf exh t)))))))))

docs/js/compiled/out/cljs/core/async/impl/channels.js

@@ -1,685 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.core.async.impl.channels');
-goog.require('cljs.core');
-goog.require('cljs.core.async.impl.protocols');
-goog.require('cljs.core.async.impl.dispatch');
-goog.require('cljs.core.async.impl.buffers');
-cljs.core.async.impl.channels.box = (function cljs$core$async$impl$channels$box(val){
-if((typeof cljs !== 'undefined') && (typeof cljs.core !== 'undefined') && (typeof cljs.core.async !== 'undefined') && (typeof cljs.core.async.impl !== 'undefined') && (typeof cljs.core.async.impl.channels !== 'undefined') && (typeof cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847 !== 'undefined')){
-} else {
-
-/**
-* @constructor
- * @implements {cljs.core.IMeta}
- * @implements {cljs.core.IDeref}
- * @implements {cljs.core.IWithMeta}
-*/
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847 = (function (val,meta20848){
-this.val = val;
-this.meta20848 = meta20848;
-this.cljs$lang$protocol_mask$partition0$ = 425984;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847.prototype.cljs$core$IWithMeta$_with_meta$arity$2 = (function (_20849,meta20848__$1){
-var self__ = this;
-var _20849__$1 = this;
-return (new cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847(self__.val,meta20848__$1));
-});
-
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847.prototype.cljs$core$IMeta$_meta$arity$1 = (function (_20849){
-var self__ = this;
-var _20849__$1 = this;
-return self__.meta20848;
-});
-
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847.prototype.cljs$core$IDeref$_deref$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-return self__.val;
-});
-
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"val","val",1769233139,null),new cljs.core.Symbol(null,"meta20848","meta20848",1569359721,null)], null);
-});
-
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847.cljs$lang$type = true;
-
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847.cljs$lang$ctorStr = "cljs.core.async.impl.channels/t_cljs$core$async$impl$channels20847";
-
-cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.channels/t_cljs$core$async$impl$channels20847");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.channels/t_cljs$core$async$impl$channels20847.
- */
-cljs.core.async.impl.channels.__GT_t_cljs$core$async$impl$channels20847 = (function cljs$core$async$impl$channels$box_$___GT_t_cljs$core$async$impl$channels20847(val__$1,meta20848){
-return (new cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847(val__$1,meta20848));
-});
-
-}
-
-return (new cljs.core.async.impl.channels.t_cljs$core$async$impl$channels20847(val,cljs.core.PersistentArrayMap.EMPTY));
-});
-
-/**
-* @constructor
-*/
-cljs.core.async.impl.channels.PutBox = (function (handler,val){
-this.handler = handler;
-this.val = val;
-});
-
-cljs.core.async.impl.channels.PutBox.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"handler","handler",1444934915,null),new cljs.core.Symbol(null,"val","val",1769233139,null)], null);
-});
-
-cljs.core.async.impl.channels.PutBox.cljs$lang$type = true;
-
-cljs.core.async.impl.channels.PutBox.cljs$lang$ctorStr = "cljs.core.async.impl.channels/PutBox";
-
-cljs.core.async.impl.channels.PutBox.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.channels/PutBox");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.channels/PutBox.
- */
-cljs.core.async.impl.channels.__GT_PutBox = (function cljs$core$async$impl$channels$__GT_PutBox(handler,val){
-return (new cljs.core.async.impl.channels.PutBox(handler,val));
-});
-
-cljs.core.async.impl.channels.put_active_QMARK_ = (function cljs$core$async$impl$channels$put_active_QMARK_(box){
-return cljs.core.async.impl.protocols.active_QMARK_.call(null,box.handler);
-});
-cljs.core.async.impl.channels.MAX_DIRTY = (64);
-
-/**
- * @interface
- */
-cljs.core.async.impl.channels.MMC = function(){};
-
-cljs.core.async.impl.channels.abort = (function cljs$core$async$impl$channels$abort(this$){
-if((((!((this$ == null)))) && ((!((this$.cljs$core$async$impl$channels$MMC$abort$arity$1 == null)))))){
-return this$.cljs$core$async$impl$channels$MMC$abort$arity$1(this$);
-} else {
-var x__4433__auto__ = (((this$ == null))?null:this$);
-var m__4434__auto__ = (cljs.core.async.impl.channels.abort[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,this$);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.channels.abort["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,this$);
-} else {
-throw cljs.core.missing_protocol.call(null,"MMC.abort",this$);
-}
-}
-}
-});
-
-
-/**
-* @constructor
- * @implements {cljs.core.async.impl.channels.MMC}
- * @implements {cljs.core.async.impl.protocols.Channel}
- * @implements {cljs.core.async.impl.protocols.WritePort}
- * @implements {cljs.core.async.impl.protocols.ReadPort}
-*/
-cljs.core.async.impl.channels.ManyToManyChannel = (function (takes,dirty_takes,puts,dirty_puts,buf,closed,add_BANG_){
-this.takes = takes;
-this.dirty_takes = dirty_takes;
-this.puts = puts;
-this.dirty_puts = dirty_puts;
-this.buf = buf;
-this.closed = closed;
-this.add_BANG_ = add_BANG_;
-});
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$channels$MMC$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$channels$MMC$abort$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-while(true){
-var putter_20861 = self__.puts.pop();
-if((putter_20861 == null)){
-} else {
-var put_handler_20862 = putter_20861.handler;
-var val_20863 = putter_20861.val;
-if(cljs.core.async.impl.protocols.active_QMARK_.call(null,put_handler_20862)){
-var put_cb_20864 = cljs.core.async.impl.protocols.commit.call(null,put_handler_20862);
-cljs.core.async.impl.dispatch.run.call(null,((function (put_cb_20864,put_handler_20862,val_20863,putter_20861,this$__$1){
-return (function (){
-return put_cb_20864.call(null,true);
-});})(put_cb_20864,put_handler_20862,val_20863,putter_20861,this$__$1))
-);
-} else {
-continue;
-}
-}
-break;
-}
-
-self__.puts.cleanup(cljs.core.constantly.call(null,false));
-
-return cljs.core.async.impl.protocols.close_BANG_.call(null,this$__$1);
-});
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$protocols$WritePort$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$protocols$WritePort$put_BANG_$arity$3 = (function (this$,val,handler){
-var self__ = this;
-var this$__$1 = this;
-if((!((val == null)))){
-} else {
-throw (new Error(["Assert failed: ","Can't put nil on a channel","\n","(not (nil? val))"].join('')));
-}
-
-var closed__$1 = self__.closed;
-if(((closed__$1) || ((!(cljs.core.async.impl.protocols.active_QMARK_.call(null,handler)))))){
-return cljs.core.async.impl.channels.box.call(null,(!(closed__$1)));
-} else {
-if(cljs.core.truth_((function (){var and__4120__auto__ = self__.buf;
-if(cljs.core.truth_(and__4120__auto__)){
-return cljs.core.not.call(null,cljs.core.async.impl.protocols.full_QMARK_.call(null,self__.buf));
-} else {
-return and__4120__auto__;
-}
-})())){
-cljs.core.async.impl.protocols.commit.call(null,handler);
-
-var done_QMARK_ = cljs.core.reduced_QMARK_.call(null,self__.add_BANG_.call(null,self__.buf,val));
-var take_cbs = (function (){var takers = cljs.core.PersistentVector.EMPTY;
-while(true){
-if((((self__.takes.length > (0))) && ((cljs.core.count.call(null,self__.buf) > (0))))){
-var taker = self__.takes.pop();
-if(cljs.core.async.impl.protocols.active_QMARK_.call(null,taker)){
-var ret = cljs.core.async.impl.protocols.commit.call(null,taker);
-var val__$1 = cljs.core.async.impl.protocols.remove_BANG_.call(null,self__.buf);
-var G__20865 = cljs.core.conj.call(null,takers,((function (takers,ret,val__$1,taker,done_QMARK_,closed__$1,this$__$1){
-return (function (){
-return ret.call(null,val__$1);
-});})(takers,ret,val__$1,taker,done_QMARK_,closed__$1,this$__$1))
-);
-takers = G__20865;
-continue;
-} else {
-var G__20866 = takers;
-takers = G__20866;
-continue;
-}
-} else {
-return takers;
-}
-break;
-}
-})();
-if(done_QMARK_){
-cljs.core.async.impl.channels.abort.call(null,this$__$1);
-} else {
-}
-
-if(cljs.core.seq.call(null,take_cbs)){
-var seq__20850_20867 = cljs.core.seq.call(null,take_cbs);
-var chunk__20851_20868 = null;
-var count__20852_20869 = (0);
-var i__20853_20870 = (0);
-while(true){
-if((i__20853_20870 < count__20852_20869)){
-var f_20871 = cljs.core._nth.call(null,chunk__20851_20868,i__20853_20870);
-cljs.core.async.impl.dispatch.run.call(null,f_20871);
-
-
-var G__20872 = seq__20850_20867;
-var G__20873 = chunk__20851_20868;
-var G__20874 = count__20852_20869;
-var G__20875 = (i__20853_20870 + (1));
-seq__20850_20867 = G__20872;
-chunk__20851_20868 = G__20873;
-count__20852_20869 = G__20874;
-i__20853_20870 = G__20875;
-continue;
-} else {
-var temp__5720__auto___20876 = cljs.core.seq.call(null,seq__20850_20867);
-if(temp__5720__auto___20876){
-var seq__20850_20877__$1 = temp__5720__auto___20876;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__20850_20877__$1)){
-var c__4550__auto___20878 = cljs.core.chunk_first.call(null,seq__20850_20877__$1);
-var G__20879 = cljs.core.chunk_rest.call(null,seq__20850_20877__$1);
-var G__20880 = c__4550__auto___20878;
-var G__20881 = cljs.core.count.call(null,c__4550__auto___20878);
-var G__20882 = (0);
-seq__20850_20867 = G__20879;
-chunk__20851_20868 = G__20880;
-count__20852_20869 = G__20881;
-i__20853_20870 = G__20882;
-continue;
-} else {
-var f_20883 = cljs.core.first.call(null,seq__20850_20877__$1);
-cljs.core.async.impl.dispatch.run.call(null,f_20883);
-
-
-var G__20884 = cljs.core.next.call(null,seq__20850_20877__$1);
-var G__20885 = null;
-var G__20886 = (0);
-var G__20887 = (0);
-seq__20850_20867 = G__20884;
-chunk__20851_20868 = G__20885;
-count__20852_20869 = G__20886;
-i__20853_20870 = G__20887;
-continue;
-}
-} else {
-}
-}
-break;
-}
-} else {
-}
-
-return cljs.core.async.impl.channels.box.call(null,true);
-} else {
-var taker = (function (){while(true){
-var taker = self__.takes.pop();
-if(cljs.core.truth_(taker)){
-if(cljs.core.truth_(cljs.core.async.impl.protocols.active_QMARK_.call(null,taker))){
-return taker;
-} else {
-continue;
-}
-} else {
-return null;
-}
-break;
-}
-})();
-if(cljs.core.truth_(taker)){
-var take_cb = cljs.core.async.impl.protocols.commit.call(null,taker);
-cljs.core.async.impl.protocols.commit.call(null,handler);
-
-cljs.core.async.impl.dispatch.run.call(null,((function (take_cb,taker,closed__$1,this$__$1){
-return (function (){
-return take_cb.call(null,val);
-});})(take_cb,taker,closed__$1,this$__$1))
-);
-
-return cljs.core.async.impl.channels.box.call(null,true);
-} else {
-if((self__.dirty_puts > (64))){
-self__.dirty_puts = (0);
-
-self__.puts.cleanup(cljs.core.async.impl.channels.put_active_QMARK_);
-} else {
-self__.dirty_puts = (self__.dirty_puts + (1));
-}
-
-if(cljs.core.truth_(cljs.core.async.impl.protocols.blockable_QMARK_.call(null,handler))){
-if((self__.puts.length < (1024))){
-} else {
-throw (new Error(["Assert failed: ",["No more than ",cljs.core.str.cljs$core$IFn$_invoke$arity$1((1024))," pending puts are allowed on a single channel."," Consider using a windowed buffer."].join(''),"\n","(< (.-length puts) impl/MAX-QUEUE-SIZE)"].join('')));
-}
-
-self__.puts.unbounded_unshift((new cljs.core.async.impl.channels.PutBox(handler,val)));
-} else {
-}
-
-return null;
-}
-}
-}
-});
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$protocols$ReadPort$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$protocols$ReadPort$take_BANG_$arity$2 = (function (this$,handler){
-var self__ = this;
-var this$__$1 = this;
-if((!(cljs.core.async.impl.protocols.active_QMARK_.call(null,handler)))){
-return null;
-} else {
-if((((!((self__.buf == null)))) && ((cljs.core.count.call(null,self__.buf) > (0))))){
-var temp__5718__auto__ = cljs.core.async.impl.protocols.commit.call(null,handler);
-if(cljs.core.truth_(temp__5718__auto__)){
-var take_cb = temp__5718__auto__;
-var val = cljs.core.async.impl.protocols.remove_BANG_.call(null,self__.buf);
-var vec__20854 = (((self__.puts.length > (0)))?(function (){var cbs = cljs.core.PersistentVector.EMPTY;
-while(true){
-var putter = self__.puts.pop();
-var put_handler = putter.handler;
-var val__$1 = putter.val;
-var cb = (function (){var and__4120__auto__ = cljs.core.async.impl.protocols.active_QMARK_.call(null,put_handler);
-if(and__4120__auto__){
-return cljs.core.async.impl.protocols.commit.call(null,put_handler);
-} else {
-return and__4120__auto__;
-}
-})();
-var cbs__$1 = (cljs.core.truth_(cb)?cljs.core.conj.call(null,cbs,cb):cbs);
-var done_QMARK_ = (cljs.core.truth_(cb)?cljs.core.reduced_QMARK_.call(null,self__.add_BANG_.call(null,self__.buf,val__$1)):null);
-if(((cljs.core.not.call(null,done_QMARK_)) && (cljs.core.not.call(null,cljs.core.async.impl.protocols.full_QMARK_.call(null,self__.buf))) && ((self__.puts.length > (0))))){
-var G__20888 = cbs__$1;
-cbs = G__20888;
-continue;
-} else {
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [done_QMARK_,cbs__$1], null);
-}
-break;
-}
-})():null);
-var done_QMARK_ = cljs.core.nth.call(null,vec__20854,(0),null);
-var cbs = cljs.core.nth.call(null,vec__20854,(1),null);
-if(cljs.core.truth_(done_QMARK_)){
-cljs.core.async.impl.channels.abort.call(null,this$__$1);
-} else {
-}
-
-var seq__20857_20889 = cljs.core.seq.call(null,cbs);
-var chunk__20858_20890 = null;
-var count__20859_20891 = (0);
-var i__20860_20892 = (0);
-while(true){
-if((i__20860_20892 < count__20859_20891)){
-var cb_20893 = cljs.core._nth.call(null,chunk__20858_20890,i__20860_20892);
-cljs.core.async.impl.dispatch.run.call(null,((function (seq__20857_20889,chunk__20858_20890,count__20859_20891,i__20860_20892,cb_20893,val,vec__20854,done_QMARK_,cbs,take_cb,temp__5718__auto__,this$__$1){
-return (function (){
-return cb_20893.call(null,true);
-});})(seq__20857_20889,chunk__20858_20890,count__20859_20891,i__20860_20892,cb_20893,val,vec__20854,done_QMARK_,cbs,take_cb,temp__5718__auto__,this$__$1))
-);
-
-
-var G__20894 = seq__20857_20889;
-var G__20895 = chunk__20858_20890;
-var G__20896 = count__20859_20891;
-var G__20897 = (i__20860_20892 + (1));
-seq__20857_20889 = G__20894;
-chunk__20858_20890 = G__20895;
-count__20859_20891 = G__20896;
-i__20860_20892 = G__20897;
-continue;
-} else {
-var temp__5720__auto___20898 = cljs.core.seq.call(null,seq__20857_20889);
-if(temp__5720__auto___20898){
-var seq__20857_20899__$1 = temp__5720__auto___20898;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__20857_20899__$1)){
-var c__4550__auto___20900 = cljs.core.chunk_first.call(null,seq__20857_20899__$1);
-var G__20901 = cljs.core.chunk_rest.call(null,seq__20857_20899__$1);
-var G__20902 = c__4550__auto___20900;
-var G__20903 = cljs.core.count.call(null,c__4550__auto___20900);
-var G__20904 = (0);
-seq__20857_20889 = G__20901;
-chunk__20858_20890 = G__20902;
-count__20859_20891 = G__20903;
-i__20860_20892 = G__20904;
-continue;
-} else {
-var cb_20905 = cljs.core.first.call(null,seq__20857_20899__$1);
-cljs.core.async.impl.dispatch.run.call(null,((function (seq__20857_20889,chunk__20858_20890,count__20859_20891,i__20860_20892,cb_20905,seq__20857_20899__$1,temp__5720__auto___20898,val,vec__20854,done_QMARK_,cbs,take_cb,temp__5718__auto__,this$__$1){
-return (function (){
-return cb_20905.call(null,true);
-});})(seq__20857_20889,chunk__20858_20890,count__20859_20891,i__20860_20892,cb_20905,seq__20857_20899__$1,temp__5720__auto___20898,val,vec__20854,done_QMARK_,cbs,take_cb,temp__5718__auto__,this$__$1))
-);
-
-
-var G__20906 = cljs.core.next.call(null,seq__20857_20899__$1);
-var G__20907 = null;
-var G__20908 = (0);
-var G__20909 = (0);
-seq__20857_20889 = G__20906;
-chunk__20858_20890 = G__20907;
-count__20859_20891 = G__20908;
-i__20860_20892 = G__20909;
-continue;
-}
-} else {
-}
-}
-break;
-}
-
-return cljs.core.async.impl.channels.box.call(null,val);
-} else {
-return null;
-}
-} else {
-var putter = (function (){while(true){
-var putter = self__.puts.pop();
-if(cljs.core.truth_(putter)){
-if(cljs.core.async.impl.protocols.active_QMARK_.call(null,putter.handler)){
-return putter;
-} else {
-continue;
-}
-} else {
-return null;
-}
-break;
-}
-})();
-if(cljs.core.truth_(putter)){
-var put_cb = cljs.core.async.impl.protocols.commit.call(null,putter.handler);
-cljs.core.async.impl.protocols.commit.call(null,handler);
-
-cljs.core.async.impl.dispatch.run.call(null,((function (put_cb,putter,this$__$1){
-return (function (){
-return put_cb.call(null,true);
-});})(put_cb,putter,this$__$1))
-);
-
-return cljs.core.async.impl.channels.box.call(null,putter.val);
-} else {
-if(cljs.core.truth_(self__.closed)){
-if(cljs.core.truth_(self__.buf)){
-self__.add_BANG_.call(null,self__.buf);
-} else {
-}
-
-if(cljs.core.truth_((function (){var and__4120__auto__ = cljs.core.async.impl.protocols.active_QMARK_.call(null,handler);
-if(cljs.core.truth_(and__4120__auto__)){
-return cljs.core.async.impl.protocols.commit.call(null,handler);
-} else {
-return and__4120__auto__;
-}
-})())){
-var has_val = (function (){var and__4120__auto__ = self__.buf;
-if(cljs.core.truth_(and__4120__auto__)){
-return (cljs.core.count.call(null,self__.buf) > (0));
-} else {
-return and__4120__auto__;
-}
-})();
-var val = (cljs.core.truth_(has_val)?cljs.core.async.impl.protocols.remove_BANG_.call(null,self__.buf):null);
-return cljs.core.async.impl.channels.box.call(null,val);
-} else {
-return null;
-}
-} else {
-if((self__.dirty_takes > (64))){
-self__.dirty_takes = (0);
-
-self__.takes.cleanup(cljs.core.async.impl.protocols.active_QMARK_);
-} else {
-self__.dirty_takes = (self__.dirty_takes + (1));
-}
-
-if(cljs.core.truth_(cljs.core.async.impl.protocols.blockable_QMARK_.call(null,handler))){
-if((self__.takes.length < (1024))){
-} else {
-throw (new Error(["Assert failed: ",["No more than ",cljs.core.str.cljs$core$IFn$_invoke$arity$1((1024))," pending takes are allowed on a single channel."].join(''),"\n","(< (.-length takes) impl/MAX-QUEUE-SIZE)"].join('')));
-}
-
-self__.takes.unbounded_unshift(handler);
-} else {
-}
-
-return null;
-}
-}
-}
-}
-});
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$protocols$Channel$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$protocols$Channel$closed_QMARK_$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-return self__.closed;
-});
-
-cljs.core.async.impl.channels.ManyToManyChannel.prototype.cljs$core$async$impl$protocols$Channel$close_BANG_$arity$1 = (function (this$){
-var self__ = this;
-var this$__$1 = this;
-if(self__.closed){
-return null;
-} else {
-self__.closed = true;
-
-if(cljs.core.truth_((function (){var and__4120__auto__ = self__.buf;
-if(cljs.core.truth_(and__4120__auto__)){
-return (self__.puts.length === (0));
-} else {
-return and__4120__auto__;
-}
-})())){
-self__.add_BANG_.call(null,self__.buf);
-} else {
-}
-
-while(true){
-var taker_20910 = self__.takes.pop();
-if((taker_20910 == null)){
-} else {
-if(cljs.core.async.impl.protocols.active_QMARK_.call(null,taker_20910)){
-var take_cb_20911 = cljs.core.async.impl.protocols.commit.call(null,taker_20910);
-var val_20912 = (cljs.core.truth_((function (){var and__4120__auto__ = self__.buf;
-if(cljs.core.truth_(and__4120__auto__)){
-return (cljs.core.count.call(null,self__.buf) > (0));
-} else {
-return and__4120__auto__;
-}
-})())?cljs.core.async.impl.protocols.remove_BANG_.call(null,self__.buf):null);
-cljs.core.async.impl.dispatch.run.call(null,((function (take_cb_20911,val_20912,taker_20910,this$__$1){
-return (function (){
-return take_cb_20911.call(null,val_20912);
-});})(take_cb_20911,val_20912,taker_20910,this$__$1))
-);
-} else {
-}
-
-continue;
-}
-break;
-}
-
-if(cljs.core.truth_(self__.buf)){
-cljs.core.async.impl.protocols.close_buf_BANG_.call(null,self__.buf);
-} else {
-}
-
-return null;
-}
-});
-
-cljs.core.async.impl.channels.ManyToManyChannel.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 7, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"takes","takes",298247964,null),cljs.core.with_meta(new cljs.core.Symbol(null,"dirty-takes","dirty-takes",575642138,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),new cljs.core.Symbol(null,"puts","puts",-1883877054,null),cljs.core.with_meta(new cljs.core.Symbol(null,"dirty-puts","dirty-puts",57041148,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"buf","buf",1426618187,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tag","tag",-1290361223),new cljs.core.Symbol(null,"not-native","not-native",-236392494,null)], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"closed","closed",720856168,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),new cljs.core.Symbol(null,"add!","add!",2046056845,null)], null);
-});
-
-cljs.core.async.impl.channels.ManyToManyChannel.cljs$lang$type = true;
-
-cljs.core.async.impl.channels.ManyToManyChannel.cljs$lang$ctorStr = "cljs.core.async.impl.channels/ManyToManyChannel";
-
-cljs.core.async.impl.channels.ManyToManyChannel.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.channels/ManyToManyChannel");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.channels/ManyToManyChannel.
- */
-cljs.core.async.impl.channels.__GT_ManyToManyChannel = (function cljs$core$async$impl$channels$__GT_ManyToManyChannel(takes,dirty_takes,puts,dirty_puts,buf,closed,add_BANG_){
-return (new cljs.core.async.impl.channels.ManyToManyChannel(takes,dirty_takes,puts,dirty_puts,buf,closed,add_BANG_));
-});
-
-cljs.core.async.impl.channels.ex_handler = (function cljs$core$async$impl$channels$ex_handler(ex){
-console.log(ex);
-
-return null;
-});
-cljs.core.async.impl.channels.handle = (function cljs$core$async$impl$channels$handle(buf,exh,t){
-var else$ = (function (){var or__4131__auto__ = exh;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return cljs.core.async.impl.channels.ex_handler;
-}
-})().call(null,t);
-if((else$ == null)){
-return buf;
-} else {
-return cljs.core.async.impl.protocols.add_BANG_.call(null,buf,else$);
-}
-});
-cljs.core.async.impl.channels.chan = (function cljs$core$async$impl$channels$chan(var_args){
-var G__20914 = arguments.length;
-switch (G__20914) {
-case 1:
-return cljs.core.async.impl.channels.chan.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.core.async.impl.channels.chan.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-case 3:
-return cljs.core.async.impl.channels.chan.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.core.async.impl.channels.chan.cljs$core$IFn$_invoke$arity$1 = (function (buf){
-return cljs.core.async.impl.channels.chan.call(null,buf,null);
-});
-
-cljs.core.async.impl.channels.chan.cljs$core$IFn$_invoke$arity$2 = (function (buf,xform){
-return cljs.core.async.impl.channels.chan.call(null,buf,xform,null);
-});
-
-cljs.core.async.impl.channels.chan.cljs$core$IFn$_invoke$arity$3 = (function (buf,xform,exh){
-return (new cljs.core.async.impl.channels.ManyToManyChannel(cljs.core.async.impl.buffers.ring_buffer.call(null,(32)),(0),cljs.core.async.impl.buffers.ring_buffer.call(null,(32)),(0),buf,false,(function (){var add_BANG_ = (cljs.core.truth_(xform)?xform.call(null,cljs.core.async.impl.protocols.add_BANG_):cljs.core.async.impl.protocols.add_BANG_);
-return ((function (add_BANG_){
-return (function() {
-var G__20918 = null;
-var G__20918__1 = (function (buf__$1){
-try{return add_BANG_.call(null,buf__$1);
-}catch (e20915){var t = e20915;
-return cljs.core.async.impl.channels.handle.call(null,buf__$1,exh,t);
-}});
-var G__20918__2 = (function (buf__$1,val){
-try{return add_BANG_.call(null,buf__$1,val);
-}catch (e20916){var t = e20916;
-return cljs.core.async.impl.channels.handle.call(null,buf__$1,exh,t);
-}});
-G__20918 = function(buf__$1,val){
-switch(arguments.length){
-case 1:
-return G__20918__1.call(this,buf__$1);
-case 2:
-return G__20918__2.call(this,buf__$1,val);
-}
-throw(new Error('Invalid arity: ' + arguments.length));
-};
-G__20918.cljs$core$IFn$_invoke$arity$1 = G__20918__1;
-G__20918.cljs$core$IFn$_invoke$arity$2 = G__20918__2;
-return G__20918;
-})()
-;})(add_BANG_))
-})()));
-});
-
-cljs.core.async.impl.channels.chan.cljs$lang$maxFixedArity = 3;
-
-
-//# sourceMappingURL=channels.js.map?rel=1582560146581

docs/js/compiled/out/cljs/core/async/impl/dispatch.cljs

@@ -1,37 +0,0 @@
-(ns cljs.core.async.impl.dispatch
-  (:require [cljs.core.async.impl.buffers :as buffers]
-            [goog.async.nextTick]))
-
-(def tasks (buffers/ring-buffer 32))
-(def running? false)
-(def queued? false)
-
-(def TASK_BATCH_SIZE 1024)
-
-(declare queue-dispatcher)
-
-(defn process-messages []
-  (set! running? true)
-  (set! queued? false)
-  (loop [count 0]
-    (let [m (.pop tasks)]
-      (when-not (nil? m)
-        (m)
-        (when (< count TASK_BATCH_SIZE)
-          (recur (inc count))))))
-  (set! running? false)
-  (when (> (.-length tasks) 0)
-    (queue-dispatcher)))
-
-(defn queue-dispatcher []
-  (when-not (and queued? running?)
-    (set! queued? true)
-    (goog.async.nextTick process-messages)))
-
-(defn run [f]
-  (.unbounded-unshift tasks f)
-  (queue-dispatcher))
-
-(defn queue-delay [f delay]
-  (js/setTimeout f delay))
-

docs/js/compiled/out/cljs/core/async/impl/dispatch.cljs.cache.json

@@ -1 +0,0 @@
-["^ ","~:rename-macros",["^ "],"~:renames",["^ "],"~:externs",["^ ","~$setTimeout",["^ "]],"~:use-macros",["^ "],"~:excludes",["~#set",[]],"~:name","~$cljs.core.async.impl.dispatch","~:imports",null,"~:requires",["^ ","~$buffers","~$cljs.core.async.impl.buffers","^<","^<","~$goog.async.nextTick","^="],"~:cljs.spec/speced-vars",[],"~:uses",null,"~:defs",["^ ","~$tasks",["^ ","^7","~$cljs.core.async.impl.dispatch/tasks","~:file","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","~:line",5,"~:column",1,"~:end-line",5,"~:end-column",11,"~:meta",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",5,"^E",6,"^F",5,"^G",11],"~:tag","~$cljs.core.async.impl.buffers/RingBuffer"],"~$running?",["^ ","^7","~$cljs.core.async.impl.dispatch/running?","^C","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",6,"^E",1,"^F",6,"^G",14,"^H",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",6,"^E",6,"^F",6,"^G",14],"^I","~$boolean"],"~$queued?",["^ ","^7","~$cljs.core.async.impl.dispatch/queued?","^C","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",7,"^E",1,"^F",7,"^G",13,"^H",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",7,"^E",6,"^F",7,"^G",13],"^I","^M"],"~$TASK_BATCH_SIZE",["^ ","^7","~$cljs.core.async.impl.dispatch/TASK_BATCH_SIZE","^C","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",9,"^E",1,"^F",9,"^G",21,"^H",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",9,"^E",6,"^F",9,"^G",21],"^I","~$number"],"~$queue-dispatcher",["^ ","~:protocol-inline",null,"^H",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",26,"^E",7,"^F",26,"^G",23,"~:arglists",["~#list",["~$quote",["^V",[[]]]]]],"^7","~$cljs.core.async.impl.dispatch/queue-dispatcher","^C","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^G",23,"~:method-params",["^V",[[]]],"~:protocol-impl",null,"~:arglists-meta",["^V",[null,null]],"^E",1,"~:variadic?",false,"^D",26,"~:ret-tag",["^6",["~$any","~$clj-nil"]],"^F",26,"~:max-fixed-arity",0,"~:fn-var",true,"^U",["^V",["^W",["^V",[[]]]]]],"~$process-messages",["^ ","^T",null,"^H",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",13,"^E",7,"^F",13,"^G",23,"^U",["^V",["^W",["^V",[[]]]]]],"^7","~$cljs.core.async.impl.dispatch/process-messages","^C","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^G",23,"^Y",["^V",[[]]],"^Z",null,"^[",["^V",[null,null]],"^E",1,"^10",false,"^D",13,"^11",["^6",["^12","^13"]],"^F",13,"^14",0,"^15",true,"^U",["^V",["^W",["^V",[[]]]]]],"~$run",["^ ","^T",null,"^H",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",31,"^E",7,"^F",31,"^G",10,"^U",["^V",["^W",["^V",[["~$f"]]]]]],"^7","~$cljs.core.async.impl.dispatch/run","^C","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^G",10,"^Y",["^V",[["~$f"]]],"^Z",null,"^[",["^V",[null,null]],"^E",1,"^10",false,"^D",31,"^11",["^6",["^12","^13"]],"^F",31,"^14",1,"^15",true,"^U",["^V",["^W",["^V",[["~$f"]]]]]],"~$queue-delay",["^ ","^T",null,"^H",["^ ","^C","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^D",35,"^E",7,"^F",35,"^G",18,"^U",["^V",["^W",["^V",[["~$f","~$delay"]]]]]],"^7","~$cljs.core.async.impl.dispatch/queue-delay","^C","resources/public/js/compiled/out/cljs/core/async/impl/dispatch.cljs","^G",18,"^Y",["^V",[["~$f","^1;"]]],"^Z",null,"^[",["^V",[null,null]],"^E",1,"^10",false,"^D",35,"^11","~$js","^F",35,"^14",2,"^15",true,"^U",["^V",["^W",["^V",[["~$f","^1;"]]]]]]],"~:cljs.spec/registry-ref",[],"~:require-macros",null,"~:doc",null]

docs/js/compiled/out/cljs/core/async/impl/dispatch.js

@@ -1,58 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.core.async.impl.dispatch');
-goog.require('cljs.core');
-goog.require('cljs.core.async.impl.buffers');
-goog.require('goog.async.nextTick');
-cljs.core.async.impl.dispatch.tasks = cljs.core.async.impl.buffers.ring_buffer.call(null,(32));
-cljs.core.async.impl.dispatch.running_QMARK_ = false;
-cljs.core.async.impl.dispatch.queued_QMARK_ = false;
-cljs.core.async.impl.dispatch.TASK_BATCH_SIZE = (1024);
-cljs.core.async.impl.dispatch.process_messages = (function cljs$core$async$impl$dispatch$process_messages(){
-cljs.core.async.impl.dispatch.running_QMARK_ = true;
-
-cljs.core.async.impl.dispatch.queued_QMARK_ = false;
-
-var count_20842 = (0);
-while(true){
-var m_20843 = cljs.core.async.impl.dispatch.tasks.pop();
-if((m_20843 == null)){
-} else {
-m_20843.call(null);
-
-if((count_20842 < cljs.core.async.impl.dispatch.TASK_BATCH_SIZE)){
-var G__20844 = (count_20842 + (1));
-count_20842 = G__20844;
-continue;
-} else {
-}
-}
-break;
-}
-
-cljs.core.async.impl.dispatch.running_QMARK_ = false;
-
-if((cljs.core.async.impl.dispatch.tasks.length > (0))){
-return cljs.core.async.impl.dispatch.queue_dispatcher.call(null);
-} else {
-return null;
-}
-});
-cljs.core.async.impl.dispatch.queue_dispatcher = (function cljs$core$async$impl$dispatch$queue_dispatcher(){
-if(((cljs.core.async.impl.dispatch.queued_QMARK_) && (cljs.core.async.impl.dispatch.running_QMARK_))){
-return null;
-} else {
-cljs.core.async.impl.dispatch.queued_QMARK_ = true;
-
-return goog.async.nextTick.call(null,cljs.core.async.impl.dispatch.process_messages);
-}
-});
-cljs.core.async.impl.dispatch.run = (function cljs$core$async$impl$dispatch$run(f){
-cljs.core.async.impl.dispatch.tasks.unbounded_unshift(f);
-
-return cljs.core.async.impl.dispatch.queue_dispatcher.call(null);
-});
-cljs.core.async.impl.dispatch.queue_delay = (function cljs$core$async$impl$dispatch$queue_delay(f,delay){
-return setTimeout(f,delay);
-});
-
-//# sourceMappingURL=dispatch.js.map?rel=1582560146515

docs/js/compiled/out/cljs/core/async/impl/dispatch.js.map

@@ -1 +0,0 @@
-{"version":3,"file":"\/home\/simon\/workspace\/geocsv-lite\/resources\/public\/js\/compiled\/out\/cljs\/core\/async\/impl\/dispatch.js","sources":["dispatch.cljs?rel=1582560146515"],"lineCount":58,"mappings":";AAAA;;;;AAIA,AAAKA,sCAAM,mDAAA,nDAACC;AACZ,+CAAA,\/CAAKC;AACL,8CAAA,9CAAKC;AAEL,gDAAA,hDAAKC;AAEL,AAAA,AAEA,iDAAA,jDAAMC;AAAN,AACE,+CAAA,\/CAAMH;;AACN,8CAAA,9CAAMC;;AACN,kBAAA,dAAOG;;AAAP,AACE,IAAMC,UAAE,AAAMP;AAAd,AACE,GAAU,YAAA,XAAMO;AAAhB;AAAA,AACE,AAACA;;AACD,GAAM,CAAGD,cAAMF;AAAf,AACE,eAAO,eAAA,dAAKE;;;;AADd;;;;;AAEN,+CAAA,\/CAAMJ;;AACN,GAAM,8CAAA,7CAAG,AAAUF;AAAnB,AACE,OAACQ;;AADH;;;AAGF,iDAAA,jDAAMA;AAAN,AACE,GAAU,EAAKL,iDAAQD;AAAvB;;AAAA,AACE,8CAAA,9CAAMC;;AACN,OAAC,AAAAM,8BAAoBJ;;;AAEzB,oCAAA,pCAAMK,gFAAKC;AAAX,AACE,AAAoBX,sDAAMW;;AAC1B,OAACH;;AAEH,4CAAA,5CAAMI,gGAAaD,EAAEE;AAArB,AACE,OAACC,WAAcH,EAAEE","names":["cljs.core.async.impl.dispatch\/tasks","cljs.core.async.impl.buffers\/ring-buffer","cljs.core.async.impl.dispatch\/running?","cljs.core.async.impl.dispatch\/queued?","cljs.core.async.impl.dispatch\/TASK_BATCH_SIZE","cljs.core.async.impl.dispatch\/process-messages","count","m","cljs.core.async.impl.dispatch\/queue-dispatcher","goog\/async","cljs.core.async.impl.dispatch\/run","f","cljs.core.async.impl.dispatch\/queue-delay","delay","js\/setTimeout"]}

docs/js/compiled/out/cljs/core/async/impl/ioc_helpers.cljs

@@ -1,146 +0,0 @@
-(ns cljs.core.async.impl.ioc-helpers
-  (:require [cljs.core.async.impl.protocols :as impl])
-  (:require-macros [cljs.core.async.impl.ioc-macros :as ioc]))
-
-(def ^:const FN-IDX 0)
-(def ^:const STATE-IDX 1)
-(def ^:const VALUE-IDX 2)
-(def ^:const BINDINGS-IDX 3)
-(def ^:const EXCEPTION-FRAMES 4)
-(def ^:const CURRENT-EXCEPTION 5)
-(def ^:const USER-START-IDX 6)
-
-(defn aset-object [arr idx o]
-  (aget arr idx o))
-
-(defn aget-object [arr idx]
-  (aget arr idx))
-
-
-(defn finished?
-  "Returns true if the machine is in a finished state"
-  [state-array]
-  (keyword-identical? (aget state-array STATE-IDX) :finished))
-
-(defn- fn-handler
-  [f]
-  (reify
-   impl/Handler
-   (active? [_] true)
-   (blockable? [_] true)
-   (commit [_] f)))
-
-
-(defn run-state-machine [state]
-  ((aget-object state FN-IDX) state))
-
-(defn run-state-machine-wrapped [state]
-  (try
-    (run-state-machine state)
-    (catch js/Object ex
-      (impl/close! ^not-native (aget-object state USER-START-IDX))
-      (throw ex))))
-
-(defn take! [state blk ^not-native c]
-  (if-let [cb (impl/take! c (fn-handler
-                                   (fn [x]
-                                     (ioc/aset-all! state VALUE-IDX x STATE-IDX blk)
-                                     (run-state-machine-wrapped state))))]
-    (do (ioc/aset-all! state VALUE-IDX @cb STATE-IDX blk)
-        :recur)
-    nil))
-
-(defn put! [state blk ^not-native c val]
-  (if-let [cb (impl/put! c val (fn-handler (fn [ret-val]
-                                             (ioc/aset-all! state VALUE-IDX ret-val STATE-IDX blk)
-                                             (run-state-machine-wrapped state))))]
-    (do (ioc/aset-all! state VALUE-IDX @cb STATE-IDX blk)
-        :recur)
-    nil))
-
-(defn return-chan [state value]
-  (let [^not-native c (aget state USER-START-IDX)]
-           (when-not (nil? value)
-             (impl/put! c value (fn-handler (fn [] nil))))
-           (impl/close! c)
-           c))
-
-(defrecord ExceptionFrame [catch-block
-                           ^Class catch-exception
-                           finally-block
-                           continue-block
-                           prev])
-
-(defn add-exception-frame [state catch-block catch-exception finally-block continue-block]
-  (ioc/aset-all! state
-                 EXCEPTION-FRAMES
-                 (->ExceptionFrame catch-block
-                                   catch-exception
-                                   finally-block
-                                   continue-block
-                                   (aget-object state EXCEPTION-FRAMES))))
-
-(defn process-exception [state]
-  (let [exception-frame (aget-object state EXCEPTION-FRAMES)
-        catch-block (:catch-block exception-frame)
-        catch-exception (:catch-exception exception-frame)
-        exception (aget-object state CURRENT-EXCEPTION)]
-    (cond
-     (and exception
-          (not exception-frame))
-     (throw exception)
-
-     (and exception
-          catch-block
-          (or (= :default catch-exception)
-              (instance? catch-exception exception)))
-     (ioc/aset-all! state
-                    STATE-IDX
-                    catch-block
-                    VALUE-IDX
-                    exception
-                    CURRENT-EXCEPTION
-                    nil
-                    EXCEPTION-FRAMES
-                    (assoc exception-frame
-                      :catch-block nil
-                      :catch-exception nil))
-
-
-     (and exception
-          (not catch-block)
-          (not (:finally-block exception-frame)))
-
-     (do (ioc/aset-all! state
-                        EXCEPTION-FRAMES
-                        (:prev exception-frame))
-         (recur state))
-
-     (and exception
-          (not catch-block)
-          (:finally-block exception-frame))
-     (ioc/aset-all! state
-                    STATE-IDX
-                    (:finally-block exception-frame)
-                    EXCEPTION-FRAMES
-                    (assoc exception-frame
-                      :finally-block nil))
-
-     (and (not exception)
-          (:finally-block exception-frame))
-     (do (ioc/aset-all! state
-                        STATE-IDX
-                        (:finally-block exception-frame)
-                        EXCEPTION-FRAMES
-                        (assoc exception-frame
-                          :finally-block nil)))
-
-     (and (not exception)
-          (not (:finally-block exception-frame)))
-     (do (ioc/aset-all! state
-                   STATE-IDX
-                   (:continue-block exception-frame)
-                   EXCEPTION-FRAMES
-                   (:prev exception-frame)))
-
-     :else (throw (js/Error. "No matching clause")))))

docs/js/compiled/out/cljs/core/async/impl/ioc_helpers.js

@@ -1,519 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.core.async.impl.ioc_helpers');
-goog.require('cljs.core');
-goog.require('cljs.core.async.impl.protocols');
-cljs.core.async.impl.ioc_helpers.FN_IDX = (0);
-cljs.core.async.impl.ioc_helpers.STATE_IDX = (1);
-cljs.core.async.impl.ioc_helpers.VALUE_IDX = (2);
-cljs.core.async.impl.ioc_helpers.BINDINGS_IDX = (3);
-cljs.core.async.impl.ioc_helpers.EXCEPTION_FRAMES = (4);
-cljs.core.async.impl.ioc_helpers.CURRENT_EXCEPTION = (5);
-cljs.core.async.impl.ioc_helpers.USER_START_IDX = (6);
-cljs.core.async.impl.ioc_helpers.aset_object = (function cljs$core$async$impl$ioc_helpers$aset_object(arr,idx,o){
-return (arr[idx][o]);
-});
-cljs.core.async.impl.ioc_helpers.aget_object = (function cljs$core$async$impl$ioc_helpers$aget_object(arr,idx){
-return (arr[idx]);
-});
-/**
- * Returns true if the machine is in a finished state
- */
-cljs.core.async.impl.ioc_helpers.finished_QMARK_ = (function cljs$core$async$impl$ioc_helpers$finished_QMARK_(state_array){
-return cljs.core.keyword_identical_QMARK_.call(null,(state_array[(1)]),new cljs.core.Keyword(null,"finished","finished",-1018867731));
-});
-cljs.core.async.impl.ioc_helpers.fn_handler = (function cljs$core$async$impl$ioc_helpers$fn_handler(f){
-if((typeof cljs !== 'undefined') && (typeof cljs.core !== 'undefined') && (typeof cljs.core.async !== 'undefined') && (typeof cljs.core.async.impl !== 'undefined') && (typeof cljs.core.async.impl.ioc_helpers !== 'undefined') && (typeof cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871 !== 'undefined')){
-} else {
-
-/**
-* @constructor
- * @implements {cljs.core.async.impl.protocols.Handler}
- * @implements {cljs.core.IMeta}
- * @implements {cljs.core.IWithMeta}
-*/
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871 = (function (f,meta22872){
-this.f = f;
-this.meta22872 = meta22872;
-this.cljs$lang$protocol_mask$partition0$ = 393216;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.prototype.cljs$core$IWithMeta$_with_meta$arity$2 = (function (_22873,meta22872__$1){
-var self__ = this;
-var _22873__$1 = this;
-return (new cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871(self__.f,meta22872__$1));
-});
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.prototype.cljs$core$IMeta$_meta$arity$1 = (function (_22873){
-var self__ = this;
-var _22873__$1 = this;
-return self__.meta22872;
-});
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.prototype.cljs$core$async$impl$protocols$Handler$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.prototype.cljs$core$async$impl$protocols$Handler$active_QMARK_$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-return true;
-});
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.prototype.cljs$core$async$impl$protocols$Handler$blockable_QMARK_$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-return true;
-});
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.prototype.cljs$core$async$impl$protocols$Handler$commit$arity$1 = (function (_){
-var self__ = this;
-var ___$1 = this;
-return self__.f;
-});
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"f","f",43394975,null),new cljs.core.Symbol(null,"meta22872","meta22872",-718135857,null)], null);
-});
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.cljs$lang$type = true;
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.cljs$lang$ctorStr = "cljs.core.async.impl.ioc-helpers/t_cljs$core$async$impl$ioc_helpers22871";
-
-cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.ioc-helpers/t_cljs$core$async$impl$ioc_helpers22871");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.ioc-helpers/t_cljs$core$async$impl$ioc_helpers22871.
- */
-cljs.core.async.impl.ioc_helpers.__GT_t_cljs$core$async$impl$ioc_helpers22871 = (function cljs$core$async$impl$ioc_helpers$fn_handler_$___GT_t_cljs$core$async$impl$ioc_helpers22871(f__$1,meta22872){
-return (new cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871(f__$1,meta22872));
-});
-
-}
-
-return (new cljs.core.async.impl.ioc_helpers.t_cljs$core$async$impl$ioc_helpers22871(f,cljs.core.PersistentArrayMap.EMPTY));
-});
-cljs.core.async.impl.ioc_helpers.run_state_machine = (function cljs$core$async$impl$ioc_helpers$run_state_machine(state){
-return cljs.core.async.impl.ioc_helpers.aget_object.call(null,state,(0)).call(null,state);
-});
-cljs.core.async.impl.ioc_helpers.run_state_machine_wrapped = (function cljs$core$async$impl$ioc_helpers$run_state_machine_wrapped(state){
-try{return cljs.core.async.impl.ioc_helpers.run_state_machine.call(null,state);
-}catch (e22874){if((e22874 instanceof Object)){
-var ex = e22874;
-cljs.core.async.impl.protocols.close_BANG_.call(null,cljs.core.async.impl.ioc_helpers.aget_object.call(null,state,(6)));
-
-throw ex;
-} else {
-throw e22874;
-
-}
-}});
-cljs.core.async.impl.ioc_helpers.take_BANG_ = (function cljs$core$async$impl$ioc_helpers$take_BANG_(state,blk,c){
-var temp__5718__auto__ = cljs.core.async.impl.protocols.take_BANG_.call(null,c,cljs.core.async.impl.ioc_helpers.fn_handler.call(null,(function (x){
-var statearr_22875_22877 = state;
-(statearr_22875_22877[(2)] = x);
-
-(statearr_22875_22877[(1)] = blk);
-
-
-return cljs.core.async.impl.ioc_helpers.run_state_machine_wrapped.call(null,state);
-})));
-if(cljs.core.truth_(temp__5718__auto__)){
-var cb = temp__5718__auto__;
-var statearr_22876_22878 = state;
-(statearr_22876_22878[(2)] = cljs.core.deref.call(null,cb));
-
-(statearr_22876_22878[(1)] = blk);
-
-
-return new cljs.core.Keyword(null,"recur","recur",-437573268);
-} else {
-return null;
-}
-});
-cljs.core.async.impl.ioc_helpers.put_BANG_ = (function cljs$core$async$impl$ioc_helpers$put_BANG_(state,blk,c,val){
-var temp__5718__auto__ = cljs.core.async.impl.protocols.put_BANG_.call(null,c,val,cljs.core.async.impl.ioc_helpers.fn_handler.call(null,(function (ret_val){
-var statearr_22879_22881 = state;
-(statearr_22879_22881[(2)] = ret_val);
-
-(statearr_22879_22881[(1)] = blk);
-
-
-return cljs.core.async.impl.ioc_helpers.run_state_machine_wrapped.call(null,state);
-})));
-if(cljs.core.truth_(temp__5718__auto__)){
-var cb = temp__5718__auto__;
-var statearr_22880_22882 = state;
-(statearr_22880_22882[(2)] = cljs.core.deref.call(null,cb));
-
-(statearr_22880_22882[(1)] = blk);
-
-
-return new cljs.core.Keyword(null,"recur","recur",-437573268);
-} else {
-return null;
-}
-});
-cljs.core.async.impl.ioc_helpers.return_chan = (function cljs$core$async$impl$ioc_helpers$return_chan(state,value){
-var c = (state[(6)]);
-if((value == null)){
-} else {
-cljs.core.async.impl.protocols.put_BANG_.call(null,c,value,cljs.core.async.impl.ioc_helpers.fn_handler.call(null,((function (c){
-return (function (){
-return null;
-});})(c))
-));
-}
-
-cljs.core.async.impl.protocols.close_BANG_.call(null,c);
-
-return c;
-});
-
-/**
-* @constructor
- * @implements {cljs.core.IRecord}
- * @implements {cljs.core.IKVReduce}
- * @implements {cljs.core.IEquiv}
- * @implements {cljs.core.IHash}
- * @implements {cljs.core.ICollection}
- * @implements {cljs.core.ICounted}
- * @implements {cljs.core.ISeqable}
- * @implements {cljs.core.IMeta}
- * @implements {cljs.core.ICloneable}
- * @implements {cljs.core.IPrintWithWriter}
- * @implements {cljs.core.IIterable}
- * @implements {cljs.core.IWithMeta}
- * @implements {cljs.core.IAssociative}
- * @implements {cljs.core.IMap}
- * @implements {cljs.core.ILookup}
-*/
-cljs.core.async.impl.ioc_helpers.ExceptionFrame = (function (catch_block,catch_exception,finally_block,continue_block,prev,__meta,__extmap,__hash){
-this.catch_block = catch_block;
-this.catch_exception = catch_exception;
-this.finally_block = finally_block;
-this.continue_block = continue_block;
-this.prev = prev;
-this.__meta = __meta;
-this.__extmap = __extmap;
-this.__hash = __hash;
-this.cljs$lang$protocol_mask$partition0$ = 2230716170;
-this.cljs$lang$protocol_mask$partition1$ = 139264;
-});
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$ILookup$_lookup$arity$2 = (function (this__4385__auto__,k__4386__auto__){
-var self__ = this;
-var this__4385__auto____$1 = this;
-return this__4385__auto____$1.cljs$core$ILookup$_lookup$arity$3(null,k__4386__auto__,null);
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$ILookup$_lookup$arity$3 = (function (this__4387__auto__,k22884,else__4388__auto__){
-var self__ = this;
-var this__4387__auto____$1 = this;
-var G__22888 = k22884;
-var G__22888__$1 = (((G__22888 instanceof cljs.core.Keyword))?G__22888.fqn:null);
-switch (G__22888__$1) {
-case "catch-block":
-return self__.catch_block;
-
-break;
-case "catch-exception":
-return self__.catch_exception;
-
-break;
-case "finally-block":
-return self__.finally_block;
-
-break;
-case "continue-block":
-return self__.continue_block;
-
-break;
-case "prev":
-return self__.prev;
-
-break;
-default:
-return cljs.core.get.call(null,self__.__extmap,k22884,else__4388__auto__);
-
-}
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IKVReduce$_kv_reduce$arity$3 = (function (this__4404__auto__,f__4405__auto__,init__4406__auto__){
-var self__ = this;
-var this__4404__auto____$1 = this;
-return cljs.core.reduce.call(null,((function (this__4404__auto____$1){
-return (function (ret__4407__auto__,p__22889){
-var vec__22890 = p__22889;
-var k__4408__auto__ = cljs.core.nth.call(null,vec__22890,(0),null);
-var v__4409__auto__ = cljs.core.nth.call(null,vec__22890,(1),null);
-return f__4405__auto__.call(null,ret__4407__auto__,k__4408__auto__,v__4409__auto__);
-});})(this__4404__auto____$1))
-,init__4406__auto__,this__4404__auto____$1);
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IPrintWithWriter$_pr_writer$arity$3 = (function (this__4399__auto__,writer__4400__auto__,opts__4401__auto__){
-var self__ = this;
-var this__4399__auto____$1 = this;
-var pr_pair__4402__auto__ = ((function (this__4399__auto____$1){
-return (function (keyval__4403__auto__){
-return cljs.core.pr_sequential_writer.call(null,writer__4400__auto__,cljs.core.pr_writer,""," ","",opts__4401__auto__,keyval__4403__auto__);
-});})(this__4399__auto____$1))
-;
-return cljs.core.pr_sequential_writer.call(null,writer__4400__auto__,pr_pair__4402__auto__,"#cljs.core.async.impl.ioc-helpers.ExceptionFrame{",", ","}",opts__4401__auto__,cljs.core.concat.call(null,new cljs.core.PersistentVector(null, 5, 5, cljs.core.PersistentVector.EMPTY_NODE, [(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[new cljs.core.Keyword(null,"catch-block","catch-block",1175212748),self__.catch_block],null)),(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795),self__.catch_exception],null)),(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[new cljs.core.Keyword(null,"finally-block","finally-block",832982472),self__.finally_block],null)),(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850),self__.continue_block],null)),(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[new cljs.core.Keyword(null,"prev","prev",-1597069226),self__.prev],null))], null),self__.__extmap));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IIterable$_iterator$arity$1 = (function (G__22883){
-var self__ = this;
-var G__22883__$1 = this;
-return (new cljs.core.RecordIter((0),G__22883__$1,5,new cljs.core.PersistentVector(null, 5, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Keyword(null,"catch-block","catch-block",1175212748),new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795),new cljs.core.Keyword(null,"finally-block","finally-block",832982472),new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850),new cljs.core.Keyword(null,"prev","prev",-1597069226)], null),(cljs.core.truth_(self__.__extmap)?cljs.core._iterator.call(null,self__.__extmap):cljs.core.nil_iter.call(null))));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IMeta$_meta$arity$1 = (function (this__4383__auto__){
-var self__ = this;
-var this__4383__auto____$1 = this;
-return self__.__meta;
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$ICloneable$_clone$arity$1 = (function (this__4380__auto__){
-var self__ = this;
-var this__4380__auto____$1 = this;
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,self__.catch_exception,self__.finally_block,self__.continue_block,self__.prev,self__.__meta,self__.__extmap,self__.__hash));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$ICounted$_count$arity$1 = (function (this__4389__auto__){
-var self__ = this;
-var this__4389__auto____$1 = this;
-return (5 + cljs.core.count.call(null,self__.__extmap));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IHash$_hash$arity$1 = (function (this__4381__auto__){
-var self__ = this;
-var this__4381__auto____$1 = this;
-var h__4243__auto__ = self__.__hash;
-if((!((h__4243__auto__ == null)))){
-return h__4243__auto__;
-} else {
-var h__4243__auto____$1 = ((function (h__4243__auto__,this__4381__auto____$1){
-return (function (coll__4382__auto__){
-return (846900531 ^ cljs.core.hash_unordered_coll.call(null,coll__4382__auto__));
-});})(h__4243__auto__,this__4381__auto____$1))
-.call(null,this__4381__auto____$1);
-self__.__hash = h__4243__auto____$1;
-
-return h__4243__auto____$1;
-}
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IEquiv$_equiv$arity$2 = (function (this22885,other22886){
-var self__ = this;
-var this22885__$1 = this;
-return (((!((other22886 == null)))) && ((this22885__$1.constructor === other22886.constructor)) && (cljs.core._EQ_.call(null,this22885__$1.catch_block,other22886.catch_block)) && (cljs.core._EQ_.call(null,this22885__$1.catch_exception,other22886.catch_exception)) && (cljs.core._EQ_.call(null,this22885__$1.finally_block,other22886.finally_block)) && (cljs.core._EQ_.call(null,this22885__$1.continue_block,other22886.continue_block)) && (cljs.core._EQ_.call(null,this22885__$1.prev,other22886.prev)) && (cljs.core._EQ_.call(null,this22885__$1.__extmap,other22886.__extmap)));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IMap$_dissoc$arity$2 = (function (this__4394__auto__,k__4395__auto__){
-var self__ = this;
-var this__4394__auto____$1 = this;
-if(cljs.core.contains_QMARK_.call(null,new cljs.core.PersistentHashSet(null, new cljs.core.PersistentArrayMap(null, 5, [new cljs.core.Keyword(null,"finally-block","finally-block",832982472),null,new cljs.core.Keyword(null,"catch-block","catch-block",1175212748),null,new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795),null,new cljs.core.Keyword(null,"prev","prev",-1597069226),null,new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850),null], null), null),k__4395__auto__)){
-return cljs.core.dissoc.call(null,cljs.core._with_meta.call(null,cljs.core.into.call(null,cljs.core.PersistentArrayMap.EMPTY,this__4394__auto____$1),self__.__meta),k__4395__auto__);
-} else {
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,self__.catch_exception,self__.finally_block,self__.continue_block,self__.prev,self__.__meta,cljs.core.not_empty.call(null,cljs.core.dissoc.call(null,self__.__extmap,k__4395__auto__)),null));
-}
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IAssociative$_assoc$arity$3 = (function (this__4392__auto__,k__4393__auto__,G__22883){
-var self__ = this;
-var this__4392__auto____$1 = this;
-var pred__22893 = cljs.core.keyword_identical_QMARK_;
-var expr__22894 = k__4393__auto__;
-if(cljs.core.truth_(pred__22893.call(null,new cljs.core.Keyword(null,"catch-block","catch-block",1175212748),expr__22894))){
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(G__22883,self__.catch_exception,self__.finally_block,self__.continue_block,self__.prev,self__.__meta,self__.__extmap,null));
-} else {
-if(cljs.core.truth_(pred__22893.call(null,new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795),expr__22894))){
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,G__22883,self__.finally_block,self__.continue_block,self__.prev,self__.__meta,self__.__extmap,null));
-} else {
-if(cljs.core.truth_(pred__22893.call(null,new cljs.core.Keyword(null,"finally-block","finally-block",832982472),expr__22894))){
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,self__.catch_exception,G__22883,self__.continue_block,self__.prev,self__.__meta,self__.__extmap,null));
-} else {
-if(cljs.core.truth_(pred__22893.call(null,new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850),expr__22894))){
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,self__.catch_exception,self__.finally_block,G__22883,self__.prev,self__.__meta,self__.__extmap,null));
-} else {
-if(cljs.core.truth_(pred__22893.call(null,new cljs.core.Keyword(null,"prev","prev",-1597069226),expr__22894))){
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,self__.catch_exception,self__.finally_block,self__.continue_block,G__22883,self__.__meta,self__.__extmap,null));
-} else {
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,self__.catch_exception,self__.finally_block,self__.continue_block,self__.prev,self__.__meta,cljs.core.assoc.call(null,self__.__extmap,k__4393__auto__,G__22883),null));
-}
-}
-}
-}
-}
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$ISeqable$_seq$arity$1 = (function (this__4397__auto__){
-var self__ = this;
-var this__4397__auto____$1 = this;
-return cljs.core.seq.call(null,cljs.core.concat.call(null,new cljs.core.PersistentVector(null, 5, 5, cljs.core.PersistentVector.EMPTY_NODE, [(new cljs.core.MapEntry(new cljs.core.Keyword(null,"catch-block","catch-block",1175212748),self__.catch_block,null)),(new cljs.core.MapEntry(new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795),self__.catch_exception,null)),(new cljs.core.MapEntry(new cljs.core.Keyword(null,"finally-block","finally-block",832982472),self__.finally_block,null)),(new cljs.core.MapEntry(new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850),self__.continue_block,null)),(new cljs.core.MapEntry(new cljs.core.Keyword(null,"prev","prev",-1597069226),self__.prev,null))], null),self__.__extmap));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$IWithMeta$_with_meta$arity$2 = (function (this__4384__auto__,G__22883){
-var self__ = this;
-var this__4384__auto____$1 = this;
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(self__.catch_block,self__.catch_exception,self__.finally_block,self__.continue_block,self__.prev,G__22883,self__.__extmap,self__.__hash));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.prototype.cljs$core$ICollection$_conj$arity$2 = (function (this__4390__auto__,entry__4391__auto__){
-var self__ = this;
-var this__4390__auto____$1 = this;
-if(cljs.core.vector_QMARK_.call(null,entry__4391__auto__)){
-return this__4390__auto____$1.cljs$core$IAssociative$_assoc$arity$3(null,cljs.core._nth.call(null,entry__4391__auto__,(0)),cljs.core._nth.call(null,entry__4391__auto__,(1)));
-} else {
-return cljs.core.reduce.call(null,cljs.core._conj,this__4390__auto____$1,entry__4391__auto__);
-}
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 5, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"catch-block","catch-block",-1479223021,null),cljs.core.with_meta(new cljs.core.Symbol(null,"catch-exception","catch-exception",-356775268,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tag","tag",-1290361223),new cljs.core.Symbol(null,"Class","Class",2064526977,null)], null)),new cljs.core.Symbol(null,"finally-block","finally-block",-1821453297,null),new cljs.core.Symbol(null,"continue-block","continue-block",-211516323,null),new cljs.core.Symbol(null,"prev","prev",43462301,null)], null);
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.cljs$lang$type = true;
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.cljs$lang$ctorPrSeq = (function (this__4428__auto__){
-return (new cljs.core.List(null,"cljs.core.async.impl.ioc-helpers/ExceptionFrame",null,(1),null));
-});
-
-cljs.core.async.impl.ioc_helpers.ExceptionFrame.cljs$lang$ctorPrWriter = (function (this__4428__auto__,writer__4429__auto__){
-return cljs.core._write.call(null,writer__4429__auto__,"cljs.core.async.impl.ioc-helpers/ExceptionFrame");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.ioc-helpers/ExceptionFrame.
- */
-cljs.core.async.impl.ioc_helpers.__GT_ExceptionFrame = (function cljs$core$async$impl$ioc_helpers$__GT_ExceptionFrame(catch_block,catch_exception,finally_block,continue_block,prev){
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(catch_block,catch_exception,finally_block,continue_block,prev,null,null,null));
-});
-
-/**
- * Factory function for cljs.core.async.impl.ioc-helpers/ExceptionFrame, taking a map of keywords to field values.
- */
-cljs.core.async.impl.ioc_helpers.map__GT_ExceptionFrame = (function cljs$core$async$impl$ioc_helpers$map__GT_ExceptionFrame(G__22887){
-var extmap__4424__auto__ = (function (){var G__22896 = cljs.core.dissoc.call(null,G__22887,new cljs.core.Keyword(null,"catch-block","catch-block",1175212748),new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795),new cljs.core.Keyword(null,"finally-block","finally-block",832982472),new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850),new cljs.core.Keyword(null,"prev","prev",-1597069226));
-if(cljs.core.record_QMARK_.call(null,G__22887)){
-return cljs.core.into.call(null,cljs.core.PersistentArrayMap.EMPTY,G__22896);
-} else {
-return G__22896;
-}
-})();
-return (new cljs.core.async.impl.ioc_helpers.ExceptionFrame(new cljs.core.Keyword(null,"catch-block","catch-block",1175212748).cljs$core$IFn$_invoke$arity$1(G__22887),new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795).cljs$core$IFn$_invoke$arity$1(G__22887),new cljs.core.Keyword(null,"finally-block","finally-block",832982472).cljs$core$IFn$_invoke$arity$1(G__22887),new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850).cljs$core$IFn$_invoke$arity$1(G__22887),new cljs.core.Keyword(null,"prev","prev",-1597069226).cljs$core$IFn$_invoke$arity$1(G__22887),null,cljs.core.not_empty.call(null,extmap__4424__auto__),null));
-});
-
-cljs.core.async.impl.ioc_helpers.add_exception_frame = (function cljs$core$async$impl$ioc_helpers$add_exception_frame(state,catch_block,catch_exception,finally_block,continue_block){
-var statearr_22898 = state;
-(statearr_22898[(4)] = cljs.core.async.impl.ioc_helpers.__GT_ExceptionFrame.call(null,catch_block,catch_exception,finally_block,continue_block,cljs.core.async.impl.ioc_helpers.aget_object.call(null,state,(4))));
-
-return statearr_22898;
-});
-cljs.core.async.impl.ioc_helpers.process_exception = (function cljs$core$async$impl$ioc_helpers$process_exception(state){
-while(true){
-var exception_frame = cljs.core.async.impl.ioc_helpers.aget_object.call(null,state,(4));
-var catch_block = new cljs.core.Keyword(null,"catch-block","catch-block",1175212748).cljs$core$IFn$_invoke$arity$1(exception_frame);
-var catch_exception = new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795).cljs$core$IFn$_invoke$arity$1(exception_frame);
-var exception = cljs.core.async.impl.ioc_helpers.aget_object.call(null,state,(5));
-if(cljs.core.truth_((function (){var and__4120__auto__ = exception;
-if(cljs.core.truth_(and__4120__auto__)){
-return cljs.core.not.call(null,exception_frame);
-} else {
-return and__4120__auto__;
-}
-})())){
-throw exception;
-} else {
-if(cljs.core.truth_((function (){var and__4120__auto__ = exception;
-if(cljs.core.truth_(and__4120__auto__)){
-var and__4120__auto____$1 = catch_block;
-if(cljs.core.truth_(and__4120__auto____$1)){
-return ((cljs.core._EQ_.call(null,new cljs.core.Keyword(null,"default","default",-1987822328),catch_exception)) || ((exception instanceof catch_exception)));
-} else {
-return and__4120__auto____$1;
-}
-} else {
-return and__4120__auto__;
-}
-})())){
-var statearr_22899 = state;
-(statearr_22899[(1)] = catch_block);
-
-(statearr_22899[(2)] = exception);
-
-(statearr_22899[(5)] = null);
-
-(statearr_22899[(4)] = cljs.core.assoc.call(null,exception_frame,new cljs.core.Keyword(null,"catch-block","catch-block",1175212748),null,new cljs.core.Keyword(null,"catch-exception","catch-exception",-1997306795),null));
-
-return statearr_22899;
-} else {
-if(cljs.core.truth_((function (){var and__4120__auto__ = exception;
-if(cljs.core.truth_(and__4120__auto__)){
-return ((cljs.core.not.call(null,catch_block)) && (cljs.core.not.call(null,new cljs.core.Keyword(null,"finally-block","finally-block",832982472).cljs$core$IFn$_invoke$arity$1(exception_frame))));
-} else {
-return and__4120__auto__;
-}
-})())){
-var statearr_22900_22904 = state;
-(statearr_22900_22904[(4)] = new cljs.core.Keyword(null,"prev","prev",-1597069226).cljs$core$IFn$_invoke$arity$1(exception_frame));
-
-
-var G__22905 = state;
-state = G__22905;
-continue;
-} else {
-if(cljs.core.truth_((function (){var and__4120__auto__ = exception;
-if(cljs.core.truth_(and__4120__auto__)){
-var and__4120__auto____$1 = cljs.core.not.call(null,catch_block);
-if(and__4120__auto____$1){
-return new cljs.core.Keyword(null,"finally-block","finally-block",832982472).cljs$core$IFn$_invoke$arity$1(exception_frame);
-} else {
-return and__4120__auto____$1;
-}
-} else {
-return and__4120__auto__;
-}
-})())){
-var statearr_22901 = state;
-(statearr_22901[(1)] = new cljs.core.Keyword(null,"finally-block","finally-block",832982472).cljs$core$IFn$_invoke$arity$1(exception_frame));
-
-(statearr_22901[(4)] = cljs.core.assoc.call(null,exception_frame,new cljs.core.Keyword(null,"finally-block","finally-block",832982472),null));
-
-return statearr_22901;
-} else {
-if(cljs.core.truth_((function (){var and__4120__auto__ = cljs.core.not.call(null,exception);
-if(and__4120__auto__){
-return new cljs.core.Keyword(null,"finally-block","finally-block",832982472).cljs$core$IFn$_invoke$arity$1(exception_frame);
-} else {
-return and__4120__auto__;
-}
-})())){
-var statearr_22902 = state;
-(statearr_22902[(1)] = new cljs.core.Keyword(null,"finally-block","finally-block",832982472).cljs$core$IFn$_invoke$arity$1(exception_frame));
-
-(statearr_22902[(4)] = cljs.core.assoc.call(null,exception_frame,new cljs.core.Keyword(null,"finally-block","finally-block",832982472),null));
-
-return statearr_22902;
-} else {
-if(((cljs.core.not.call(null,exception)) && (cljs.core.not.call(null,new cljs.core.Keyword(null,"finally-block","finally-block",832982472).cljs$core$IFn$_invoke$arity$1(exception_frame))))){
-var statearr_22903 = state;
-(statearr_22903[(1)] = new cljs.core.Keyword(null,"continue-block","continue-block",-1852047850).cljs$core$IFn$_invoke$arity$1(exception_frame));
-
-(statearr_22903[(4)] = new cljs.core.Keyword(null,"prev","prev",-1597069226).cljs$core$IFn$_invoke$arity$1(exception_frame));
-
-return statearr_22903;
-} else {
-throw (new Error("No matching clause"));
-
-}
-}
-}
-}
-}
-}
-break;
-}
-});
-
-//# sourceMappingURL=ioc_helpers.js.map?rel=1582560147675

docs/js/compiled/out/cljs/core/async/impl/protocols.cljs

@@ -1,43 +0,0 @@
-;;   Copyright (c) Rich Hickey and contributors. All rights reserved.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.core.async.impl.protocols)
-
-(def ^:const MAX-QUEUE-SIZE 1024)
-
-(defprotocol ReadPort
-  (take! [port fn1-handler] "derefable val if taken, nil if take was enqueued"))
-
-(defprotocol WritePort
-  (put! [port val fn1-handler] "derefable boolean (false if already closed) if handled, nil if put was enqueued.
-                               Must throw on nil val."))
-
-(defprotocol Channel
-  (close! [chan])
-  (closed? [chan]))
-
-(defprotocol Handler
-  (active? [h] "returns true if has callback. Must work w/o lock")
-  (blockable? [h] "returns true if this handler may be blocked, otherwise it must not block")
-  #_(lock-id [h] "a unique id for lock acquisition order, 0 if no lock")
-  (commit [h] "commit to fulfilling its end of the transfer, returns cb. Must be called within lock"))
-
-(defprotocol Buffer
-  (full? [b] "returns true if buffer cannot accept put")
-  (remove! [b] "remove and return next item from buffer, called under chan mutex")
-  (add!* [b itm] "if room, add item to the buffer, returns b, called under chan mutex")
-  (close-buf! [b] "called on chan closed under chan mutex, return ignored"))
-
-(defn add!
-  ([b] b)
-  ([b itm]
-     (assert (not (nil? itm)))
-     (add!* b itm)))
-
-;; Defines a buffer that will never block (return true to full?)
-(defprotocol UnblockingBuffer)

docs/js/compiled/out/cljs/core/async/impl/protocols.js

@@ -1,311 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.core.async.impl.protocols');
-goog.require('cljs.core');
-cljs.core.async.impl.protocols.MAX_QUEUE_SIZE = (1024);
-
-/**
- * @interface
- */
-cljs.core.async.impl.protocols.ReadPort = function(){};
-
-/**
- * derefable val if taken, nil if take was enqueued
- */
-cljs.core.async.impl.protocols.take_BANG_ = (function cljs$core$async$impl$protocols$take_BANG_(port,fn1_handler){
-if((((!((port == null)))) && ((!((port.cljs$core$async$impl$protocols$ReadPort$take_BANG_$arity$2 == null)))))){
-return port.cljs$core$async$impl$protocols$ReadPort$take_BANG_$arity$2(port,fn1_handler);
-} else {
-var x__4433__auto__ = (((port == null))?null:port);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.take_BANG_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,port,fn1_handler);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.take_BANG_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,port,fn1_handler);
-} else {
-throw cljs.core.missing_protocol.call(null,"ReadPort.take!",port);
-}
-}
-}
-});
-
-
-/**
- * @interface
- */
-cljs.core.async.impl.protocols.WritePort = function(){};
-
-/**
- * derefable boolean (false if already closed) if handled, nil if put was enqueued.
- *                             Must throw on nil val.
- */
-cljs.core.async.impl.protocols.put_BANG_ = (function cljs$core$async$impl$protocols$put_BANG_(port,val,fn1_handler){
-if((((!((port == null)))) && ((!((port.cljs$core$async$impl$protocols$WritePort$put_BANG_$arity$3 == null)))))){
-return port.cljs$core$async$impl$protocols$WritePort$put_BANG_$arity$3(port,val,fn1_handler);
-} else {
-var x__4433__auto__ = (((port == null))?null:port);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.put_BANG_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,port,val,fn1_handler);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.put_BANG_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,port,val,fn1_handler);
-} else {
-throw cljs.core.missing_protocol.call(null,"WritePort.put!",port);
-}
-}
-}
-});
-
-
-/**
- * @interface
- */
-cljs.core.async.impl.protocols.Channel = function(){};
-
-cljs.core.async.impl.protocols.close_BANG_ = (function cljs$core$async$impl$protocols$close_BANG_(chan){
-if((((!((chan == null)))) && ((!((chan.cljs$core$async$impl$protocols$Channel$close_BANG_$arity$1 == null)))))){
-return chan.cljs$core$async$impl$protocols$Channel$close_BANG_$arity$1(chan);
-} else {
-var x__4433__auto__ = (((chan == null))?null:chan);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.close_BANG_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,chan);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.close_BANG_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,chan);
-} else {
-throw cljs.core.missing_protocol.call(null,"Channel.close!",chan);
-}
-}
-}
-});
-
-cljs.core.async.impl.protocols.closed_QMARK_ = (function cljs$core$async$impl$protocols$closed_QMARK_(chan){
-if((((!((chan == null)))) && ((!((chan.cljs$core$async$impl$protocols$Channel$closed_QMARK_$arity$1 == null)))))){
-return chan.cljs$core$async$impl$protocols$Channel$closed_QMARK_$arity$1(chan);
-} else {
-var x__4433__auto__ = (((chan == null))?null:chan);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.closed_QMARK_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,chan);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.closed_QMARK_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,chan);
-} else {
-throw cljs.core.missing_protocol.call(null,"Channel.closed?",chan);
-}
-}
-}
-});
-
-
-/**
- * @interface
- */
-cljs.core.async.impl.protocols.Handler = function(){};
-
-/**
- * returns true if has callback. Must work w/o lock
- */
-cljs.core.async.impl.protocols.active_QMARK_ = (function cljs$core$async$impl$protocols$active_QMARK_(h){
-if((((!((h == null)))) && ((!((h.cljs$core$async$impl$protocols$Handler$active_QMARK_$arity$1 == null)))))){
-return h.cljs$core$async$impl$protocols$Handler$active_QMARK_$arity$1(h);
-} else {
-var x__4433__auto__ = (((h == null))?null:h);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.active_QMARK_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,h);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.active_QMARK_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,h);
-} else {
-throw cljs.core.missing_protocol.call(null,"Handler.active?",h);
-}
-}
-}
-});
-
-/**
- * returns true if this handler may be blocked, otherwise it must not block
- */
-cljs.core.async.impl.protocols.blockable_QMARK_ = (function cljs$core$async$impl$protocols$blockable_QMARK_(h){
-if((((!((h == null)))) && ((!((h.cljs$core$async$impl$protocols$Handler$blockable_QMARK_$arity$1 == null)))))){
-return h.cljs$core$async$impl$protocols$Handler$blockable_QMARK_$arity$1(h);
-} else {
-var x__4433__auto__ = (((h == null))?null:h);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.blockable_QMARK_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,h);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.blockable_QMARK_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,h);
-} else {
-throw cljs.core.missing_protocol.call(null,"Handler.blockable?",h);
-}
-}
-}
-});
-
-/**
- * commit to fulfilling its end of the transfer, returns cb. Must be called within lock
- */
-cljs.core.async.impl.protocols.commit = (function cljs$core$async$impl$protocols$commit(h){
-if((((!((h == null)))) && ((!((h.cljs$core$async$impl$protocols$Handler$commit$arity$1 == null)))))){
-return h.cljs$core$async$impl$protocols$Handler$commit$arity$1(h);
-} else {
-var x__4433__auto__ = (((h == null))?null:h);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.commit[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,h);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.commit["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,h);
-} else {
-throw cljs.core.missing_protocol.call(null,"Handler.commit",h);
-}
-}
-}
-});
-
-
-/**
- * @interface
- */
-cljs.core.async.impl.protocols.Buffer = function(){};
-
-/**
- * returns true if buffer cannot accept put
- */
-cljs.core.async.impl.protocols.full_QMARK_ = (function cljs$core$async$impl$protocols$full_QMARK_(b){
-if((((!((b == null)))) && ((!((b.cljs$core$async$impl$protocols$Buffer$full_QMARK_$arity$1 == null)))))){
-return b.cljs$core$async$impl$protocols$Buffer$full_QMARK_$arity$1(b);
-} else {
-var x__4433__auto__ = (((b == null))?null:b);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.full_QMARK_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,b);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.full_QMARK_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,b);
-} else {
-throw cljs.core.missing_protocol.call(null,"Buffer.full?",b);
-}
-}
-}
-});
-
-/**
- * remove and return next item from buffer, called under chan mutex
- */
-cljs.core.async.impl.protocols.remove_BANG_ = (function cljs$core$async$impl$protocols$remove_BANG_(b){
-if((((!((b == null)))) && ((!((b.cljs$core$async$impl$protocols$Buffer$remove_BANG_$arity$1 == null)))))){
-return b.cljs$core$async$impl$protocols$Buffer$remove_BANG_$arity$1(b);
-} else {
-var x__4433__auto__ = (((b == null))?null:b);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.remove_BANG_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,b);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.remove_BANG_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,b);
-} else {
-throw cljs.core.missing_protocol.call(null,"Buffer.remove!",b);
-}
-}
-}
-});
-
-/**
- * if room, add item to the buffer, returns b, called under chan mutex
- */
-cljs.core.async.impl.protocols.add_BANG__STAR_ = (function cljs$core$async$impl$protocols$add_BANG__STAR_(b,itm){
-if((((!((b == null)))) && ((!((b.cljs$core$async$impl$protocols$Buffer$add_BANG__STAR_$arity$2 == null)))))){
-return b.cljs$core$async$impl$protocols$Buffer$add_BANG__STAR_$arity$2(b,itm);
-} else {
-var x__4433__auto__ = (((b == null))?null:b);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.add_BANG__STAR_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,b,itm);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.add_BANG__STAR_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,b,itm);
-} else {
-throw cljs.core.missing_protocol.call(null,"Buffer.add!*",b);
-}
-}
-}
-});
-
-/**
- * called on chan closed under chan mutex, return ignored
- */
-cljs.core.async.impl.protocols.close_buf_BANG_ = (function cljs$core$async$impl$protocols$close_buf_BANG_(b){
-if((((!((b == null)))) && ((!((b.cljs$core$async$impl$protocols$Buffer$close_buf_BANG_$arity$1 == null)))))){
-return b.cljs$core$async$impl$protocols$Buffer$close_buf_BANG_$arity$1(b);
-} else {
-var x__4433__auto__ = (((b == null))?null:b);
-var m__4434__auto__ = (cljs.core.async.impl.protocols.close_buf_BANG_[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,b);
-} else {
-var m__4431__auto__ = (cljs.core.async.impl.protocols.close_buf_BANG_["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,b);
-} else {
-throw cljs.core.missing_protocol.call(null,"Buffer.close-buf!",b);
-}
-}
-}
-});
-
-cljs.core.async.impl.protocols.add_BANG_ = (function cljs$core$async$impl$protocols$add_BANG_(var_args){
-var G__20833 = arguments.length;
-switch (G__20833) {
-case 1:
-return cljs.core.async.impl.protocols.add_BANG_.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.core.async.impl.protocols.add_BANG_.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.core.async.impl.protocols.add_BANG_.cljs$core$IFn$_invoke$arity$1 = (function (b){
-return b;
-});
-
-cljs.core.async.impl.protocols.add_BANG_.cljs$core$IFn$_invoke$arity$2 = (function (b,itm){
-if((!((itm == null)))){
-} else {
-throw (new Error("Assert failed: (not (nil? itm))"));
-}
-
-return cljs.core.async.impl.protocols.add_BANG__STAR_.call(null,b,itm);
-});
-
-cljs.core.async.impl.protocols.add_BANG_.cljs$lang$maxFixedArity = 2;
-
-
-/**
- * @interface
- */
-cljs.core.async.impl.protocols.UnblockingBuffer = function(){};
-
-
-//# sourceMappingURL=protocols.js.map?rel=1582560146422

docs/js/compiled/out/cljs/core/async/impl/timers.cljs

@@ -1,172 +0,0 @@
-;;   Copyright (c) Rich Hickey and contributors. All rights reserved.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.core.async.impl.timers
-  (:require [cljs.core.async.impl.protocols :as impl]
-            [cljs.core.async.impl.channels :as channels]
-            [cljs.core.async.impl.dispatch :as dispatch]))
-
-(def MAX_LEVEL 15) ;; 16 levels
-(def P (/ 1 2))
-
-(defn random-level
-  ([] (random-level 0))
-  ([level]
-    (if (and (< (.random js/Math) P)
-             (< level MAX_LEVEL))
-      (recur (inc level))
-      level)))
-
-(deftype SkipListNode [key ^:mutable val forward]
-  ISeqable
-  (-seq [coll]
-    (list key val))
-
-  IPrintWithWriter
-  (-pr-writer [coll writer opts]
-    (pr-sequential-writer writer pr-writer "[" " " "]" opts coll)))
-
-(defn skip-list-node
-  ([level] (skip-list-node nil nil level))
-  ([k v level]
-    (let [arr (make-array (inc level))]
-      (loop [i 0]
-        (when (< i (alength arr))
-          (aset arr i nil)
-          (recur (inc i))))
-      (SkipListNode. k v arr))))
-
-(defn least-greater-node
-  ([x k level] (least-greater-node x k level nil))
-  ([x k level update]
-    (if-not (neg? level)
-      (let [x (loop [x x]
-                (if-let [x' (when (< level (alength (.-forward x)))
-                              (aget (.-forward x) level))]
-                  (if (< (.-key x') k)
-                    (recur x')
-                    x)
-                  x))]
-        (when-not (nil? update)
-          (aset update level x))
-        (recur x k (dec level) update))
-      x)))
-
-(deftype SkipList [header ^:mutable level]
-  Object
-  (put [coll k v]
-    (let [update (make-array MAX_LEVEL)
-          x (least-greater-node header k level update)
-          x (aget (.-forward x) 0)]
-      (if (and (not (nil? x)) (== (.-key x) k))
-        (set! (.-val x) v)
-        (let [new-level (random-level)]
-          (when (> new-level level)
-            (loop [i (inc level)]
-              (when (<= i (inc new-level))
-                (aset update i header)
-                (recur (inc i))))
-            (set! level new-level))
-          (let [x (skip-list-node k v (make-array new-level))]
-            (loop [i 0]
-              (when (<= i level)
-                (let [links (.-forward (aget update i))]
-                  (aset (.-forward x) i (aget links i))
-                  (aset links i x)))))))))
-
-  (remove [coll k]
-    (let [update (make-array MAX_LEVEL)
-          x (least-greater-node header k level update)
-          x (when-not (zero? (alength (.-forward x)))
-              (aget (.-forward x) 0))]
-      (when (and (not (nil? x)) (== (.-key x) k))
-        (loop [i 0]
-          (when (<= i level)
-            (let [links (.-forward (aget update i))]
-              (if (identical? x (when (< i (alength links))
-                                  (aget links i)))
-                (do
-                  (aset links i (aget (.-forward x) i))
-                  (recur (inc i)))
-                (recur (inc i))))))
-        (while (and (< 0 level (alength (.-forward header)))
-                    (nil? (aget (.-forward header) level)))
-          (set! level (dec level))))))
-
-  (ceilingEntry [coll k]
-    (loop [x header level level]
-      (if-not (neg? level)
-        (let [nx (loop [x x]
-                   (let [x' (when (< level (alength (.-forward x)))
-                              (aget (.-forward x) level))]
-                     (when-not (nil? x')
-                       (if (>= (.-key x') k)
-                         x'
-                         (recur x')))))]
-          (if-not (nil? nx)
-            (recur nx (dec level))
-            (recur x (dec level))))
-        (when-not (identical? x header)
-          x))))
-  
-  (floorEntry [coll k]
-    (loop [x header level level]
-      (if-not (neg? level)
-        (let [nx (loop [x x]
-                   (let [x' (when (< level (alength (.-forward x)))
-                              (aget (.-forward x) level))]
-                     (if-not (nil? x')
-                       (if (> (.-key x') k)
-                         x
-                         (recur x'))
-                       (when (zero? level)
-                         x))))]
-          (if nx
-            (recur nx (dec level))
-            (recur x (dec level))))
-        (when-not (identical? x header)
-          x))))
-
-  ISeqable
-  (-seq [coll]
-    (letfn [(iter [node]
-              (lazy-seq
-                (when-not (nil? node)
-                  (cons [(.-key node) (.-val node)]
-                    (iter (aget (.-forward node) 0))))))]
-      (iter (aget (.-forward header) 0))))
-
-  IPrintWithWriter
-  (-pr-writer [coll writer opts]
-    (let [pr-pair (fn [keyval]
-                    (pr-sequential-writer writer pr-writer "" " " "" opts keyval))]
-      (pr-sequential-writer writer pr-pair "{" ", " "}" opts coll))))
-
-(defn skip-list []
-  (SkipList. (skip-list-node 0) 0))
-
-(def timeouts-map (skip-list))
-
-(def TIMEOUT_RESOLUTION_MS 10)
-
-(defn timeout
-  "returns a channel that will close after msecs"
-  [msecs]
-  (let [timeout (+ (.valueOf (js/Date.)) msecs)
-        me (.ceilingEntry timeouts-map timeout)]
-    (or (when (and me (< (.-key me) (+ timeout TIMEOUT_RESOLUTION_MS)))
-          (.-val me))
-        (let [timeout-channel (channels/chan nil)]
-          (.put timeouts-map timeout timeout-channel)
-          (dispatch/queue-delay
-            (fn []
-              (.remove timeouts-map timeout)
-              (impl/close! timeout-channel))
-            msecs)
-          timeout-channel))))
-

docs/js/compiled/out/cljs/core/async/impl/timers.js

@@ -1,479 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.core.async.impl.timers');
-goog.require('cljs.core');
-goog.require('cljs.core.async.impl.protocols');
-goog.require('cljs.core.async.impl.channels');
-goog.require('cljs.core.async.impl.dispatch');
-cljs.core.async.impl.timers.MAX_LEVEL = (15);
-cljs.core.async.impl.timers.P = ((1) / (2));
-cljs.core.async.impl.timers.random_level = (function cljs$core$async$impl$timers$random_level(var_args){
-var G__22909 = arguments.length;
-switch (G__22909) {
-case 0:
-return cljs.core.async.impl.timers.random_level.cljs$core$IFn$_invoke$arity$0();
-
-break;
-case 1:
-return cljs.core.async.impl.timers.random_level.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.core.async.impl.timers.random_level.cljs$core$IFn$_invoke$arity$0 = (function (){
-return cljs.core.async.impl.timers.random_level.call(null,(0));
-});
-
-cljs.core.async.impl.timers.random_level.cljs$core$IFn$_invoke$arity$1 = (function (level){
-while(true){
-if((((Math.random() < cljs.core.async.impl.timers.P)) && ((level < cljs.core.async.impl.timers.MAX_LEVEL)))){
-var G__22911 = (level + (1));
-level = G__22911;
-continue;
-} else {
-return level;
-}
-break;
-}
-});
-
-cljs.core.async.impl.timers.random_level.cljs$lang$maxFixedArity = 1;
-
-
-/**
-* @constructor
- * @implements {cljs.core.ISeqable}
- * @implements {cljs.core.IPrintWithWriter}
-*/
-cljs.core.async.impl.timers.SkipListNode = (function (key,val,forward){
-this.key = key;
-this.val = val;
-this.forward = forward;
-this.cljs$lang$protocol_mask$partition0$ = 2155872256;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.timers.SkipListNode.prototype.cljs$core$ISeqable$_seq$arity$1 = (function (coll){
-var self__ = this;
-var coll__$1 = this;
-return (new cljs.core.List(null,self__.key,(new cljs.core.List(null,self__.val,null,(1),null)),(2),null));
-});
-
-cljs.core.async.impl.timers.SkipListNode.prototype.cljs$core$IPrintWithWriter$_pr_writer$arity$3 = (function (coll,writer,opts){
-var self__ = this;
-var coll__$1 = this;
-return cljs.core.pr_sequential_writer.call(null,writer,cljs.core.pr_writer,"["," ","]",opts,coll__$1);
-});
-
-cljs.core.async.impl.timers.SkipListNode.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"key","key",124488940,null),cljs.core.with_meta(new cljs.core.Symbol(null,"val","val",1769233139,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),new cljs.core.Symbol(null,"forward","forward",1083186224,null)], null);
-});
-
-cljs.core.async.impl.timers.SkipListNode.cljs$lang$type = true;
-
-cljs.core.async.impl.timers.SkipListNode.cljs$lang$ctorStr = "cljs.core.async.impl.timers/SkipListNode";
-
-cljs.core.async.impl.timers.SkipListNode.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.timers/SkipListNode");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.timers/SkipListNode.
- */
-cljs.core.async.impl.timers.__GT_SkipListNode = (function cljs$core$async$impl$timers$__GT_SkipListNode(key,val,forward){
-return (new cljs.core.async.impl.timers.SkipListNode(key,val,forward));
-});
-
-cljs.core.async.impl.timers.skip_list_node = (function cljs$core$async$impl$timers$skip_list_node(var_args){
-var G__22913 = arguments.length;
-switch (G__22913) {
-case 1:
-return cljs.core.async.impl.timers.skip_list_node.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 3:
-return cljs.core.async.impl.timers.skip_list_node.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.core.async.impl.timers.skip_list_node.cljs$core$IFn$_invoke$arity$1 = (function (level){
-return cljs.core.async.impl.timers.skip_list_node.call(null,null,null,level);
-});
-
-cljs.core.async.impl.timers.skip_list_node.cljs$core$IFn$_invoke$arity$3 = (function (k,v,level){
-var arr = (new Array((level + (1))));
-var i_22915 = (0);
-while(true){
-if((i_22915 < arr.length)){
-(arr[i_22915] = null);
-
-var G__22916 = (i_22915 + (1));
-i_22915 = G__22916;
-continue;
-} else {
-}
-break;
-}
-
-return (new cljs.core.async.impl.timers.SkipListNode(k,v,arr));
-});
-
-cljs.core.async.impl.timers.skip_list_node.cljs$lang$maxFixedArity = 3;
-
-cljs.core.async.impl.timers.least_greater_node = (function cljs$core$async$impl$timers$least_greater_node(var_args){
-var G__22918 = arguments.length;
-switch (G__22918) {
-case 3:
-return cljs.core.async.impl.timers.least_greater_node.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-case 4:
-return cljs.core.async.impl.timers.least_greater_node.cljs$core$IFn$_invoke$arity$4((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.core.async.impl.timers.least_greater_node.cljs$core$IFn$_invoke$arity$3 = (function (x,k,level){
-return cljs.core.async.impl.timers.least_greater_node.call(null,x,k,level,null);
-});
-
-cljs.core.async.impl.timers.least_greater_node.cljs$core$IFn$_invoke$arity$4 = (function (x,k,level,update){
-while(true){
-if((!((level < (0))))){
-var x__$1 = (function (){var x__$1 = x;
-while(true){
-var temp__5718__auto__ = (((level < x__$1.forward.length))?(x__$1.forward[level]):null);
-if(cljs.core.truth_(temp__5718__auto__)){
-var x_SINGLEQUOTE_ = temp__5718__auto__;
-if((x_SINGLEQUOTE_.key < k)){
-var G__22920 = x_SINGLEQUOTE_;
-x__$1 = G__22920;
-continue;
-} else {
-return x__$1;
-}
-} else {
-return x__$1;
-}
-break;
-}
-})();
-if((update == null)){
-} else {
-(update[level] = x__$1);
-}
-
-var G__22921 = x__$1;
-var G__22922 = k;
-var G__22923 = (level - (1));
-var G__22924 = update;
-x = G__22921;
-k = G__22922;
-level = G__22923;
-update = G__22924;
-continue;
-} else {
-return x;
-}
-break;
-}
-});
-
-cljs.core.async.impl.timers.least_greater_node.cljs$lang$maxFixedArity = 4;
-
-
-/**
-* @constructor
- * @implements {cljs.core.async.impl.timers.Object}
- * @implements {cljs.core.ISeqable}
- * @implements {cljs.core.IPrintWithWriter}
-*/
-cljs.core.async.impl.timers.SkipList = (function (header,level){
-this.header = header;
-this.level = level;
-this.cljs$lang$protocol_mask$partition0$ = 2155872256;
-this.cljs$lang$protocol_mask$partition1$ = 0;
-});
-cljs.core.async.impl.timers.SkipList.prototype.put = (function (k,v){
-var self__ = this;
-var coll = this;
-var update = (new Array(cljs.core.async.impl.timers.MAX_LEVEL));
-var x = cljs.core.async.impl.timers.least_greater_node.call(null,self__.header,k,self__.level,update);
-var x__$1 = (x.forward[(0)]);
-if((((!((x__$1 == null)))) && ((x__$1.key === k)))){
-return x__$1.val = v;
-} else {
-var new_level = cljs.core.async.impl.timers.random_level.call(null);
-if((new_level > self__.level)){
-var i_22925 = (self__.level + (1));
-while(true){
-if((i_22925 <= (new_level + (1)))){
-(update[i_22925] = self__.header);
-
-var G__22926 = (i_22925 + (1));
-i_22925 = G__22926;
-continue;
-} else {
-}
-break;
-}
-
-self__.level = new_level;
-} else {
-}
-
-var x__$2 = cljs.core.async.impl.timers.skip_list_node.call(null,k,v,(new Array(new_level)));
-var i = (0);
-while(true){
-if((i <= self__.level)){
-var links = (update[i]).forward;
-(x__$2.forward[i] = (links[i]));
-
-return (links[i] = x__$2);
-} else {
-return null;
-}
-break;
-}
-}
-});
-
-cljs.core.async.impl.timers.SkipList.prototype.remove = (function (k){
-var self__ = this;
-var coll = this;
-var update = (new Array(cljs.core.async.impl.timers.MAX_LEVEL));
-var x = cljs.core.async.impl.timers.least_greater_node.call(null,self__.header,k,self__.level,update);
-var x__$1 = (((x.forward.length === (0)))?null:(x.forward[(0)]));
-if((((!((x__$1 == null)))) && ((x__$1.key === k)))){
-var i_22927 = (0);
-while(true){
-if((i_22927 <= self__.level)){
-var links_22928 = (update[i_22927]).forward;
-if((x__$1 === (((i_22927 < links_22928.length))?(links_22928[i_22927]):null))){
-(links_22928[i_22927] = (x__$1.forward[i_22927]));
-
-var G__22929 = (i_22927 + (1));
-i_22927 = G__22929;
-continue;
-} else {
-var G__22930 = (i_22927 + (1));
-i_22927 = G__22930;
-continue;
-}
-} else {
-}
-break;
-}
-
-while(true){
-if(((((((0) < self__.level)) && ((self__.level < self__.header.forward.length)))) && (((self__.header.forward[self__.level]) == null)))){
-self__.level = (self__.level - (1));
-
-continue;
-} else {
-return null;
-}
-break;
-}
-} else {
-return null;
-}
-});
-
-cljs.core.async.impl.timers.SkipList.prototype.ceilingEntry = (function (k){
-var self__ = this;
-var coll = this;
-var x = self__.header;
-var level__$1 = self__.level;
-while(true){
-if((!((level__$1 < (0))))){
-var nx = (function (){var x__$1 = x;
-while(true){
-var x_SINGLEQUOTE_ = (((level__$1 < x__$1.forward.length))?(x__$1.forward[level__$1]):null);
-if((x_SINGLEQUOTE_ == null)){
-return null;
-} else {
-if((x_SINGLEQUOTE_.key >= k)){
-return x_SINGLEQUOTE_;
-} else {
-var G__22931 = x_SINGLEQUOTE_;
-x__$1 = G__22931;
-continue;
-}
-}
-break;
-}
-})();
-if((!((nx == null)))){
-var G__22932 = nx;
-var G__22933 = (level__$1 - (1));
-x = G__22932;
-level__$1 = G__22933;
-continue;
-} else {
-var G__22934 = x;
-var G__22935 = (level__$1 - (1));
-x = G__22934;
-level__$1 = G__22935;
-continue;
-}
-} else {
-if((x === self__.header)){
-return null;
-} else {
-return x;
-}
-}
-break;
-}
-});
-
-cljs.core.async.impl.timers.SkipList.prototype.floorEntry = (function (k){
-var self__ = this;
-var coll = this;
-var x = self__.header;
-var level__$1 = self__.level;
-while(true){
-if((!((level__$1 < (0))))){
-var nx = (function (){var x__$1 = x;
-while(true){
-var x_SINGLEQUOTE_ = (((level__$1 < x__$1.forward.length))?(x__$1.forward[level__$1]):null);
-if((!((x_SINGLEQUOTE_ == null)))){
-if((x_SINGLEQUOTE_.key > k)){
-return x__$1;
-} else {
-var G__22936 = x_SINGLEQUOTE_;
-x__$1 = G__22936;
-continue;
-}
-} else {
-if((level__$1 === (0))){
-return x__$1;
-} else {
-return null;
-}
-}
-break;
-}
-})();
-if(cljs.core.truth_(nx)){
-var G__22937 = nx;
-var G__22938 = (level__$1 - (1));
-x = G__22937;
-level__$1 = G__22938;
-continue;
-} else {
-var G__22939 = x;
-var G__22940 = (level__$1 - (1));
-x = G__22939;
-level__$1 = G__22940;
-continue;
-}
-} else {
-if((x === self__.header)){
-return null;
-} else {
-return x;
-}
-}
-break;
-}
-});
-
-cljs.core.async.impl.timers.SkipList.prototype.cljs$core$ISeqable$_seq$arity$1 = (function (coll){
-var self__ = this;
-var coll__$1 = this;
-var iter = ((function (coll__$1){
-return (function cljs$core$async$impl$timers$iter(node){
-return (new cljs.core.LazySeq(null,((function (coll__$1){
-return (function (){
-if((node == null)){
-return null;
-} else {
-return cljs.core.cons.call(null,new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [node.key,node.val], null),cljs$core$async$impl$timers$iter.call(null,(node.forward[(0)])));
-}
-});})(coll__$1))
-,null,null));
-});})(coll__$1))
-;
-return iter.call(null,(self__.header.forward[(0)]));
-});
-
-cljs.core.async.impl.timers.SkipList.prototype.cljs$core$IPrintWithWriter$_pr_writer$arity$3 = (function (coll,writer,opts){
-var self__ = this;
-var coll__$1 = this;
-var pr_pair = ((function (coll__$1){
-return (function (keyval){
-return cljs.core.pr_sequential_writer.call(null,writer,cljs.core.pr_writer,""," ","",opts,keyval);
-});})(coll__$1))
-;
-return cljs.core.pr_sequential_writer.call(null,writer,pr_pair,"{",", ","}",opts,coll__$1);
-});
-
-cljs.core.async.impl.timers.SkipList.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"header","header",1759972661,null),cljs.core.with_meta(new cljs.core.Symbol(null,"level","level",-1363938217,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null))], null);
-});
-
-cljs.core.async.impl.timers.SkipList.cljs$lang$type = true;
-
-cljs.core.async.impl.timers.SkipList.cljs$lang$ctorStr = "cljs.core.async.impl.timers/SkipList";
-
-cljs.core.async.impl.timers.SkipList.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.core.async.impl.timers/SkipList");
-});
-
-/**
- * Positional factory function for cljs.core.async.impl.timers/SkipList.
- */
-cljs.core.async.impl.timers.__GT_SkipList = (function cljs$core$async$impl$timers$__GT_SkipList(header,level){
-return (new cljs.core.async.impl.timers.SkipList(header,level));
-});
-
-cljs.core.async.impl.timers.skip_list = (function cljs$core$async$impl$timers$skip_list(){
-return (new cljs.core.async.impl.timers.SkipList(cljs.core.async.impl.timers.skip_list_node.call(null,(0)),(0)));
-});
-cljs.core.async.impl.timers.timeouts_map = cljs.core.async.impl.timers.skip_list.call(null);
-cljs.core.async.impl.timers.TIMEOUT_RESOLUTION_MS = (10);
-/**
- * returns a channel that will close after msecs
- */
-cljs.core.async.impl.timers.timeout = (function cljs$core$async$impl$timers$timeout(msecs){
-var timeout = ((new Date()).valueOf() + msecs);
-var me = cljs.core.async.impl.timers.timeouts_map.ceilingEntry(timeout);
-var or__4131__auto__ = (cljs.core.truth_((function (){var and__4120__auto__ = me;
-if(cljs.core.truth_(and__4120__auto__)){
-return (me.key < (timeout + cljs.core.async.impl.timers.TIMEOUT_RESOLUTION_MS));
-} else {
-return and__4120__auto__;
-}
-})())?me.val:null);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-var timeout_channel = cljs.core.async.impl.channels.chan.call(null,null);
-cljs.core.async.impl.timers.timeouts_map.put(timeout,timeout_channel);
-
-cljs.core.async.impl.dispatch.queue_delay.call(null,((function (timeout_channel,or__4131__auto__,timeout,me){
-return (function (){
-cljs.core.async.impl.timers.timeouts_map.remove(timeout);
-
-return cljs.core.async.impl.protocols.close_BANG_.call(null,timeout_channel);
-});})(timeout_channel,or__4131__auto__,timeout,me))
-,msecs);
-
-return timeout_channel;
-}
-});
-
-//# sourceMappingURL=timers.js.map?rel=1582560147715

docs/js/compiled/out/cljs/reader.cljs

@@ -1,214 +0,0 @@
-;   Copyright (c) Rich Hickey. All rights reserved.
-;   The use and distribution terms for this software are covered by the
-;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;   which can be found in the file epl-v10.html at the root of this distribution.
-;   By using this software in any fashion, you are agreeing to be bound by
-;   the terms of this license.
-;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.reader
-  (:require-macros [cljs.reader :refer [add-data-readers]])
-  (:require [goog.object :as gobject]
-            [cljs.tools.reader :as treader]
-            [cljs.tools.reader.edn :as edn])
-  (:import [goog.string StringBuffer]))
-
-(defn ^:private zero-fill-right-and-truncate [s width]
-  (cond
-    (= width (count s)) s
-    (< width (count s)) (subs s 0 width)
-    :else
-    (loop [b (StringBuffer. s)]
-      (if (< (.getLength b) width)
-        (recur (.append b "0"))
-        (.toString b)))))
-
-(defn ^:private divisible?
-  [num div]
-  (zero? (mod num div)))
-
-(defn ^:private indivisible?
-  [num div]
-  (not (divisible? num div)))
-
-(defn ^:private leap-year?
-  [year]
-  (and (divisible? year 4)
-       (or (indivisible? year 100)
-           (divisible? year 400))))
-
-(def ^:private days-in-month
-  (let [dim-norm [nil 31 28 31 30 31 30 31 31 30 31 30 31]
-        dim-leap [nil 31 29 31 30 31 30 31 31 30 31 30 31]]
-    (fn [month leap-year?]
-      (get (if leap-year? dim-leap dim-norm) month))))
-
-(def ^:private timestamp-regex #"(\d\d\d\d)(?:-(\d\d)(?:-(\d\d)(?:[T](\d\d)(?::(\d\d)(?::(\d\d)(?:[.](\d+))?)?)?)?)?)?(?:[Z]|([-+])(\d\d):(\d\d))?")
-
-(defn ^:private parse-int [s]
-  (let [n (js/parseInt s 10)]
-    (if-not (js/isNaN n)
-      n)))
-
-(defn ^:private check [low n high msg]
-  (when-not (<= low n high)
-    (throw (js/Error. (str msg " Failed:  " low "<=" n "<=" high))))
-  n)
-
-(defn parse-and-validate-timestamp [s]
-  (let [[_ years months days hours minutes seconds fraction offset-sign offset-hours offset-minutes :as v]
-        (re-matches timestamp-regex s)]
-    (if-not v
-      (throw (js/Error. (str "Unrecognized date/time syntax: " s)))
-      (let [years (parse-int years)
-            months (or (parse-int months) 1)
-            days (or (parse-int days) 1)
-            hours (or (parse-int hours) 0)
-            minutes (or (parse-int minutes) 0)
-            seconds (or (parse-int seconds) 0)
-            fraction (or (parse-int (zero-fill-right-and-truncate fraction 3)) 0)
-            offset-sign (if (= offset-sign "-") -1 1)
-            offset-hours (or (parse-int offset-hours) 0)
-            offset-minutes (or (parse-int offset-minutes) 0)
-            offset (* offset-sign (+ (* offset-hours 60) offset-minutes))]
-        [years
-         (check 1 months 12 "timestamp month field must be in range 1..12")
-         (check 1 days (days-in-month months (leap-year? years)) "timestamp day field must be in range 1..last day in month")
-         (check 0 hours 23 "timestamp hour field must be in range 0..23")
-         (check 0 minutes 59 "timestamp minute field must be in range 0..59")
-         (check 0 seconds (if (= minutes 59) 60 59) "timestamp second field must be in range 0..60")
-         (check 0 fraction 999 "timestamp millisecond field must be in range 0..999")
-         offset]))))
-
-(defn parse-timestamp
-  [ts]
-  (if-let [[years months days hours minutes seconds ms offset]
-           (parse-and-validate-timestamp ts)]
-    (js/Date.
-      (- (.UTC js/Date years (dec months) days hours minutes seconds ms)
-        (* offset 60 1000)))
-    (throw (js/Error. (str "Unrecognized date/time syntax: " ts)))))
-
-(defn ^:private read-date
-  [s]
-  (if (string? s)
-    (parse-timestamp s)
-    (throw (js/Error. "Instance literal expects a string for its timestamp."))))
-
-(defn ^:private read-queue
-  [elems]
-  (if (vector? elems)
-    (into cljs.core/PersistentQueue.EMPTY elems)
-    (throw (js/Error. "Queue literal expects a vector for its elements."))))
-
-(defn ^:private read-js
-  [form]
-  (cond
-    (vector? form)
-    (let [arr (array)]
-      (doseq [x form]
-        (.push arr x))
-      arr)
-
-    (map? form)
-    (let [obj (js-obj)]
-      (doseq [[k v] form]
-        (gobject/set obj (name k) v))
-      obj)
-
-    :else
-    (throw
-      (js/Error.
-        (str "JS literal expects a vector or map containing "
-             "only string or unqualified keyword keys")))))
-
-(defn ^:private read-uuid
-  [uuid]
-  (if (string? uuid)
-    (cljs.core/uuid uuid)
-    (throw (js/Error. "UUID literal expects a string as its representation."))))
-
-(def ^:dynamic *default-data-reader-fn*
-  (atom nil))
-
-(def ^:dynamic *tag-table*
-  (atom
-    (add-data-readers
-      {'inst  read-date
-       'uuid  read-uuid
-       'queue read-queue
-       'js    read-js})))
-
-(defn read
-  "Reads the first object from an cljs.tools.reader.reader-types/IPushbackReader.
-   Returns the object read. If EOF, throws if eof-error? is true otherwise returns eof.
-   If no reader is provided, *in* will be used.
-
-   Reads data in the edn format (subset of Clojure data):
-   http://edn-format.org
-
-   cljs.tools.reader.edn/read doesn't depend on dynamic Vars, all configuration
-   is done by passing an opt map.
-
-   opts is a map that can include the following keys:
-   :eof - value to return on end-of-file. When not supplied, eof throws an exception.
-   :readers  - a map of tag symbols to data-reader functions to be considered before default-data-readers.
-              When not supplied, only the default-data-readers will be used.
-   :default - A function of two args, that will, if present and no reader is found for a tag,
-              be called with the tag and the value."
-  ([reader]
-   (edn/read
-     {:readers @*tag-table*
-      :default @*default-data-reader-fn*
-      :eof nil}
-     reader))
-  ([{:keys [eof] :as opts} reader]
-   (edn/read
-     (update (merge opts {:default @*default-data-reader-fn*})
-       :readers (fn [m] (merge @*tag-table* m))) reader))
-  ([reader eof-error? eof opts]
-   (edn/read reader eof-error? eof
-     (update (merge opts {:default @*default-data-reader-fn*})
-       :readers (fn [m] (merge @*tag-table* m))))))
-
-(defn read-string
-  "Reads one object from the string s.
-   Returns nil when s is nil or empty.
-
-   Reads data in the edn format (subset of Clojure data):
-   http://edn-format.org
-
-   opts is a map as per cljs.tools.reader.edn/read"
-  ([s]
-   (edn/read-string
-     {:readers @*tag-table*
-      :default @*default-data-reader-fn*
-      :eof nil} s))
-  ([opts s]
-   (edn/read-string
-     (update (merge {:default @*default-data-reader-fn*} opts)
-       :readers (fn [m] (merge @*tag-table* m))) s)))
-
-(defn register-tag-parser!
-  [tag f]
-  (let [old-parser (get @*tag-table* tag)]
-    (swap! *tag-table* assoc tag f)
-    old-parser))
-
-(defn deregister-tag-parser!
-  [tag]
-  (let [old-parser (get @*tag-table* tag)]
-    (swap! *tag-table* dissoc tag)
-    old-parser))
-
-(defn register-default-tag-parser!
-  [f]
-  (let [old-parser @*default-data-reader-fn*]
-    (swap! *default-data-reader-fn* (fn [_] f))
-    old-parser))
-
-(defn deregister-default-tag-parser!
-  []
-  (let [old-parser @*default-data-reader-fn*]
-    (swap! *default-data-reader-fn* (fn [_] nil))
-    old-parser))

docs/js/compiled/out/cljs/reader.js

@@ -1,445 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.reader');
-goog.require('cljs.core');
-goog.require('goog.object');
-goog.require('cljs.tools.reader');
-goog.require('cljs.tools.reader.edn');
-goog.require('goog.string.StringBuffer');
-cljs.reader.zero_fill_right_and_truncate = (function cljs$reader$zero_fill_right_and_truncate(s,width){
-if(cljs.core._EQ_.call(null,width,cljs.core.count.call(null,s))){
-return s;
-} else {
-if((width < cljs.core.count.call(null,s))){
-return cljs.core.subs.call(null,s,(0),width);
-} else {
-var b = (new goog.string.StringBuffer(s));
-while(true){
-if((b.getLength() < width)){
-var G__21298 = b.append("0");
-b = G__21298;
-continue;
-} else {
-return b.toString();
-}
-break;
-}
-
-}
-}
-});
-cljs.reader.divisible_QMARK_ = (function cljs$reader$divisible_QMARK_(num,div){
-return (cljs.core.mod.call(null,num,div) === (0));
-});
-cljs.reader.indivisible_QMARK_ = (function cljs$reader$indivisible_QMARK_(num,div){
-return (!(cljs.reader.divisible_QMARK_.call(null,num,div)));
-});
-cljs.reader.leap_year_QMARK_ = (function cljs$reader$leap_year_QMARK_(year){
-return ((cljs.reader.divisible_QMARK_.call(null,year,(4))) && (((cljs.reader.indivisible_QMARK_.call(null,year,(100))) || (cljs.reader.divisible_QMARK_.call(null,year,(400))))));
-});
-cljs.reader.days_in_month = (function (){var dim_norm = new cljs.core.PersistentVector(null, 13, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,(31),(28),(31),(30),(31),(30),(31),(31),(30),(31),(30),(31)], null);
-var dim_leap = new cljs.core.PersistentVector(null, 13, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,(31),(29),(31),(30),(31),(30),(31),(31),(30),(31),(30),(31)], null);
-return ((function (dim_norm,dim_leap){
-return (function (month,leap_year_QMARK_){
-return cljs.core.get.call(null,(cljs.core.truth_(leap_year_QMARK_)?dim_leap:dim_norm),month);
-});
-;})(dim_norm,dim_leap))
-})();
-cljs.reader.timestamp_regex = /(\d\d\d\d)(?:-(\d\d)(?:-(\d\d)(?:[T](\d\d)(?::(\d\d)(?::(\d\d)(?:[.](\d+))?)?)?)?)?)?(?:[Z]|([-+])(\d\d):(\d\d))?/;
-cljs.reader.parse_int = (function cljs$reader$parse_int(s){
-var n = parseInt(s,(10));
-if(cljs.core.not.call(null,isNaN(n))){
-return n;
-} else {
-return null;
-}
-});
-cljs.reader.check = (function cljs$reader$check(low,n,high,msg){
-if((((low <= n)) && ((n <= high)))){
-} else {
-throw (new Error([cljs.core.str.cljs$core$IFn$_invoke$arity$1(msg)," Failed:  ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(low),"<=",cljs.core.str.cljs$core$IFn$_invoke$arity$1(n),"<=",cljs.core.str.cljs$core$IFn$_invoke$arity$1(high)].join('')));
-}
-
-return n;
-});
-cljs.reader.parse_and_validate_timestamp = (function cljs$reader$parse_and_validate_timestamp(s){
-var vec__21299 = cljs.core.re_matches.call(null,cljs.reader.timestamp_regex,s);
-var _ = cljs.core.nth.call(null,vec__21299,(0),null);
-var years = cljs.core.nth.call(null,vec__21299,(1),null);
-var months = cljs.core.nth.call(null,vec__21299,(2),null);
-var days = cljs.core.nth.call(null,vec__21299,(3),null);
-var hours = cljs.core.nth.call(null,vec__21299,(4),null);
-var minutes = cljs.core.nth.call(null,vec__21299,(5),null);
-var seconds = cljs.core.nth.call(null,vec__21299,(6),null);
-var fraction = cljs.core.nth.call(null,vec__21299,(7),null);
-var offset_sign = cljs.core.nth.call(null,vec__21299,(8),null);
-var offset_hours = cljs.core.nth.call(null,vec__21299,(9),null);
-var offset_minutes = cljs.core.nth.call(null,vec__21299,(10),null);
-var v = vec__21299;
-if(cljs.core.not.call(null,v)){
-throw (new Error(["Unrecognized date/time syntax: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(s)].join('')));
-} else {
-var years__$1 = cljs.reader.parse_int.call(null,years);
-var months__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,months);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (1);
-}
-})();
-var days__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,days);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (1);
-}
-})();
-var hours__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,hours);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (0);
-}
-})();
-var minutes__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,minutes);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (0);
-}
-})();
-var seconds__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,seconds);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (0);
-}
-})();
-var fraction__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,cljs.reader.zero_fill_right_and_truncate.call(null,fraction,(3)));
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (0);
-}
-})();
-var offset_sign__$1 = ((cljs.core._EQ_.call(null,offset_sign,"-"))?(-1):(1));
-var offset_hours__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,offset_hours);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (0);
-}
-})();
-var offset_minutes__$1 = (function (){var or__4131__auto__ = cljs.reader.parse_int.call(null,offset_minutes);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (0);
-}
-})();
-var offset = (offset_sign__$1 * ((offset_hours__$1 * (60)) + offset_minutes__$1));
-return new cljs.core.PersistentVector(null, 8, 5, cljs.core.PersistentVector.EMPTY_NODE, [years__$1,cljs.reader.check.call(null,(1),months__$1,(12),"timestamp month field must be in range 1..12"),cljs.reader.check.call(null,(1),days__$1,cljs.reader.days_in_month.call(null,months__$1,cljs.reader.leap_year_QMARK_.call(null,years__$1)),"timestamp day field must be in range 1..last day in month"),cljs.reader.check.call(null,(0),hours__$1,(23),"timestamp hour field must be in range 0..23"),cljs.reader.check.call(null,(0),minutes__$1,(59),"timestamp minute field must be in range 0..59"),cljs.reader.check.call(null,(0),seconds__$1,((cljs.core._EQ_.call(null,minutes__$1,(59)))?(60):(59)),"timestamp second field must be in range 0..60"),cljs.reader.check.call(null,(0),fraction__$1,(999),"timestamp millisecond field must be in range 0..999"),offset], null);
-}
-});
-cljs.reader.parse_timestamp = (function cljs$reader$parse_timestamp(ts){
-var temp__5718__auto__ = cljs.reader.parse_and_validate_timestamp.call(null,ts);
-if(cljs.core.truth_(temp__5718__auto__)){
-var vec__21302 = temp__5718__auto__;
-var years = cljs.core.nth.call(null,vec__21302,(0),null);
-var months = cljs.core.nth.call(null,vec__21302,(1),null);
-var days = cljs.core.nth.call(null,vec__21302,(2),null);
-var hours = cljs.core.nth.call(null,vec__21302,(3),null);
-var minutes = cljs.core.nth.call(null,vec__21302,(4),null);
-var seconds = cljs.core.nth.call(null,vec__21302,(5),null);
-var ms = cljs.core.nth.call(null,vec__21302,(6),null);
-var offset = cljs.core.nth.call(null,vec__21302,(7),null);
-return (new Date((Date.UTC(years,(months - (1)),days,hours,minutes,seconds,ms) - ((offset * (60)) * (1000)))));
-} else {
-throw (new Error(["Unrecognized date/time syntax: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(ts)].join('')));
-}
-});
-cljs.reader.read_date = (function cljs$reader$read_date(s){
-if(typeof s === 'string'){
-return cljs.reader.parse_timestamp.call(null,s);
-} else {
-throw (new Error("Instance literal expects a string for its timestamp."));
-}
-});
-cljs.reader.read_queue = (function cljs$reader$read_queue(elems){
-if(cljs.core.vector_QMARK_.call(null,elems)){
-return cljs.core.into.call(null,cljs.core.PersistentQueue.EMPTY,elems);
-} else {
-throw (new Error("Queue literal expects a vector for its elements."));
-}
-});
-cljs.reader.read_js = (function cljs$reader$read_js(form){
-if(cljs.core.vector_QMARK_.call(null,form)){
-var arr = [];
-var seq__21305_21327 = cljs.core.seq.call(null,form);
-var chunk__21306_21328 = null;
-var count__21307_21329 = (0);
-var i__21308_21330 = (0);
-while(true){
-if((i__21308_21330 < count__21307_21329)){
-var x_21331 = cljs.core._nth.call(null,chunk__21306_21328,i__21308_21330);
-arr.push(x_21331);
-
-
-var G__21332 = seq__21305_21327;
-var G__21333 = chunk__21306_21328;
-var G__21334 = count__21307_21329;
-var G__21335 = (i__21308_21330 + (1));
-seq__21305_21327 = G__21332;
-chunk__21306_21328 = G__21333;
-count__21307_21329 = G__21334;
-i__21308_21330 = G__21335;
-continue;
-} else {
-var temp__5720__auto___21336 = cljs.core.seq.call(null,seq__21305_21327);
-if(temp__5720__auto___21336){
-var seq__21305_21337__$1 = temp__5720__auto___21336;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__21305_21337__$1)){
-var c__4550__auto___21338 = cljs.core.chunk_first.call(null,seq__21305_21337__$1);
-var G__21339 = cljs.core.chunk_rest.call(null,seq__21305_21337__$1);
-var G__21340 = c__4550__auto___21338;
-var G__21341 = cljs.core.count.call(null,c__4550__auto___21338);
-var G__21342 = (0);
-seq__21305_21327 = G__21339;
-chunk__21306_21328 = G__21340;
-count__21307_21329 = G__21341;
-i__21308_21330 = G__21342;
-continue;
-} else {
-var x_21343 = cljs.core.first.call(null,seq__21305_21337__$1);
-arr.push(x_21343);
-
-
-var G__21344 = cljs.core.next.call(null,seq__21305_21337__$1);
-var G__21345 = null;
-var G__21346 = (0);
-var G__21347 = (0);
-seq__21305_21327 = G__21344;
-chunk__21306_21328 = G__21345;
-count__21307_21329 = G__21346;
-i__21308_21330 = G__21347;
-continue;
-}
-} else {
-}
-}
-break;
-}
-
-return arr;
-} else {
-if(cljs.core.map_QMARK_.call(null,form)){
-var obj = ({});
-var seq__21311_21348 = cljs.core.seq.call(null,form);
-var chunk__21312_21349 = null;
-var count__21313_21350 = (0);
-var i__21314_21351 = (0);
-while(true){
-if((i__21314_21351 < count__21313_21350)){
-var vec__21321_21352 = cljs.core._nth.call(null,chunk__21312_21349,i__21314_21351);
-var k_21353 = cljs.core.nth.call(null,vec__21321_21352,(0),null);
-var v_21354 = cljs.core.nth.call(null,vec__21321_21352,(1),null);
-goog.object.set(obj,cljs.core.name.call(null,k_21353),v_21354);
-
-
-var G__21355 = seq__21311_21348;
-var G__21356 = chunk__21312_21349;
-var G__21357 = count__21313_21350;
-var G__21358 = (i__21314_21351 + (1));
-seq__21311_21348 = G__21355;
-chunk__21312_21349 = G__21356;
-count__21313_21350 = G__21357;
-i__21314_21351 = G__21358;
-continue;
-} else {
-var temp__5720__auto___21359 = cljs.core.seq.call(null,seq__21311_21348);
-if(temp__5720__auto___21359){
-var seq__21311_21360__$1 = temp__5720__auto___21359;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__21311_21360__$1)){
-var c__4550__auto___21361 = cljs.core.chunk_first.call(null,seq__21311_21360__$1);
-var G__21362 = cljs.core.chunk_rest.call(null,seq__21311_21360__$1);
-var G__21363 = c__4550__auto___21361;
-var G__21364 = cljs.core.count.call(null,c__4550__auto___21361);
-var G__21365 = (0);
-seq__21311_21348 = G__21362;
-chunk__21312_21349 = G__21363;
-count__21313_21350 = G__21364;
-i__21314_21351 = G__21365;
-continue;
-} else {
-var vec__21324_21366 = cljs.core.first.call(null,seq__21311_21360__$1);
-var k_21367 = cljs.core.nth.call(null,vec__21324_21366,(0),null);
-var v_21368 = cljs.core.nth.call(null,vec__21324_21366,(1),null);
-goog.object.set(obj,cljs.core.name.call(null,k_21367),v_21368);
-
-
-var G__21369 = cljs.core.next.call(null,seq__21311_21360__$1);
-var G__21370 = null;
-var G__21371 = (0);
-var G__21372 = (0);
-seq__21311_21348 = G__21369;
-chunk__21312_21349 = G__21370;
-count__21313_21350 = G__21371;
-i__21314_21351 = G__21372;
-continue;
-}
-} else {
-}
-}
-break;
-}
-
-return obj;
-} else {
-throw (new Error(["JS literal expects a vector or map containing ","only string or unqualified keyword keys"].join('')));
-
-}
-}
-});
-cljs.reader.read_uuid = (function cljs$reader$read_uuid(uuid){
-if(typeof uuid === 'string'){
-return cljs.core.uuid.call(null,uuid);
-} else {
-throw (new Error("UUID literal expects a string as its representation."));
-}
-});
-cljs.reader._STAR_default_data_reader_fn_STAR_ = cljs.core.atom.call(null,null);
-cljs.reader._STAR_tag_table_STAR_ = cljs.core.atom.call(null,cljs.core.merge.call(null,new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Symbol(null,"inst","inst",-2008473268,null),cljs.reader.read_date,new cljs.core.Symbol(null,"uuid","uuid",-504564192,null),cljs.reader.read_uuid,new cljs.core.Symbol(null,"queue","queue",-1198599890,null),cljs.reader.read_queue,new cljs.core.Symbol(null,"js","js",-886355190,null),cljs.reader.read_js], null),cljs.core.PersistentArrayMap.EMPTY));
-/**
- * Reads the first object from an cljs.tools.reader.reader-types/IPushbackReader.
- * Returns the object read. If EOF, throws if eof-error? is true otherwise returns eof.
- * If no reader is provided, *in* will be used.
- * 
- * Reads data in the edn format (subset of Clojure data):
- * http://edn-format.org
- * 
- * cljs.tools.reader.edn/read doesn't depend on dynamic Vars, all configuration
- * is done by passing an opt map.
- * 
- * opts is a map that can include the following keys:
- * :eof - value to return on end-of-file. When not supplied, eof throws an exception.
- * :readers  - a map of tag symbols to data-reader functions to be considered before default-data-readers.
- *            When not supplied, only the default-data-readers will be used.
- * :default - A function of two args, that will, if present and no reader is found for a tag,
- *            be called with the tag and the value.
- */
-cljs.reader.read = (function cljs$reader$read(var_args){
-var G__21374 = arguments.length;
-switch (G__21374) {
-case 1:
-return cljs.reader.read.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.reader.read.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-case 4:
-return cljs.reader.read.cljs$core$IFn$_invoke$arity$4((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.reader.read.cljs$core$IFn$_invoke$arity$1 = (function (reader){
-return cljs.tools.reader.edn.read.call(null,new cljs.core.PersistentArrayMap(null, 3, [new cljs.core.Keyword(null,"readers","readers",-2118263030),cljs.core.deref.call(null,cljs.reader._STAR_tag_table_STAR_),new cljs.core.Keyword(null,"default","default",-1987822328),cljs.core.deref.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_),new cljs.core.Keyword(null,"eof","eof",-489063237),null], null),reader);
-});
-
-cljs.reader.read.cljs$core$IFn$_invoke$arity$2 = (function (p__21375,reader){
-var map__21376 = p__21375;
-var map__21376__$1 = (((((!((map__21376 == null))))?(((((map__21376.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__21376.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__21376):map__21376);
-var opts = map__21376__$1;
-var eof = cljs.core.get.call(null,map__21376__$1,new cljs.core.Keyword(null,"eof","eof",-489063237));
-return cljs.tools.reader.edn.read.call(null,cljs.core.update.call(null,cljs.core.merge.call(null,opts,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"default","default",-1987822328),cljs.core.deref.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_)], null)),new cljs.core.Keyword(null,"readers","readers",-2118263030),((function (map__21376,map__21376__$1,opts,eof){
-return (function (m){
-return cljs.core.merge.call(null,cljs.core.deref.call(null,cljs.reader._STAR_tag_table_STAR_),m);
-});})(map__21376,map__21376__$1,opts,eof))
-),reader);
-});
-
-cljs.reader.read.cljs$core$IFn$_invoke$arity$4 = (function (reader,eof_error_QMARK_,eof,opts){
-return cljs.tools.reader.edn.read.call(null,reader,eof_error_QMARK_,eof,cljs.core.update.call(null,cljs.core.merge.call(null,opts,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"default","default",-1987822328),cljs.core.deref.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_)], null)),new cljs.core.Keyword(null,"readers","readers",-2118263030),(function (m){
-return cljs.core.merge.call(null,cljs.core.deref.call(null,cljs.reader._STAR_tag_table_STAR_),m);
-})));
-});
-
-cljs.reader.read.cljs$lang$maxFixedArity = 4;
-
-/**
- * Reads one object from the string s.
- * Returns nil when s is nil or empty.
- * 
- * Reads data in the edn format (subset of Clojure data):
- * http://edn-format.org
- * 
- * opts is a map as per cljs.tools.reader.edn/read
- */
-cljs.reader.read_string = (function cljs$reader$read_string(var_args){
-var G__21380 = arguments.length;
-switch (G__21380) {
-case 1:
-return cljs.reader.read_string.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.reader.read_string.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.reader.read_string.cljs$core$IFn$_invoke$arity$1 = (function (s){
-return cljs.tools.reader.edn.read_string.call(null,new cljs.core.PersistentArrayMap(null, 3, [new cljs.core.Keyword(null,"readers","readers",-2118263030),cljs.core.deref.call(null,cljs.reader._STAR_tag_table_STAR_),new cljs.core.Keyword(null,"default","default",-1987822328),cljs.core.deref.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_),new cljs.core.Keyword(null,"eof","eof",-489063237),null], null),s);
-});
-
-cljs.reader.read_string.cljs$core$IFn$_invoke$arity$2 = (function (opts,s){
-return cljs.tools.reader.edn.read_string.call(null,cljs.core.update.call(null,cljs.core.merge.call(null,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"default","default",-1987822328),cljs.core.deref.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_)], null),opts),new cljs.core.Keyword(null,"readers","readers",-2118263030),(function (m){
-return cljs.core.merge.call(null,cljs.core.deref.call(null,cljs.reader._STAR_tag_table_STAR_),m);
-})),s);
-});
-
-cljs.reader.read_string.cljs$lang$maxFixedArity = 2;
-
-cljs.reader.register_tag_parser_BANG_ = (function cljs$reader$register_tag_parser_BANG_(tag,f){
-var old_parser = cljs.core.get.call(null,cljs.core.deref.call(null,cljs.reader._STAR_tag_table_STAR_),tag);
-cljs.core.swap_BANG_.call(null,cljs.reader._STAR_tag_table_STAR_,cljs.core.assoc,tag,f);
-
-return old_parser;
-});
-cljs.reader.deregister_tag_parser_BANG_ = (function cljs$reader$deregister_tag_parser_BANG_(tag){
-var old_parser = cljs.core.get.call(null,cljs.core.deref.call(null,cljs.reader._STAR_tag_table_STAR_),tag);
-cljs.core.swap_BANG_.call(null,cljs.reader._STAR_tag_table_STAR_,cljs.core.dissoc,tag);
-
-return old_parser;
-});
-cljs.reader.register_default_tag_parser_BANG_ = (function cljs$reader$register_default_tag_parser_BANG_(f){
-var old_parser = cljs.core.deref.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_);
-cljs.core.swap_BANG_.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_,((function (old_parser){
-return (function (_){
-return f;
-});})(old_parser))
-);
-
-return old_parser;
-});
-cljs.reader.deregister_default_tag_parser_BANG_ = (function cljs$reader$deregister_default_tag_parser_BANG_(){
-var old_parser = cljs.core.deref.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_);
-cljs.core.swap_BANG_.call(null,cljs.reader._STAR_default_data_reader_fn_STAR_,((function (old_parser){
-return (function (_){
-return null;
-});})(old_parser))
-);
-
-return old_parser;
-});
-
-//# sourceMappingURL=reader.js.map?rel=1582560147241

docs/js/compiled/out/cljs/repl.cljs

@@ -1,235 +0,0 @@
-;; Copyright (c) Rich Hickey. All rights reserved.
-;; The use and distribution terms for this software are covered by the
-;; Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;; which can be found in the file epl-v10.html at the root of this distribution.
-;; By using this software in any fashion, you are agreeing to be bound by
-;; the terms of this license.
-;; You must not remove this notice, or any other, from this software.
-
-(ns cljs.repl
-  (:require-macros cljs.repl)
-  (:require [cljs.spec.alpha :as spec]
-            [goog.string :as gstring]
-            [goog.string.format]))
-
-(defn print-doc [{n :ns nm :name :as m}]
-  (println "-------------------------")
-  (println (or (:spec m) (str (when-let [ns (:ns m)] (str ns "/")) (:name m))))
-  (when (:protocol m)
-    (println "Protocol"))
-  (cond
-    (:forms m) (doseq [f (:forms m)]
-                 (println "  " f))
-    (:arglists m) (let [arglists (:arglists m)]
-                    (if (or (:macro m)
-                         (:repl-special-function m))
-                     (prn arglists)
-                     (prn
-                       (if (= 'quote (first arglists))
-                         (second arglists)
-                         arglists)))))
-  (if (:special-form m)
-    (do
-      (println "Special Form")
-      (println " " (:doc m))
-      (if (contains? m :url)
-        (when (:url m)
-          (println (str "\n  Please see http://clojure.org/" (:url m))))
-        (println (str "\n  Please see http://clojure.org/special_forms#"
-                   (:name m)))))
-    (do
-      (when (:macro m)
-        (println "Macro"))
-      (when (:spec m)
-        (println "Spec"))
-      (when (:repl-special-function m)
-        (println "REPL Special Function"))
-      (println " " (:doc m))
-      (when (:protocol m)
-        (doseq [[name {:keys [doc arglists]}] (:methods m)]
-          (println)
-          (println " " name)
-          (println " " arglists)
-          (when doc
-            (println " " doc))))
-      (when n
-        (when-let [fnspec (spec/get-spec (symbol (str (ns-name n)) (name nm)))]
-          (print "Spec")
-          (doseq [role [:args :ret :fn]]
-            (when-let [spec (get fnspec role)]
-              (print (str "\n " (name role) ":") (spec/describe spec)))))))))
-
-(defn Error->map
-  "Constructs a data representation for a Error with keys:
-    :cause - root cause message
-    :phase - error phase
-    :via - cause chain, with cause keys:
-             :type - exception class symbol
-             :message - exception message
-             :data - ex-data
-             :at - top stack element
-    :trace - root cause stack elements"
-  [o]
-  (let [base (fn [t]
-               (merge {:type (cond
-                               (instance? ExceptionInfo t) 'ExceptionInfo
-                               (instance? js/EvalError t) 'js/EvalError
-                               (instance? js/RangeError t) 'js/RangeError
-                               (instance? js/ReferenceError t) 'js/ReferenceError
-                               (instance? js/SyntaxError t) 'js/SyntaxError
-                               (instance? js/URIError t) 'js/URIError
-                               (instance? js/Error t) 'js/Error
-                               :else nil)}
-                 (when-let [msg (ex-message t)]
-                   {:message msg})
-                 (when-let [ed (ex-data t)]
-                   {:data ed})
-                 #_(let [st (extract-canonical-stacktrace t)]
-                   (when (pos? (count st))
-                     {:at st}))))
-        via (loop [via [], t o]
-              (if t
-                (recur (conj via t) (ex-cause t))
-                via))
-        root (peek via)]
-    (merge {:via   (vec (map base via))
-            :trace nil #_(extract-canonical-stacktrace (or root o))}
-      (when-let [root-msg (ex-message root)]
-        {:cause root-msg})
-      (when-let [data (ex-data root)]
-        {:data data})
-      (when-let [phase (-> o ex-data :clojure.error/phase)]
-        {:phase phase}))))
-
-(defn ex-triage
-  "Returns an analysis of the phase, error, cause, and location of an error that occurred
-  based on Throwable data, as returned by Throwable->map. All attributes other than phase
-  are optional:
-    :clojure.error/phase - keyword phase indicator, one of:
-      :read-source :compile-syntax-check :compilation :macro-syntax-check :macroexpansion
-      :execution :read-eval-result :print-eval-result
-    :clojure.error/source - file name (no path)
-    :clojure.error/line - integer line number
-    :clojure.error/column - integer column number
-    :clojure.error/symbol - symbol being expanded/compiled/invoked
-    :clojure.error/class - cause exception class symbol
-    :clojure.error/cause - cause exception message
-    :clojure.error/spec - explain-data for spec error"
-  [datafied-throwable]
-  (let [{:keys [via trace phase] :or {phase :execution}} datafied-throwable
-        {:keys [type message data]} (last via)
-        {:cljs.spec.alpha/keys [problems fn] :cljs.spec.test.alpha/keys [caller]} data
-        {:keys [:clojure.error/source] :as top-data} (:data (first via))]
-    (assoc
-     (case phase
-       :read-source
-       (let [{:keys [:clojure.error/line :clojure.error/column]} data]
-         (cond-> (merge (-> via second :data) top-data)
-           source (assoc :clojure.error/source source)
-           (#{"NO_SOURCE_FILE" "NO_SOURCE_PATH"} source) (dissoc :clojure.error/source)
-           message (assoc :clojure.error/cause message)))
-
-       (:compile-syntax-check :compilation :macro-syntax-check :macroexpansion)
-       (cond-> top-data
-         source (assoc :clojure.error/source source)
-         (#{"NO_SOURCE_FILE" "NO_SOURCE_PATH"} source) (dissoc :clojure.error/source)
-         type (assoc :clojure.error/class type)
-         message (assoc :clojure.error/cause message)
-         problems (assoc :clojure.error/spec data))
-
-       (:read-eval-result :print-eval-result)
-       (let [[source method file line] (-> trace first)]
-         (cond-> top-data
-           line (assoc :clojure.error/line line)
-           file (assoc :clojure.error/source file)
-           (and source method) (assoc :clojure.error/symbol (vector #_java-loc->source source method))
-           type (assoc :clojure.error/class type)
-           message (assoc :clojure.error/cause message)))
-
-       :execution
-       (let [[source method file line] (->> trace #_(drop-while #(core-class? (name (first %)))) first)
-             file (first (remove #(or (nil? %) (#{"NO_SOURCE_FILE" "NO_SOURCE_PATH"} %)) [(:file caller) file]))
-             err-line (or (:line caller) line)]
-         (cond-> {:clojure.error/class type}
-           err-line (assoc :clojure.error/line err-line)
-           message (assoc :clojure.error/cause message)
-           (or fn (and source method)) (assoc :clojure.error/symbol (or fn (vector #_java-loc->source source method)))
-           file (assoc :clojure.error/source file)
-           problems (assoc :clojure.error/spec data))))
-      :clojure.error/phase phase)))
-
-(defn ex-str
-  "Returns a string from exception data, as produced by ex-triage.
-  The first line summarizes the exception phase and location.
-  The subsequent lines describe the cause."
-  [{:clojure.error/keys [phase source line column symbol class cause spec] :as triage-data}]
-  (let [loc          (str (or source "<cljs repl>") ":" (or line 1) (if column (str ":" column) ""))
-        class-name   (name (or class ""))
-        simple-class class-name
-        cause-type   (if (contains? #{"Exception" "RuntimeException"} simple-class)
-                       ""                                   ;; omit, not useful
-                       (str " (" simple-class ")"))
-        format       gstring/format]
-    (case phase
-      :read-source
-      (format "Syntax error reading source at (%s).\n%s\n" loc cause)
-
-      :macro-syntax-check
-      (format "Syntax error macroexpanding %sat (%s).\n%s"
-        (if symbol (str symbol " ") "")
-        loc
-        (if spec
-          (with-out-str
-            (spec/explain-out
-              (if true #_(= s/*explain-out* s/explain-printer)
-                (update spec ::spec/problems
-                  (fn [probs] (map #(dissoc % :in) probs)))
-                spec)))
-          (format "%s\n" cause)))
-
-      :macroexpansion
-      (format "Unexpected error%s macroexpanding %sat (%s).\n%s\n"
-        cause-type
-        (if symbol (str symbol " ") "")
-        loc
-        cause)
-
-      :compile-syntax-check
-      (format "Syntax error%s compiling %sat (%s).\n%s\n"
-        cause-type
-        (if symbol (str symbol " ") "")
-        loc
-        cause)
-
-      :compilation
-      (format "Unexpected error%s compiling %sat (%s).\n%s\n"
-        cause-type
-        (if symbol (str symbol " ") "")
-        loc
-        cause)
-
-      :read-eval-result
-      (format "Error reading eval result%s at %s (%s).\n%s\n" cause-type symbol loc cause)
-
-      :print-eval-result
-      (format "Error printing return value%s at %s (%s).\n%s\n" cause-type symbol loc cause)
-
-      :execution
-      (if spec
-        (format "Execution error - invalid arguments to %s at (%s).\n%s"
-          symbol
-          loc
-          (with-out-str
-            (spec/explain-out
-              (if true #_(= s/*explain-out* s/explain-printer)
-                (update spec ::spec/problems
-                  (fn [probs] (map #(dissoc % :in) probs)))
-                spec))))
-        (format "Execution error%s at %s(%s).\n%s\n"
-          cause-type
-          (if symbol (str symbol " ") "")
-          loc
-          cause)))))
-
-(defn error->str [error]
-  (ex-str (ex-triage (Error->map error))))

docs/js/compiled/out/cljs/repl.js

@@ -1,670 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.repl');
-goog.require('cljs.core');
-goog.require('cljs.spec.alpha');
-goog.require('goog.string');
-goog.require('goog.string.format');
-cljs.repl.print_doc = (function cljs$repl$print_doc(p__30007){
-var map__30008 = p__30007;
-var map__30008__$1 = (((((!((map__30008 == null))))?(((((map__30008.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30008.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30008):map__30008);
-var m = map__30008__$1;
-var n = cljs.core.get.call(null,map__30008__$1,new cljs.core.Keyword(null,"ns","ns",441598760));
-var nm = cljs.core.get.call(null,map__30008__$1,new cljs.core.Keyword(null,"name","name",1843675177));
-cljs.core.println.call(null,"-------------------------");
-
-cljs.core.println.call(null,(function (){var or__4131__auto__ = new cljs.core.Keyword(null,"spec","spec",347520401).cljs$core$IFn$_invoke$arity$1(m);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return [(function (){var temp__5720__auto__ = new cljs.core.Keyword(null,"ns","ns",441598760).cljs$core$IFn$_invoke$arity$1(m);
-if(cljs.core.truth_(temp__5720__auto__)){
-var ns = temp__5720__auto__;
-return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(ns),"/"].join('');
-} else {
-return null;
-}
-})(),cljs.core.str.cljs$core$IFn$_invoke$arity$1(new cljs.core.Keyword(null,"name","name",1843675177).cljs$core$IFn$_invoke$arity$1(m))].join('');
-}
-})());
-
-if(cljs.core.truth_(new cljs.core.Keyword(null,"protocol","protocol",652470118).cljs$core$IFn$_invoke$arity$1(m))){
-cljs.core.println.call(null,"Protocol");
-} else {
-}
-
-if(cljs.core.truth_(new cljs.core.Keyword(null,"forms","forms",2045992350).cljs$core$IFn$_invoke$arity$1(m))){
-var seq__30010_30042 = cljs.core.seq.call(null,new cljs.core.Keyword(null,"forms","forms",2045992350).cljs$core$IFn$_invoke$arity$1(m));
-var chunk__30011_30043 = null;
-var count__30012_30044 = (0);
-var i__30013_30045 = (0);
-while(true){
-if((i__30013_30045 < count__30012_30044)){
-var f_30046 = cljs.core._nth.call(null,chunk__30011_30043,i__30013_30045);
-cljs.core.println.call(null,"  ",f_30046);
-
-
-var G__30047 = seq__30010_30042;
-var G__30048 = chunk__30011_30043;
-var G__30049 = count__30012_30044;
-var G__30050 = (i__30013_30045 + (1));
-seq__30010_30042 = G__30047;
-chunk__30011_30043 = G__30048;
-count__30012_30044 = G__30049;
-i__30013_30045 = G__30050;
-continue;
-} else {
-var temp__5720__auto___30051 = cljs.core.seq.call(null,seq__30010_30042);
-if(temp__5720__auto___30051){
-var seq__30010_30052__$1 = temp__5720__auto___30051;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__30010_30052__$1)){
-var c__4550__auto___30053 = cljs.core.chunk_first.call(null,seq__30010_30052__$1);
-var G__30054 = cljs.core.chunk_rest.call(null,seq__30010_30052__$1);
-var G__30055 = c__4550__auto___30053;
-var G__30056 = cljs.core.count.call(null,c__4550__auto___30053);
-var G__30057 = (0);
-seq__30010_30042 = G__30054;
-chunk__30011_30043 = G__30055;
-count__30012_30044 = G__30056;
-i__30013_30045 = G__30057;
-continue;
-} else {
-var f_30058 = cljs.core.first.call(null,seq__30010_30052__$1);
-cljs.core.println.call(null,"  ",f_30058);
-
-
-var G__30059 = cljs.core.next.call(null,seq__30010_30052__$1);
-var G__30060 = null;
-var G__30061 = (0);
-var G__30062 = (0);
-seq__30010_30042 = G__30059;
-chunk__30011_30043 = G__30060;
-count__30012_30044 = G__30061;
-i__30013_30045 = G__30062;
-continue;
-}
-} else {
-}
-}
-break;
-}
-} else {
-if(cljs.core.truth_(new cljs.core.Keyword(null,"arglists","arglists",1661989754).cljs$core$IFn$_invoke$arity$1(m))){
-var arglists_30063 = new cljs.core.Keyword(null,"arglists","arglists",1661989754).cljs$core$IFn$_invoke$arity$1(m);
-if(cljs.core.truth_((function (){var or__4131__auto__ = new cljs.core.Keyword(null,"macro","macro",-867863404).cljs$core$IFn$_invoke$arity$1(m);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return new cljs.core.Keyword(null,"repl-special-function","repl-special-function",1262603725).cljs$core$IFn$_invoke$arity$1(m);
-}
-})())){
-cljs.core.prn.call(null,arglists_30063);
-} else {
-cljs.core.prn.call(null,((cljs.core._EQ_.call(null,new cljs.core.Symbol(null,"quote","quote",1377916282,null),cljs.core.first.call(null,arglists_30063)))?cljs.core.second.call(null,arglists_30063):arglists_30063));
-}
-} else {
-}
-}
-
-if(cljs.core.truth_(new cljs.core.Keyword(null,"special-form","special-form",-1326536374).cljs$core$IFn$_invoke$arity$1(m))){
-cljs.core.println.call(null,"Special Form");
-
-cljs.core.println.call(null," ",new cljs.core.Keyword(null,"doc","doc",1913296891).cljs$core$IFn$_invoke$arity$1(m));
-
-if(cljs.core.contains_QMARK_.call(null,m,new cljs.core.Keyword(null,"url","url",276297046))){
-if(cljs.core.truth_(new cljs.core.Keyword(null,"url","url",276297046).cljs$core$IFn$_invoke$arity$1(m))){
-return cljs.core.println.call(null,["\n  Please see http://clojure.org/",cljs.core.str.cljs$core$IFn$_invoke$arity$1(new cljs.core.Keyword(null,"url","url",276297046).cljs$core$IFn$_invoke$arity$1(m))].join(''));
-} else {
-return null;
-}
-} else {
-return cljs.core.println.call(null,["\n  Please see http://clojure.org/special_forms#",cljs.core.str.cljs$core$IFn$_invoke$arity$1(new cljs.core.Keyword(null,"name","name",1843675177).cljs$core$IFn$_invoke$arity$1(m))].join(''));
-}
-} else {
-if(cljs.core.truth_(new cljs.core.Keyword(null,"macro","macro",-867863404).cljs$core$IFn$_invoke$arity$1(m))){
-cljs.core.println.call(null,"Macro");
-} else {
-}
-
-if(cljs.core.truth_(new cljs.core.Keyword(null,"spec","spec",347520401).cljs$core$IFn$_invoke$arity$1(m))){
-cljs.core.println.call(null,"Spec");
-} else {
-}
-
-if(cljs.core.truth_(new cljs.core.Keyword(null,"repl-special-function","repl-special-function",1262603725).cljs$core$IFn$_invoke$arity$1(m))){
-cljs.core.println.call(null,"REPL Special Function");
-} else {
-}
-
-cljs.core.println.call(null," ",new cljs.core.Keyword(null,"doc","doc",1913296891).cljs$core$IFn$_invoke$arity$1(m));
-
-if(cljs.core.truth_(new cljs.core.Keyword(null,"protocol","protocol",652470118).cljs$core$IFn$_invoke$arity$1(m))){
-var seq__30014_30064 = cljs.core.seq.call(null,new cljs.core.Keyword(null,"methods","methods",453930866).cljs$core$IFn$_invoke$arity$1(m));
-var chunk__30015_30065 = null;
-var count__30016_30066 = (0);
-var i__30017_30067 = (0);
-while(true){
-if((i__30017_30067 < count__30016_30066)){
-var vec__30028_30068 = cljs.core._nth.call(null,chunk__30015_30065,i__30017_30067);
-var name_30069 = cljs.core.nth.call(null,vec__30028_30068,(0),null);
-var map__30031_30070 = cljs.core.nth.call(null,vec__30028_30068,(1),null);
-var map__30031_30071__$1 = (((((!((map__30031_30070 == null))))?(((((map__30031_30070.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30031_30070.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30031_30070):map__30031_30070);
-var doc_30072 = cljs.core.get.call(null,map__30031_30071__$1,new cljs.core.Keyword(null,"doc","doc",1913296891));
-var arglists_30073 = cljs.core.get.call(null,map__30031_30071__$1,new cljs.core.Keyword(null,"arglists","arglists",1661989754));
-cljs.core.println.call(null);
-
-cljs.core.println.call(null," ",name_30069);
-
-cljs.core.println.call(null," ",arglists_30073);
-
-if(cljs.core.truth_(doc_30072)){
-cljs.core.println.call(null," ",doc_30072);
-} else {
-}
-
-
-var G__30074 = seq__30014_30064;
-var G__30075 = chunk__30015_30065;
-var G__30076 = count__30016_30066;
-var G__30077 = (i__30017_30067 + (1));
-seq__30014_30064 = G__30074;
-chunk__30015_30065 = G__30075;
-count__30016_30066 = G__30076;
-i__30017_30067 = G__30077;
-continue;
-} else {
-var temp__5720__auto___30078 = cljs.core.seq.call(null,seq__30014_30064);
-if(temp__5720__auto___30078){
-var seq__30014_30079__$1 = temp__5720__auto___30078;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__30014_30079__$1)){
-var c__4550__auto___30080 = cljs.core.chunk_first.call(null,seq__30014_30079__$1);
-var G__30081 = cljs.core.chunk_rest.call(null,seq__30014_30079__$1);
-var G__30082 = c__4550__auto___30080;
-var G__30083 = cljs.core.count.call(null,c__4550__auto___30080);
-var G__30084 = (0);
-seq__30014_30064 = G__30081;
-chunk__30015_30065 = G__30082;
-count__30016_30066 = G__30083;
-i__30017_30067 = G__30084;
-continue;
-} else {
-var vec__30033_30085 = cljs.core.first.call(null,seq__30014_30079__$1);
-var name_30086 = cljs.core.nth.call(null,vec__30033_30085,(0),null);
-var map__30036_30087 = cljs.core.nth.call(null,vec__30033_30085,(1),null);
-var map__30036_30088__$1 = (((((!((map__30036_30087 == null))))?(((((map__30036_30087.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30036_30087.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30036_30087):map__30036_30087);
-var doc_30089 = cljs.core.get.call(null,map__30036_30088__$1,new cljs.core.Keyword(null,"doc","doc",1913296891));
-var arglists_30090 = cljs.core.get.call(null,map__30036_30088__$1,new cljs.core.Keyword(null,"arglists","arglists",1661989754));
-cljs.core.println.call(null);
-
-cljs.core.println.call(null," ",name_30086);
-
-cljs.core.println.call(null," ",arglists_30090);
-
-if(cljs.core.truth_(doc_30089)){
-cljs.core.println.call(null," ",doc_30089);
-} else {
-}
-
-
-var G__30091 = cljs.core.next.call(null,seq__30014_30079__$1);
-var G__30092 = null;
-var G__30093 = (0);
-var G__30094 = (0);
-seq__30014_30064 = G__30091;
-chunk__30015_30065 = G__30092;
-count__30016_30066 = G__30093;
-i__30017_30067 = G__30094;
-continue;
-}
-} else {
-}
-}
-break;
-}
-} else {
-}
-
-if(cljs.core.truth_(n)){
-var temp__5720__auto__ = cljs.spec.alpha.get_spec.call(null,cljs.core.symbol.call(null,cljs.core.str.cljs$core$IFn$_invoke$arity$1(cljs.core.ns_name.call(null,n)),cljs.core.name.call(null,nm)));
-if(cljs.core.truth_(temp__5720__auto__)){
-var fnspec = temp__5720__auto__;
-cljs.core.print.call(null,"Spec");
-
-var seq__30038 = cljs.core.seq.call(null,new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Keyword(null,"args","args",1315556576),new cljs.core.Keyword(null,"ret","ret",-468222814),new cljs.core.Keyword(null,"fn","fn",-1175266204)], null));
-var chunk__30039 = null;
-var count__30040 = (0);
-var i__30041 = (0);
-while(true){
-if((i__30041 < count__30040)){
-var role = cljs.core._nth.call(null,chunk__30039,i__30041);
-var temp__5720__auto___30095__$1 = cljs.core.get.call(null,fnspec,role);
-if(cljs.core.truth_(temp__5720__auto___30095__$1)){
-var spec_30096 = temp__5720__auto___30095__$1;
-cljs.core.print.call(null,["\n ",cljs.core.name.call(null,role),":"].join(''),cljs.spec.alpha.describe.call(null,spec_30096));
-} else {
-}
-
-
-var G__30097 = seq__30038;
-var G__30098 = chunk__30039;
-var G__30099 = count__30040;
-var G__30100 = (i__30041 + (1));
-seq__30038 = G__30097;
-chunk__30039 = G__30098;
-count__30040 = G__30099;
-i__30041 = G__30100;
-continue;
-} else {
-var temp__5720__auto____$1 = cljs.core.seq.call(null,seq__30038);
-if(temp__5720__auto____$1){
-var seq__30038__$1 = temp__5720__auto____$1;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__30038__$1)){
-var c__4550__auto__ = cljs.core.chunk_first.call(null,seq__30038__$1);
-var G__30101 = cljs.core.chunk_rest.call(null,seq__30038__$1);
-var G__30102 = c__4550__auto__;
-var G__30103 = cljs.core.count.call(null,c__4550__auto__);
-var G__30104 = (0);
-seq__30038 = G__30101;
-chunk__30039 = G__30102;
-count__30040 = G__30103;
-i__30041 = G__30104;
-continue;
-} else {
-var role = cljs.core.first.call(null,seq__30038__$1);
-var temp__5720__auto___30105__$2 = cljs.core.get.call(null,fnspec,role);
-if(cljs.core.truth_(temp__5720__auto___30105__$2)){
-var spec_30106 = temp__5720__auto___30105__$2;
-cljs.core.print.call(null,["\n ",cljs.core.name.call(null,role),":"].join(''),cljs.spec.alpha.describe.call(null,spec_30106));
-} else {
-}
-
-
-var G__30107 = cljs.core.next.call(null,seq__30038__$1);
-var G__30108 = null;
-var G__30109 = (0);
-var G__30110 = (0);
-seq__30038 = G__30107;
-chunk__30039 = G__30108;
-count__30040 = G__30109;
-i__30041 = G__30110;
-continue;
-}
-} else {
-return null;
-}
-}
-break;
-}
-} else {
-return null;
-}
-} else {
-return null;
-}
-}
-});
-/**
- * Constructs a data representation for a Error with keys:
- *  :cause - root cause message
- *  :phase - error phase
- *  :via - cause chain, with cause keys:
- *           :type - exception class symbol
- *           :message - exception message
- *           :data - ex-data
- *           :at - top stack element
- *  :trace - root cause stack elements
- */
-cljs.repl.Error__GT_map = (function cljs$repl$Error__GT_map(o){
-var base = (function (t){
-return cljs.core.merge.call(null,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"type","type",1174270348),(((t instanceof cljs.core.ExceptionInfo))?new cljs.core.Symbol(null,"ExceptionInfo","ExceptionInfo",294935087,null):(((t instanceof EvalError))?new cljs.core.Symbol("js","EvalError","js/EvalError",1793498501,null):(((t instanceof RangeError))?new cljs.core.Symbol("js","RangeError","js/RangeError",1703848089,null):(((t instanceof ReferenceError))?new cljs.core.Symbol("js","ReferenceError","js/ReferenceError",-198403224,null):(((t instanceof SyntaxError))?new cljs.core.Symbol("js","SyntaxError","js/SyntaxError",-1527651665,null):(((t instanceof URIError))?new cljs.core.Symbol("js","URIError","js/URIError",505061350,null):(((t instanceof Error))?new cljs.core.Symbol("js","Error","js/Error",-1692659266,null):null
-)))))))], null),(function (){var temp__5720__auto__ = cljs.core.ex_message.call(null,t);
-if(cljs.core.truth_(temp__5720__auto__)){
-var msg = temp__5720__auto__;
-return new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"message","message",-406056002),msg], null);
-} else {
-return null;
-}
-})(),(function (){var temp__5720__auto__ = cljs.core.ex_data.call(null,t);
-if(cljs.core.truth_(temp__5720__auto__)){
-var ed = temp__5720__auto__;
-return new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"data","data",-232669377),ed], null);
-} else {
-return null;
-}
-})());
-});
-var via = (function (){var via = cljs.core.PersistentVector.EMPTY;
-var t = o;
-while(true){
-if(cljs.core.truth_(t)){
-var G__30111 = cljs.core.conj.call(null,via,t);
-var G__30112 = cljs.core.ex_cause.call(null,t);
-via = G__30111;
-t = G__30112;
-continue;
-} else {
-return via;
-}
-break;
-}
-})();
-var root = cljs.core.peek.call(null,via);
-return cljs.core.merge.call(null,new cljs.core.PersistentArrayMap(null, 2, [new cljs.core.Keyword(null,"via","via",-1904457336),cljs.core.vec.call(null,cljs.core.map.call(null,base,via)),new cljs.core.Keyword(null,"trace","trace",-1082747415),null], null),(function (){var temp__5720__auto__ = cljs.core.ex_message.call(null,root);
-if(cljs.core.truth_(temp__5720__auto__)){
-var root_msg = temp__5720__auto__;
-return new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"cause","cause",231901252),root_msg], null);
-} else {
-return null;
-}
-})(),(function (){var temp__5720__auto__ = cljs.core.ex_data.call(null,root);
-if(cljs.core.truth_(temp__5720__auto__)){
-var data = temp__5720__auto__;
-return new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"data","data",-232669377),data], null);
-} else {
-return null;
-}
-})(),(function (){var temp__5720__auto__ = new cljs.core.Keyword("clojure.error","phase","clojure.error/phase",275140358).cljs$core$IFn$_invoke$arity$1(cljs.core.ex_data.call(null,o));
-if(cljs.core.truth_(temp__5720__auto__)){
-var phase = temp__5720__auto__;
-return new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"phase","phase",575722892),phase], null);
-} else {
-return null;
-}
-})());
-});
-/**
- * Returns an analysis of the phase, error, cause, and location of an error that occurred
- *   based on Throwable data, as returned by Throwable->map. All attributes other than phase
- *   are optional:
- *  :clojure.error/phase - keyword phase indicator, one of:
- *    :read-source :compile-syntax-check :compilation :macro-syntax-check :macroexpansion
- *    :execution :read-eval-result :print-eval-result
- *  :clojure.error/source - file name (no path)
- *  :clojure.error/line - integer line number
- *  :clojure.error/column - integer column number
- *  :clojure.error/symbol - symbol being expanded/compiled/invoked
- *  :clojure.error/class - cause exception class symbol
- *  :clojure.error/cause - cause exception message
- *  :clojure.error/spec - explain-data for spec error
- */
-cljs.repl.ex_triage = (function cljs$repl$ex_triage(datafied_throwable){
-var map__30115 = datafied_throwable;
-var map__30115__$1 = (((((!((map__30115 == null))))?(((((map__30115.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30115.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30115):map__30115);
-var via = cljs.core.get.call(null,map__30115__$1,new cljs.core.Keyword(null,"via","via",-1904457336));
-var trace = cljs.core.get.call(null,map__30115__$1,new cljs.core.Keyword(null,"trace","trace",-1082747415));
-var phase = cljs.core.get.call(null,map__30115__$1,new cljs.core.Keyword(null,"phase","phase",575722892),new cljs.core.Keyword(null,"execution","execution",253283524));
-var map__30116 = cljs.core.last.call(null,via);
-var map__30116__$1 = (((((!((map__30116 == null))))?(((((map__30116.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30116.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30116):map__30116);
-var type = cljs.core.get.call(null,map__30116__$1,new cljs.core.Keyword(null,"type","type",1174270348));
-var message = cljs.core.get.call(null,map__30116__$1,new cljs.core.Keyword(null,"message","message",-406056002));
-var data = cljs.core.get.call(null,map__30116__$1,new cljs.core.Keyword(null,"data","data",-232669377));
-var map__30117 = data;
-var map__30117__$1 = (((((!((map__30117 == null))))?(((((map__30117.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30117.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30117):map__30117);
-var problems = cljs.core.get.call(null,map__30117__$1,new cljs.core.Keyword("cljs.spec.alpha","problems","cljs.spec.alpha/problems",447400814));
-var fn = cljs.core.get.call(null,map__30117__$1,new cljs.core.Keyword("cljs.spec.alpha","fn","cljs.spec.alpha/fn",408600443));
-var caller = cljs.core.get.call(null,map__30117__$1,new cljs.core.Keyword("cljs.spec.test.alpha","caller","cljs.spec.test.alpha/caller",-398302390));
-var map__30118 = new cljs.core.Keyword(null,"data","data",-232669377).cljs$core$IFn$_invoke$arity$1(cljs.core.first.call(null,via));
-var map__30118__$1 = (((((!((map__30118 == null))))?(((((map__30118.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30118.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30118):map__30118);
-var top_data = map__30118__$1;
-var source = cljs.core.get.call(null,map__30118__$1,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397));
-return cljs.core.assoc.call(null,(function (){var G__30123 = phase;
-var G__30123__$1 = (((G__30123 instanceof cljs.core.Keyword))?G__30123.fqn:null);
-switch (G__30123__$1) {
-case "read-source":
-var map__30124 = data;
-var map__30124__$1 = (((((!((map__30124 == null))))?(((((map__30124.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30124.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30124):map__30124);
-var line = cljs.core.get.call(null,map__30124__$1,new cljs.core.Keyword("clojure.error","line","clojure.error/line",-1816287471));
-var column = cljs.core.get.call(null,map__30124__$1,new cljs.core.Keyword("clojure.error","column","clojure.error/column",304721553));
-var G__30126 = cljs.core.merge.call(null,new cljs.core.Keyword(null,"data","data",-232669377).cljs$core$IFn$_invoke$arity$1(cljs.core.second.call(null,via)),top_data);
-var G__30126__$1 = (cljs.core.truth_(source)?cljs.core.assoc.call(null,G__30126,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397),source):G__30126);
-var G__30126__$2 = (cljs.core.truth_(new cljs.core.PersistentHashSet(null, new cljs.core.PersistentArrayMap(null, 2, ["NO_SOURCE_PATH",null,"NO_SOURCE_FILE",null], null), null).call(null,source))?cljs.core.dissoc.call(null,G__30126__$1,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397)):G__30126__$1);
-if(cljs.core.truth_(message)){
-return cljs.core.assoc.call(null,G__30126__$2,new cljs.core.Keyword("clojure.error","cause","clojure.error/cause",-1879175742),message);
-} else {
-return G__30126__$2;
-}
-
-break;
-case "compile-syntax-check":
-case "compilation":
-case "macro-syntax-check":
-case "macroexpansion":
-var G__30127 = top_data;
-var G__30127__$1 = (cljs.core.truth_(source)?cljs.core.assoc.call(null,G__30127,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397),source):G__30127);
-var G__30127__$2 = (cljs.core.truth_(new cljs.core.PersistentHashSet(null, new cljs.core.PersistentArrayMap(null, 2, ["NO_SOURCE_PATH",null,"NO_SOURCE_FILE",null], null), null).call(null,source))?cljs.core.dissoc.call(null,G__30127__$1,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397)):G__30127__$1);
-var G__30127__$3 = (cljs.core.truth_(type)?cljs.core.assoc.call(null,G__30127__$2,new cljs.core.Keyword("clojure.error","class","clojure.error/class",278435890),type):G__30127__$2);
-var G__30127__$4 = (cljs.core.truth_(message)?cljs.core.assoc.call(null,G__30127__$3,new cljs.core.Keyword("clojure.error","cause","clojure.error/cause",-1879175742),message):G__30127__$3);
-if(cljs.core.truth_(problems)){
-return cljs.core.assoc.call(null,G__30127__$4,new cljs.core.Keyword("clojure.error","spec","clojure.error/spec",2055032595),data);
-} else {
-return G__30127__$4;
-}
-
-break;
-case "read-eval-result":
-case "print-eval-result":
-var vec__30128 = cljs.core.first.call(null,trace);
-var source__$1 = cljs.core.nth.call(null,vec__30128,(0),null);
-var method = cljs.core.nth.call(null,vec__30128,(1),null);
-var file = cljs.core.nth.call(null,vec__30128,(2),null);
-var line = cljs.core.nth.call(null,vec__30128,(3),null);
-var G__30131 = top_data;
-var G__30131__$1 = (cljs.core.truth_(line)?cljs.core.assoc.call(null,G__30131,new cljs.core.Keyword("clojure.error","line","clojure.error/line",-1816287471),line):G__30131);
-var G__30131__$2 = (cljs.core.truth_(file)?cljs.core.assoc.call(null,G__30131__$1,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397),file):G__30131__$1);
-var G__30131__$3 = (cljs.core.truth_((function (){var and__4120__auto__ = source__$1;
-if(cljs.core.truth_(and__4120__auto__)){
-return method;
-} else {
-return and__4120__auto__;
-}
-})())?cljs.core.assoc.call(null,G__30131__$2,new cljs.core.Keyword("clojure.error","symbol","clojure.error/symbol",1544821994),(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[source__$1,method],null))):G__30131__$2);
-var G__30131__$4 = (cljs.core.truth_(type)?cljs.core.assoc.call(null,G__30131__$3,new cljs.core.Keyword("clojure.error","class","clojure.error/class",278435890),type):G__30131__$3);
-if(cljs.core.truth_(message)){
-return cljs.core.assoc.call(null,G__30131__$4,new cljs.core.Keyword("clojure.error","cause","clojure.error/cause",-1879175742),message);
-} else {
-return G__30131__$4;
-}
-
-break;
-case "execution":
-var vec__30132 = cljs.core.first.call(null,trace);
-var source__$1 = cljs.core.nth.call(null,vec__30132,(0),null);
-var method = cljs.core.nth.call(null,vec__30132,(1),null);
-var file = cljs.core.nth.call(null,vec__30132,(2),null);
-var line = cljs.core.nth.call(null,vec__30132,(3),null);
-var file__$1 = cljs.core.first.call(null,cljs.core.remove.call(null,((function (vec__30132,source__$1,method,file,line,G__30123,G__30123__$1,map__30115,map__30115__$1,via,trace,phase,map__30116,map__30116__$1,type,message,data,map__30117,map__30117__$1,problems,fn,caller,map__30118,map__30118__$1,top_data,source){
-return (function (p1__30114_SHARP_){
-var or__4131__auto__ = (p1__30114_SHARP_ == null);
-if(or__4131__auto__){
-return or__4131__auto__;
-} else {
-return new cljs.core.PersistentHashSet(null, new cljs.core.PersistentArrayMap(null, 2, ["NO_SOURCE_PATH",null,"NO_SOURCE_FILE",null], null), null).call(null,p1__30114_SHARP_);
-}
-});})(vec__30132,source__$1,method,file,line,G__30123,G__30123__$1,map__30115,map__30115__$1,via,trace,phase,map__30116,map__30116__$1,type,message,data,map__30117,map__30117__$1,problems,fn,caller,map__30118,map__30118__$1,top_data,source))
-,new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Keyword(null,"file","file",-1269645878).cljs$core$IFn$_invoke$arity$1(caller),file], null)));
-var err_line = (function (){var or__4131__auto__ = new cljs.core.Keyword(null,"line","line",212345235).cljs$core$IFn$_invoke$arity$1(caller);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return line;
-}
-})();
-var G__30135 = new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword("clojure.error","class","clojure.error/class",278435890),type], null);
-var G__30135__$1 = (cljs.core.truth_(err_line)?cljs.core.assoc.call(null,G__30135,new cljs.core.Keyword("clojure.error","line","clojure.error/line",-1816287471),err_line):G__30135);
-var G__30135__$2 = (cljs.core.truth_(message)?cljs.core.assoc.call(null,G__30135__$1,new cljs.core.Keyword("clojure.error","cause","clojure.error/cause",-1879175742),message):G__30135__$1);
-var G__30135__$3 = (cljs.core.truth_((function (){var or__4131__auto__ = fn;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-var and__4120__auto__ = source__$1;
-if(cljs.core.truth_(and__4120__auto__)){
-return method;
-} else {
-return and__4120__auto__;
-}
-}
-})())?cljs.core.assoc.call(null,G__30135__$2,new cljs.core.Keyword("clojure.error","symbol","clojure.error/symbol",1544821994),(function (){var or__4131__auto__ = fn;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[source__$1,method],null));
-}
-})()):G__30135__$2);
-var G__30135__$4 = (cljs.core.truth_(file__$1)?cljs.core.assoc.call(null,G__30135__$3,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397),file__$1):G__30135__$3);
-if(cljs.core.truth_(problems)){
-return cljs.core.assoc.call(null,G__30135__$4,new cljs.core.Keyword("clojure.error","spec","clojure.error/spec",2055032595),data);
-} else {
-return G__30135__$4;
-}
-
-break;
-default:
-throw (new Error(["No matching clause: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(G__30123__$1)].join('')));
-
-}
-})(),new cljs.core.Keyword("clojure.error","phase","clojure.error/phase",275140358),phase);
-});
-/**
- * Returns a string from exception data, as produced by ex-triage.
- *   The first line summarizes the exception phase and location.
- *   The subsequent lines describe the cause.
- */
-cljs.repl.ex_str = (function cljs$repl$ex_str(p__30139){
-var map__30140 = p__30139;
-var map__30140__$1 = (((((!((map__30140 == null))))?(((((map__30140.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__30140.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__30140):map__30140);
-var triage_data = map__30140__$1;
-var phase = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","phase","clojure.error/phase",275140358));
-var source = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","source","clojure.error/source",-2011936397));
-var line = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","line","clojure.error/line",-1816287471));
-var column = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","column","clojure.error/column",304721553));
-var symbol = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","symbol","clojure.error/symbol",1544821994));
-var class$ = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","class","clojure.error/class",278435890));
-var cause = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","cause","clojure.error/cause",-1879175742));
-var spec = cljs.core.get.call(null,map__30140__$1,new cljs.core.Keyword("clojure.error","spec","clojure.error/spec",2055032595));
-var loc = [cljs.core.str.cljs$core$IFn$_invoke$arity$1((function (){var or__4131__auto__ = source;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return "<cljs repl>";
-}
-})()),":",cljs.core.str.cljs$core$IFn$_invoke$arity$1((function (){var or__4131__auto__ = line;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return (1);
-}
-})()),(cljs.core.truth_(column)?[":",cljs.core.str.cljs$core$IFn$_invoke$arity$1(column)].join(''):"")].join('');
-var class_name = cljs.core.name.call(null,(function (){var or__4131__auto__ = class$;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return "";
-}
-})());
-var simple_class = class_name;
-var cause_type = ((cljs.core.contains_QMARK_.call(null,new cljs.core.PersistentHashSet(null, new cljs.core.PersistentArrayMap(null, 2, ["RuntimeException",null,"Exception",null], null), null),simple_class))?"":[" (",simple_class,")"].join(''));
-var format = goog.string.format;
-var G__30142 = phase;
-var G__30142__$1 = (((G__30142 instanceof cljs.core.Keyword))?G__30142.fqn:null);
-switch (G__30142__$1) {
-case "read-source":
-return format.call(null,"Syntax error reading source at (%s).\n%s\n",loc,cause);
-
-break;
-case "macro-syntax-check":
-return format.call(null,"Syntax error macroexpanding %sat (%s).\n%s",(cljs.core.truth_(symbol)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(symbol)," "].join(''):""),loc,(cljs.core.truth_(spec)?(function (){var sb__4661__auto__ = (new goog.string.StringBuffer());
-var _STAR_print_newline_STAR__orig_val__30143_30152 = cljs.core._STAR_print_newline_STAR_;
-var _STAR_print_fn_STAR__orig_val__30144_30153 = cljs.core._STAR_print_fn_STAR_;
-var _STAR_print_newline_STAR__temp_val__30145_30154 = true;
-var _STAR_print_fn_STAR__temp_val__30146_30155 = ((function (_STAR_print_newline_STAR__orig_val__30143_30152,_STAR_print_fn_STAR__orig_val__30144_30153,_STAR_print_newline_STAR__temp_val__30145_30154,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec){
-return (function (x__4662__auto__){
-return sb__4661__auto__.append(x__4662__auto__);
-});})(_STAR_print_newline_STAR__orig_val__30143_30152,_STAR_print_fn_STAR__orig_val__30144_30153,_STAR_print_newline_STAR__temp_val__30145_30154,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec))
-;
-cljs.core._STAR_print_newline_STAR_ = _STAR_print_newline_STAR__temp_val__30145_30154;
-
-cljs.core._STAR_print_fn_STAR_ = _STAR_print_fn_STAR__temp_val__30146_30155;
-
-try{cljs.spec.alpha.explain_out.call(null,cljs.core.update.call(null,spec,new cljs.core.Keyword("cljs.spec.alpha","problems","cljs.spec.alpha/problems",447400814),((function (_STAR_print_newline_STAR__orig_val__30143_30152,_STAR_print_fn_STAR__orig_val__30144_30153,_STAR_print_newline_STAR__temp_val__30145_30154,_STAR_print_fn_STAR__temp_val__30146_30155,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec){
-return (function (probs){
-return cljs.core.map.call(null,((function (_STAR_print_newline_STAR__orig_val__30143_30152,_STAR_print_fn_STAR__orig_val__30144_30153,_STAR_print_newline_STAR__temp_val__30145_30154,_STAR_print_fn_STAR__temp_val__30146_30155,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec){
-return (function (p1__30137_SHARP_){
-return cljs.core.dissoc.call(null,p1__30137_SHARP_,new cljs.core.Keyword(null,"in","in",-1531184865));
-});})(_STAR_print_newline_STAR__orig_val__30143_30152,_STAR_print_fn_STAR__orig_val__30144_30153,_STAR_print_newline_STAR__temp_val__30145_30154,_STAR_print_fn_STAR__temp_val__30146_30155,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec))
-,probs);
-});})(_STAR_print_newline_STAR__orig_val__30143_30152,_STAR_print_fn_STAR__orig_val__30144_30153,_STAR_print_newline_STAR__temp_val__30145_30154,_STAR_print_fn_STAR__temp_val__30146_30155,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec))
-)
-);
-}finally {cljs.core._STAR_print_fn_STAR_ = _STAR_print_fn_STAR__orig_val__30144_30153;
-
-cljs.core._STAR_print_newline_STAR_ = _STAR_print_newline_STAR__orig_val__30143_30152;
-}
-return cljs.core.str.cljs$core$IFn$_invoke$arity$1(sb__4661__auto__);
-})():format.call(null,"%s\n",cause)));
-
-break;
-case "macroexpansion":
-return format.call(null,"Unexpected error%s macroexpanding %sat (%s).\n%s\n",cause_type,(cljs.core.truth_(symbol)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(symbol)," "].join(''):""),loc,cause);
-
-break;
-case "compile-syntax-check":
-return format.call(null,"Syntax error%s compiling %sat (%s).\n%s\n",cause_type,(cljs.core.truth_(symbol)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(symbol)," "].join(''):""),loc,cause);
-
-break;
-case "compilation":
-return format.call(null,"Unexpected error%s compiling %sat (%s).\n%s\n",cause_type,(cljs.core.truth_(symbol)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(symbol)," "].join(''):""),loc,cause);
-
-break;
-case "read-eval-result":
-return format.call(null,"Error reading eval result%s at %s (%s).\n%s\n",cause_type,symbol,loc,cause);
-
-break;
-case "print-eval-result":
-return format.call(null,"Error printing return value%s at %s (%s).\n%s\n",cause_type,symbol,loc,cause);
-
-break;
-case "execution":
-if(cljs.core.truth_(spec)){
-return format.call(null,"Execution error - invalid arguments to %s at (%s).\n%s",symbol,loc,(function (){var sb__4661__auto__ = (new goog.string.StringBuffer());
-var _STAR_print_newline_STAR__orig_val__30147_30156 = cljs.core._STAR_print_newline_STAR_;
-var _STAR_print_fn_STAR__orig_val__30148_30157 = cljs.core._STAR_print_fn_STAR_;
-var _STAR_print_newline_STAR__temp_val__30149_30158 = true;
-var _STAR_print_fn_STAR__temp_val__30150_30159 = ((function (_STAR_print_newline_STAR__orig_val__30147_30156,_STAR_print_fn_STAR__orig_val__30148_30157,_STAR_print_newline_STAR__temp_val__30149_30158,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec){
-return (function (x__4662__auto__){
-return sb__4661__auto__.append(x__4662__auto__);
-});})(_STAR_print_newline_STAR__orig_val__30147_30156,_STAR_print_fn_STAR__orig_val__30148_30157,_STAR_print_newline_STAR__temp_val__30149_30158,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec))
-;
-cljs.core._STAR_print_newline_STAR_ = _STAR_print_newline_STAR__temp_val__30149_30158;
-
-cljs.core._STAR_print_fn_STAR_ = _STAR_print_fn_STAR__temp_val__30150_30159;
-
-try{cljs.spec.alpha.explain_out.call(null,cljs.core.update.call(null,spec,new cljs.core.Keyword("cljs.spec.alpha","problems","cljs.spec.alpha/problems",447400814),((function (_STAR_print_newline_STAR__orig_val__30147_30156,_STAR_print_fn_STAR__orig_val__30148_30157,_STAR_print_newline_STAR__temp_val__30149_30158,_STAR_print_fn_STAR__temp_val__30150_30159,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec){
-return (function (probs){
-return cljs.core.map.call(null,((function (_STAR_print_newline_STAR__orig_val__30147_30156,_STAR_print_fn_STAR__orig_val__30148_30157,_STAR_print_newline_STAR__temp_val__30149_30158,_STAR_print_fn_STAR__temp_val__30150_30159,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec){
-return (function (p1__30138_SHARP_){
-return cljs.core.dissoc.call(null,p1__30138_SHARP_,new cljs.core.Keyword(null,"in","in",-1531184865));
-});})(_STAR_print_newline_STAR__orig_val__30147_30156,_STAR_print_fn_STAR__orig_val__30148_30157,_STAR_print_newline_STAR__temp_val__30149_30158,_STAR_print_fn_STAR__temp_val__30150_30159,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec))
-,probs);
-});})(_STAR_print_newline_STAR__orig_val__30147_30156,_STAR_print_fn_STAR__orig_val__30148_30157,_STAR_print_newline_STAR__temp_val__30149_30158,_STAR_print_fn_STAR__temp_val__30150_30159,sb__4661__auto__,G__30142,G__30142__$1,loc,class_name,simple_class,cause_type,format,map__30140,map__30140__$1,triage_data,phase,source,line,column,symbol,class$,cause,spec))
-)
-);
-}finally {cljs.core._STAR_print_fn_STAR_ = _STAR_print_fn_STAR__orig_val__30148_30157;
-
-cljs.core._STAR_print_newline_STAR_ = _STAR_print_newline_STAR__orig_val__30147_30156;
-}
-return cljs.core.str.cljs$core$IFn$_invoke$arity$1(sb__4661__auto__);
-})());
-} else {
-return format.call(null,"Execution error%s at %s(%s).\n%s\n",cause_type,(cljs.core.truth_(symbol)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(symbol)," "].join(''):""),loc,cause);
-}
-
-break;
-default:
-throw (new Error(["No matching clause: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(G__30142__$1)].join('')));
-
-}
-});
-cljs.repl.error__GT_str = (function cljs$repl$error__GT_str(error){
-return cljs.repl.ex_str.call(null,cljs.repl.ex_triage.call(null,cljs.repl.Error__GT_map.call(null,error)));
-});
-
-//# sourceMappingURL=repl.js.map?rel=1582560151693

docs/js/compiled/out/cljs/spec/gen/alpha.cljs

@@ -1,183 +0,0 @@
-;   Copyright (c) Rich Hickey. All rights reserved.
-;   The use and distribution terms for this software are covered by the
-;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;   which can be found in the file epl-v10.html at the root of this distribution.
-;   By using this software in any fashion, you are agreeing to be bound by
-;   the terms of this license.
-;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.spec.gen.alpha
-  (:refer-clojure :exclude [boolean cat hash-map list map not-empty set vector
-                            char double int keyword symbol string uuid delay shuffle])
-  (:require-macros [cljs.core :as c]
-                   [cljs.spec.gen.alpha :as gen :refer [dynaload lazy-combinators lazy-prims]])
-  (:require [cljs.core :as c])
-  (:import (goog Uri)))
-
-(deftype LazyVar [f ^:mutable cached]
-  IDeref
-  (-deref [this]
-    (if-not (nil? cached)
-      cached
-      (let [x (f)]
-        (when-not (nil? x)
-          (set! cached x))
-        x))))
-
-(def ^:private quick-check-ref
-  (dynaload 'clojure.test.check/quick-check))
-
-(defn quick-check
-  [& args]
-  (apply @quick-check-ref args))
-
-(def ^:private for-all*-ref
-  (dynaload 'clojure.test.check.properties/for-all*))
-
-(defn for-all*
-  "Dynamically loaded clojure.test.check.properties/for-all*."
-  [& args]
-  (apply @for-all*-ref args))
-
-(let [g? (dynaload 'clojure.test.check.generators/generator?)
-      g (dynaload 'clojure.test.check.generators/generate)
-      mkg (dynaload 'clojure.test.check.generators/->Generator)]
-  (defn- generator?
-    [x]
-    (@g? x))
-  (defn- generator
-    [gfn]
-    (@mkg gfn))
-  (defn generate
-    "Generate a single value using generator."
-    [generator]
-    (@g generator)))
-
-(defn ^:skip-wiki delay-impl
-  [gfnd]
-  ;;N.B. depends on test.check impl details
-  (generator (fn [rnd size]
-               ((:gen @gfnd) rnd size))))
-
-;(defn gen-for-name
-;  "Dynamically loads test.check generator named s."
-;  [s]
-;  (let [g (dynaload s)]
-;    (if (generator? g)
-;      g
-;      (throw (js/Error. (str "Var " s " is not a generator"))))))
-
-(lazy-combinators hash-map list map not-empty set vector vector-distinct fmap elements
-  bind choose one-of such-that tuple sample return
-  large-integer* double* frequency shuffle)
-
-(lazy-prims any any-printable boolean char char-alpha char-alphanumeric char-ascii double
-  int keyword keyword-ns large-integer ratio simple-type simple-type-printable
-  string string-ascii string-alphanumeric symbol symbol-ns uuid)
-
-(defn cat
-  "Returns a generator of a sequence catenated from results of
-gens, each of which should generate something sequential."
-  [& gens]
-  (fmap #(apply concat %)
-    (apply tuple gens)))
-
-(defn- ^boolean qualified? [ident] (not (nil? (namespace ident))))
-
-(def ^:private
-gen-builtins
-  (c/delay
-    (let [simple (simple-type-printable)]
-      {any? (one-of [(return nil) (any-printable)])
-       some? (such-that some? (any-printable))
-       number? (one-of [(large-integer) (double)])
-       integer? (large-integer)
-       int? (large-integer)
-       pos-int? (large-integer* {:min 1})
-       neg-int? (large-integer* {:max -1})
-       nat-int? (large-integer* {:min 0})
-       float? (double)
-       double? (double)
-       string? (string-alphanumeric)
-       ident? (one-of [(keyword-ns) (symbol-ns)])
-       simple-ident? (one-of [(keyword) (symbol)])
-       qualified-ident? (such-that qualified? (one-of [(keyword-ns) (symbol-ns)]))
-       keyword? (keyword-ns)
-       simple-keyword? (keyword)
-       qualified-keyword? (such-that qualified? (keyword-ns))
-       symbol? (symbol-ns)
-       simple-symbol? (symbol)
-       qualified-symbol? (such-that qualified? (symbol-ns))
-       uuid? (uuid)
-       uri? (fmap #(Uri. (str "http://" % ".com")) (uuid))
-       inst? (fmap #(js/Date. %)
-                    (large-integer))
-       seqable? (one-of [(return nil)
-                         (list simple)
-                         (vector simple)
-                         (map simple simple)
-                         (set simple)
-                         (string-alphanumeric)])
-       indexed? (vector simple)
-       map? (map simple simple)
-       vector? (vector simple)
-       list? (list simple)
-       seq? (list simple)
-       char? (char)
-       set? (set simple)
-       nil? (return nil)
-       false? (return false)
-       true? (return true)
-       boolean? (boolean)
-       zero? (return 0)
-       ;rational? (one-of [(large-integer) (ratio)])
-       coll? (one-of [(map simple simple)
-                      (list simple)
-                      (vector simple)
-                      (set simple)])
-       empty? (elements [nil '() [] {} #{}])
-       associative? (one-of [(map simple simple) (vector simple)])
-       sequential? (one-of [(list simple) (vector simple)])
-       ;ratio? (such-that ratio? (ratio))
-       })))
-
-(defn gen-for-pred
-  "Given a predicate, returns a built-in generator if one exists."
-  [pred]
-  (if (set? pred)
-    (elements pred)
-    (get @gen-builtins pred)))
-
-(comment
-  (require 'clojure.test.check)
-  (require 'clojure.test.check.properties)
-  (require 'cljs.spec.gen)
-  (in-ns 'cljs.spec.gen)
-
-  ;; combinators, see call to lazy-combinators above for complete list
-  (generate (one-of [(gen-for-pred integer?) (gen-for-pred string?)]))
-  (generate (such-that #(< 10000 %) (gen-for-pred integer?)))
-  (let [reqs {:a (gen-for-pred number?)
-              :b (gen-for-pred keyword?)}
-        opts {:c (gen-for-pred string?)}]
-    (generate (bind (choose 0 (count opts))
-                #(let [args (concat (seq reqs) (c/shuffle (seq opts)))]
-                  (->> args
-                    (take (+ % (count reqs)))
-                    (mapcat identity)
-                    (apply hash-map))))))
-  (generate (cat (list (gen-for-pred string?))
-              (list (gen-for-pred integer?))))
-
-  ;; load your own generator
-  ;(gen-for-name 'clojure.test.check.generators/int)
-
-  ;; failure modes
-  ;(gen-for-name 'unqualified)
-  ;(gen-for-name 'clojure.core/+)
-  ;(gen-for-name 'clojure.core/name-does-not-exist)
-  ;(gen-for-name 'ns.does.not.exist/f)
-
-  )
-
-

docs/js/compiled/out/cljs/stacktrace.cljc

@@ -1,716 +0,0 @@
-;; Copyright (c) Rich Hickey. All rights reserved.
-;; The use and distribution terms for this software are covered by the
-;; Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;; which can be found in the file epl-v10.html at the root of this distribution.
-;; By using this software in any fashion, you are agreeing to be bound by
-;; the terms of this license.
-;; You must not remove this notice, or any other, from this software.
-
-(ns cljs.stacktrace
-  (:require #?@(:clj  [[cljs.util :as util]
-                       [clojure.java.io :as io]]
-                :cljs [[goog.string :as gstring]])
-            [clojure.string :as string])
-  #?(:clj (:import [java.util.regex Pattern]
-                   [java.io File])))
-
-(defmulti parse-stacktrace
-  "Parse a JavaScript stacktrace string into a canonical data form. The
-  arguments:
-
-  repl-env - the repl environment, an optional map with :host and :port keys
-             if the stacktrace includes url, not file references
-  st       - the original stacktrace string to parse
-  err      - an error map. :ua-product key defines the type of stacktrace parser
-             to use, for example :chrome
-  opts     - additional options. :output-dir maybe given in this argument if
-             :host and :port do not apply, for example, a file path
-
-  The canonical stacktrace representation can easily be mapped to a
-  ClojureScript one see mapped-stacktrace and mapped-stacktrace-str"
-  (fn [repl-env st err opts] (:ua-product err)))
-
-(defn parse-int [s]
-  #?(:clj  (Long/parseLong s)
-     :cljs (js/parseInt s 10)))
-
-(defn starts-with?
-  #?(:cljs {:tag boolean})
-  [^String s0 s1]
-  #?(:clj  (.startsWith s0 s1)
-     :cljs (gstring/startsWith s0 s1)))
-
-(defn ends-with?
-  #?(:cljs {:tag boolean})
-  [^String s0 s1]
-  #?(:clj  (.endsWith s0 s1)
-     :cljs (gstring/endsWith s0 s1)))
-
-(defn string->regex [s]
-  #?(:clj  (Pattern/compile s)
-     :cljs (js/RegExp. s)))
-
-(defn output-directory [opts]
-  #?(:clj  (util/output-directory opts)
-     :cljs (or (:output-dir opts) "out")))
-
-(defmethod parse-stacktrace :default
-  [repl-env st err opts] st)
-
-(defn parse-file-line-column [flc]
-  (if-not (re-find #":" flc)
-    [flc nil nil]
-    (let [xs (string/split flc #":")
-          [pre [line column]]
-          (reduce
-            (fn [[pre post] [x i]]
-              (if (<= i 2)
-                [pre (conj post x)]
-                [(conj pre x) post]))
-            [[] []] (map vector xs (range (count xs) 0 -1)))
-          file (string/join ":" pre)]
-      [(cond-> file
-         (starts-with? file "(") (string/replace "(" ""))
-       (parse-int
-         (cond-> line
-           (ends-with? line ")") (string/replace ")" "")))
-       (parse-int
-         (cond-> column
-           (ends-with? column ")") (string/replace ")" "")))])))
-
-(defn parse-file
-  "Given a browser file url convert it into a relative path that can be used
-   to locate the original source."
-  [{:keys [host host-port port] :as repl-env} file {:keys [asset-path] :as opts}]
-  (let [urlpat (if host
-                 (string->regex
-                   (str "http://" host ":" (or host-port port) "/"))
-                 "")
-        match  (if host
-                 (re-find urlpat file)
-                 (contains? opts :output-dir))]
-    (if match
-      (-> file
-        (string/replace urlpat "")
-        (string/replace
-          (string->regex
-            ;; if :asset-path specified drop leading slash
-            (str "^" (or (and asset-path (string/replace asset-path #"^/" ""))
-                         (output-directory opts)) "/"))
-          ""))
-      (if-let [asset-root (:asset-root opts)]
-        (string/replace file asset-root "")
-        (throw
-          (ex-info (str "Could not relativize URL " file)
-            {:type :parse-stacktrace
-             :reason :relativize-url}))))))
-
-;; -----------------------------------------------------------------------------
-;; Chrome Stacktrace
-
-(defn chrome-st-el->frame
-  [repl-env st-el opts]
-  (let [xs (-> st-el
-             (string/replace #"\s+at\s+" "")
-             (string/split #"\s+"))
-        [function flc] (if (== 1 (count xs))
-                         [nil (first xs)]
-                         [(first xs) (last xs)])
-        [file line column] (parse-file-line-column flc)]
-    (if (and file function line column)
-      {:file (parse-file repl-env file opts)
-       :function (string/replace function #"Object\." "")
-       :line line
-       :column column}
-      (when-not (string/blank? function)
-        {:file nil
-         :function (string/replace function #"Object\." "")
-         :line nil
-         :column nil}))))
-
-(comment
-  (chrome-st-el->frame {:host "localhost" :port 9000}
-    "\tat cljs$core$ffirst (http://localhost:9000/out/cljs/core.js:5356:34)" {})
-  )
-
-(defmethod parse-stacktrace :chrome
-  [repl-env st err opts]
-  (->> st
-    string/split-lines
-    (drop-while #(starts-with? % "Error"))
-    (take-while #(not (starts-with? % "    at eval")))
-    (map #(chrome-st-el->frame repl-env % opts))
-    (remove nil?)
-    vec))
-
-(comment
-  (parse-stacktrace {:host "localhost" :port 9000}
-    "Error: 1 is not ISeqable
-    at Object.cljs$core$seq [as seq] (http://localhost:9000/out/cljs/core.js:4258:8)
-    at Object.cljs$core$first [as first] (http://localhost:9000/out/cljs/core.js:4288:19)
-    at cljs$core$ffirst (http://localhost:9000/out/cljs/core.js:5356:34)
-    at http://localhost:9000/out/cljs/core.js:16971:89
-    at cljs.core.map.cljs$core$map__2 (http://localhost:9000/out/cljs/core.js:16972:3)
-    at http://localhost:9000/out/cljs/core.js:10981:129
-    at cljs.core.LazySeq.sval (http://localhost:9000/out/cljs/core.js:10982:3)
-    at cljs.core.LazySeq.cljs$core$ISeqable$_seq$arity$1 (http://localhost:9000/out/cljs/core.js:11073:10)
-    at Object.cljs$core$seq [as seq] (http://localhost:9000/out/cljs/core.js:4239:13)
-    at Object.cljs$core$pr_sequential_writer [as pr_sequential_writer] (http://localhost:9000/out/cljs/core.js:28706:14)"
-    {:ua-product :chrome}
-    nil)
-
-  (parse-stacktrace {:host "localhost" :port 9000}
-    "Error: 1 is not ISeqable
-    at Object.cljs$core$seq [as seq] (http://localhost:9000/js/cljs/core.js:4258:8)
-    at Object.cljs$core$first [as first] (http://localhost:9000/js/cljs/core.js:4288:19)
-    at cljs$core$ffirst (http://localhost:9000/js/cljs/core.js:5356:34)
-    at http://localhost:9000/js/cljs/core.js:16971:89
-    at cljs.core.map.cljs$core$map__2 (http://localhost:9000/js/cljs/core.js:16972:3)
-    at http://localhost:9000/js/cljs/core.js:10981:129
-    at cljs.core.LazySeq.sval (http://localhost:9000/js/cljs/core.js:10982:3)
-    at cljs.core.LazySeq.cljs$core$ISeqable$_seq$arity$1 (http://localhost:9000/js/cljs/core.js:11073:10)
-    at Object.cljs$core$seq [as seq] (http://localhost:9000/js/cljs/core.js:4239:13)
-    at Object.cljs$core$pr_sequential_writer [as pr_sequential_writer] (http://localhost:9000/js/cljs/core.js:28706:14)"
-    {:ua-product :chrome}
-    {:asset-path "/js"})
-
-  (parse-stacktrace {:host "localhost" :port 9000}
-    "Error: 1 is not ISeqable
-    at Object.cljs$core$seq [as seq] (http://localhost:9000/out/cljs/core.js:4259:8)
-    at Object.cljs$core$first [as first] (http://localhost:9000/out/cljs/core.js:4289:19)
-    at cljs$core$ffirst (http://localhost:9000/out/cljs/core.js:5357:18)
-    at eval (eval at <anonymous> (http://localhost:9000/out/clojure/browser/repl.js:23:272), <anonymous>:1:106)
-    at eval (eval at <anonymous> (http://localhost:9000/out/clojure/browser/repl.js:23:272), <anonymous>:9:3)
-    at eval (eval at <anonymous> (http://localhost:9000/out/clojure/browser/repl.js:23:272), <anonymous>:14:4)
-    at http://localhost:9000/out/clojure/browser/repl.js:23:267
-    at clojure$browser$repl$evaluate_javascript (http://localhost:9000/out/clojure/browser/repl.js:26:4)
-    at Object.callback (http://localhost:9000/out/clojure/browser/repl.js:121:169)
-    at goog.messaging.AbstractChannel.deliver (http://localhost:9000/out/goog/messaging/abstractchannel.js:142:13)"
-    {:ua-product :chrome}
-    nil)
-
-  ;; Node.js example
-  (parse-stacktrace {}
-    "Error: 1 is not ISeqable
-    at Object.cljs$core$seq [as seq] (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:3999:8)
-    at Object.cljs$core$first [as first] (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:4018:19)
-    at cljs$core$ffirst (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:5161:34)
-    at /home/my/cool/project/.cljs_bootstrap/cljs/core.js:16006:88
-    at cljs.core.map.cljs$core$IFn$_invoke$arity$2 (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:16007:3)
-    at cljs.core.LazySeq.sval (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:10244:109)
-    at cljs.core.LazySeq.cljs$core$ISeqable$_seq$arity$1 (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:10335:10)
-    at Object.cljs$core$seq [as seq] (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:3980:13)
-    at Object.cljs$core$pr_sequential_writer [as pr_sequential_writer] (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:28084:14)
-    at cljs.core.LazySeq.cljs$core$IPrintWithWriter$_pr_writer$arity$3 (/home/my/cool/project/.cljs_bootstrap/cljs/core.js:28812:18)"
-    {:ua-product :chrome}
-    {:output-dir "/home/my/cool/project/.cljs_bootstrap"})
-  )
-
-;; -----------------------------------------------------------------------------
-;; Safari Stacktrace
-
-(defn safari-st-el->frame
-  [repl-env st-el opts]
-  (let [[function flc] (if (re-find #"@" st-el)
-                         (string/split st-el #"@")
-                         [nil st-el])
-        [file line column] (parse-file-line-column flc)]
-    (if (and file function line column)
-      {:file (parse-file repl-env file opts)
-       :function (string/trim function)
-       :line line
-       :column column}
-      (when-not (string/blank? function)
-        {:file nil
-         :function (string/trim function)
-         :line nil
-         :column nil}))))
-
-(comment
-  (safari-st-el->frame {:host "localhost" :port 9000}
-    "cljs$core$seq@http://localhost:9000/out/cljs/core.js:4259:17" {})
-
-  (safari-st-el->frame {:host "localhost" :port 9000}
-    "cljs$core$seq@http://localhost:9000/js/cljs/core.js:4259:17" {:asset-path "js"})
-  )
-
-(defmethod parse-stacktrace :safari
-  [repl-env st err opts]
-  (->> st
-    string/split-lines
-    (drop-while #(starts-with? % "Error"))
-    (take-while #(not (starts-with? % "eval code")))
-    (remove string/blank?)
-    (map #(safari-st-el->frame repl-env % opts))
-    (remove nil?)
-    vec))
-
-(comment
-  (parse-stacktrace {}
-    "cljs$core$seq@out/cljs/core.js:3999:17
-    cljs$core$first@out/cljs/core.js:4018:22
-    cljs$core$ffirst@out/cljs/core.js:5161:39
-    global code"
-    {:ua-product :safari}
-    {:output-dir "out"})
-
-  (parse-stacktrace {:host "localhost" :port 9000}
-    "cljs$core$seq@http://localhost:9000/out/cljs/core.js:4259:17
-cljs$core$first@http://localhost:9000/out/cljs/core.js:4289:22
-cljs$core$ffirst@http://localhost:9000/out/cljs/core.js:5357:39
-http://localhost:9000/out/cljs/core.js:16972:92
-http://localhost:9000/out/cljs/core.js:16973:3
-http://localhost:9000/out/cljs/core.js:10982:133
-sval@http://localhost:9000/out/cljs/core.js:10983:3
-cljs$core$ISeqable$_seq$arity$1@http://localhost:9000/out/cljs/core.js:11074:14
-cljs$core$seq@http://localhost:9000/out/cljs/core.js:4240:44
-cljs$core$pr_sequential_writer@http://localhost:9000/out/cljs/core.js:28707:17
-cljs$core$IPrintWithWriter$_pr_writer$arity$3@http://localhost:9000/out/cljs/core.js:29386:38
-cljs$core$pr_writer_impl@http://localhost:9000/out/cljs/core.js:28912:57
-cljs$core$pr_writer@http://localhost:9000/out/cljs/core.js:29011:32
-cljs$core$pr_seq_writer@http://localhost:9000/out/cljs/core.js:29015:20
-cljs$core$pr_sb_with_opts@http://localhost:9000/out/cljs/core.js:29078:24
-cljs$core$pr_str_with_opts@http://localhost:9000/out/cljs/core.js:29092:48
-cljs$core$pr_str__delegate@http://localhost:9000/out/cljs/core.js:29130:34
-cljs$core$pr_str@http://localhost:9000/out/cljs/core.js:29139:39
-eval code
-eval@[native code]
-http://localhost:9000/out/clojure/browser/repl.js:23:271
-clojure$browser$repl$evaluate_javascript@http://localhost:9000/out/clojure/browser/repl.js:26:4
-http://localhost:9000/out/clojure/browser/repl.js:121:173
-deliver@http://localhost:9000/out/goog/messaging/abstractchannel.js:142:21
-xpcDeliver@http://localhost:9000/out/goog/net/xpc/crosspagechannel.js:733:19
-messageReceived_@http://localhost:9000/out/goog/net/xpc/nativemessagingtransport.js:321:23
-fireListener@http://localhost:9000/out/goog/events/events.js:741:25
-handleBrowserEvent_@http://localhost:9000/out/goog/events/events.js:862:34
-http://localhost:9000/out/goog/events/events.js:276:42"
-    {:ua-product :safari}
-    nil)
-  )
-
-;; -----------------------------------------------------------------------------
-;; Firefox Stacktrace
-
-(defn firefox-clean-function [f]
-  (as-> f f
-    (cond
-      (string/blank? f) nil
-      (not= (.indexOf f "</") -1)
-      (let [idx (.indexOf f "</")]
-        (.substring f (+ idx 2)))
-      :else f)
-    (-> f
-      (string/replace #"<" "")
-      (string/replace #?(:clj #"\/" :cljs (js/RegExp. "\\/")) ""))))
-
-(defn firefox-st-el->frame
-  [repl-env st-el opts]
-  (let [[function flc] (if (re-find #"@" st-el)
-                         (string/split st-el #"@")
-                         [nil st-el])
-        [file line column] (parse-file-line-column flc)]
-    (if (and file function line column)
-      {:file (parse-file repl-env file opts)
-       :function (firefox-clean-function function)
-       :line line
-       :column column}
-      (when-not (string/blank? function)
-        {:file nil
-         :function (firefox-clean-function function)
-         :line nil
-         :column nil}))))
-
-(comment
-  (firefox-st-el->frame {:host "localhost" :port 9000}
-    "cljs$core$seq@http://localhost:9000/out/cljs/core.js:4258:8" {})
-
-  (firefox-st-el->frame {:host "localhost" :port 9000}
-    "cljs.core.map</cljs$core$map__2/</<@http://localhost:9000/out/cljs/core.js:16971:87" {})
-
-  (firefox-st-el->frame {:host "localhost" :port 9000}
-    "cljs.core.map</cljs$core$map__2/</<@http://localhost:9000/out/cljs/core.js:16971:87" {})
-
-  (firefox-st-el->frame {:host "localhost" :port 9000}
-    "cljs.core.pr_str</cljs$core$pr_str@http://localhost:9000/out/cljs/core.js:29138:8" {})
-
-  (firefox-st-el->frame {:host "localhost" :port 9000}
-    "cljs.core.pr_str</cljs$core$pr_str__delegate@http://localhost:9000/out/cljs/core.js:29129:8" {})
-  )
-
-(defmethod parse-stacktrace :firefox
-  [repl-env st err opts]
-  (->> st
-    string/split-lines
-    (drop-while #(starts-with? % "Error"))
-    (take-while #(= (.indexOf % "> eval") -1))
-    (remove string/blank?)
-    (map #(firefox-st-el->frame repl-env % opts))
-    (remove nil?)
-    vec))
-
-(comment
-  (parse-stacktrace {:host "localhost" :port 9000}
-    "cljs$core$seq@http://localhost:9000/out/cljs/core.js:4258:8
-cljs$core$first@http://localhost:9000/out/cljs/core.js:4288:9
-cljs$core$ffirst@http://localhost:9000/out/cljs/core.js:5356:24
-cljs.core.map</cljs$core$map__2/</<@http://localhost:9000/out/cljs/core.js:16971:87
-cljs.core.map</cljs$core$map__2/<@http://localhost:9000/out/cljs/core.js:16970:1
-cljs.core.LazySeq.prototype.sval/self__.s<@http://localhost:9000/out/cljs/core.js:10981:119
-cljs.core.LazySeq.prototype.sval@http://localhost:9000/out/cljs/core.js:10981:13
-cljs.core.LazySeq.prototype.cljs$core$ISeqable$_seq$arity$1@http://localhost:9000/out/cljs/core.js:11073:1
-cljs$core$seq@http://localhost:9000/out/cljs/core.js:4239:8
-cljs$core$pr_sequential_writer@http://localhost:9000/out/cljs/core.js:28706:4
-cljs.core.LazySeq.prototype.cljs$core$IPrintWithWriter$_pr_writer$arity$3@http://localhost:9000/out/cljs/core.js:29385:8
-cljs$core$pr_writer_impl@http://localhost:9000/out/cljs/core.js:28911:8
-cljs$core$pr_writer@http://localhost:9000/out/cljs/core.js:29010:8
-cljs$core$pr_seq_writer@http://localhost:9000/out/cljs/core.js:29014:1
-cljs$core$pr_sb_with_opts@http://localhost:9000/out/cljs/core.js:29077:1
-cljs$core$pr_str_with_opts@http://localhost:9000/out/cljs/core.js:29091:23
-cljs.core.pr_str</cljs$core$pr_str__delegate@http://localhost:9000/out/cljs/core.js:29129:8
-cljs.core.pr_str</cljs$core$pr_str@http://localhost:9000/out/cljs/core.js:29138:8
-@http://localhost:9000/out/clojure/browser/repl.js line 23 > eval:1:25
-@http://localhost:9000/out/clojure/browser/repl.js line 23 > eval:1:2
-clojure$browser$repl$evaluate_javascript/result<@http://localhost:9000/out/clojure/browser/repl.js:23:267
-clojure$browser$repl$evaluate_javascript@http://localhost:9000/out/clojure/browser/repl.js:23:15
-clojure$browser$repl$connect/</<@http://localhost:9000/out/clojure/browser/repl.js:121:128
-goog.messaging.AbstractChannel.prototype.deliver@http://localhost:9000/out/goog/messaging/abstractchannel.js:142:5
-goog.net.xpc.CrossPageChannel.prototype.xpcDeliver@http://localhost:9000/out/goog/net/xpc/crosspagechannel.js:733:7
-goog.net.xpc.NativeMessagingTransport.messageReceived_@http://localhost:9000/out/goog/net/xpc/nativemessagingtransport.js:321:1
-goog.events.fireListener@http://localhost:9000/out/goog/events/events.js:741:10
-goog.events.handleBrowserEvent_@http://localhost:9000/out/goog/events/events.js:862:1
-goog.events.getProxy/f<@http://localhost:9000/out/goog/events/events.js:276:16"
-    {:ua-product :firefox}
-    nil)
-  )
-
-;; -----------------------------------------------------------------------------
-;; Rhino Stacktrace
-
-(defmethod parse-stacktrace :rhino
-  [repl-env st err {:keys [output-dir] :as opts}]
-  (letfn [(process-frame [frame-str]
-            (when-not (or (string/blank? frame-str)
-                          (== -1 (.indexOf frame-str "\tat")))
-              (let [[file-side line-fn-side] (string/split frame-str #":")
-                   file                      (string/replace file-side #"\s+at\s+" "")
-                   [line function]           (string/split line-fn-side #"\s+")]
-               {:file     (string/replace file
-                            (str output-dir
-                              #?(:clj File/separator :cljs "/"))
-                            "")
-                :function (when function
-                            (-> function
-                              (string/replace "(" "")
-                              (string/replace ")" "")))
-                :line     (when (and line (not (string/blank? line)))
-                            (parse-int line))
-                :column   0})))]
-    (->> (string/split st #"\n")
-      (map process-frame)
-      (remove nil?)
-      vec)))
-
-(comment
-  (parse-stacktrace {}
-    "\tat .cljs_rhino_repl/goog/../cljs/core.js:4215 (seq)
-     \tat .cljs_rhino_repl/goog/../cljs/core.js:4245 (first)
-     \tat .cljs_rhino_repl/goog/../cljs/core.js:5295 (ffirst)
-     \tat <cljs repl>:1
-     \tat <cljs repl>:1"
-    {:ua-product :rhino}
-    {:output-dir ".cljs_rhino_repl"})
-
-  (parse-stacktrace {}
-    "org.mozilla.javascript.JavaScriptException: Error: 1 is not ISeqable (.cljs_rhino_repl/goog/../cljs/core.js#3998)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:3998 (cljs$core$seq)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:4017 (cljs$core$first)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:5160 (cljs$core$ffirst)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:16005
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:16004
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:10243
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:10334
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:3979 (cljs$core$seq)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28083 (cljs$core$pr_sequential_writer)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28811
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28267 (cljs$core$pr_writer_impl)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28349 (cljs$core$pr_writer)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28353 (cljs$core$pr_seq_writer)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28416 (cljs$core$pr_sb_with_opts)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28430 (cljs$core$pr_str_with_opts)
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28524
-   \tat .cljs_rhino_repl/goog/../cljs/core.js:28520 (cljs$core$pr_str)
-   at <cljs repl>:1
-   "
-    {:ua-product :rhino}
-    {:output-dir ".cljs_rhino_repl"})
-  )
-
-;; -----------------------------------------------------------------------------
-;; Nashorn Stacktrace
-
-(defmethod parse-stacktrace :nashorn
-  [repl-env st err {:keys [output-dir] :as opts}]
-  (letfn [(process-frame [frame-str]
-            (when-not (or (string/blank? frame-str)
-                          (== -1 (.indexOf frame-str "\tat")))
-              (let [frame-str               (string/replace frame-str #"\s+at\s+" "")
-                    [function file-and-line] (string/split frame-str #"\s+")
-                    [file-part line-part]    (string/split file-and-line #":")]
-                {:file     (string/replace (.substring file-part 1)
-                             (str output-dir
-                               #?(:clj File/separator :cljs "/"))
-                             "")
-                 :function function
-                 :line     (when (and line-part (not (string/blank? line-part)))
-                             (parse-int
-                               (.substring line-part 0
-                                 (dec (count line-part)))))
-                 :column   0})))]
-    (->> (string/split st #"\n")
-      (map process-frame)
-      (remove nil?)
-      vec)))
-
-;; -----------------------------------------------------------------------------
-;; Graal.JS Stacktrace
-
-(defmethod parse-stacktrace :graaljs
-  [repl-env st err {:keys [output-dir] :as opts}]
-  (letfn [(process-frame [frame-str]
-            (when-not (string/blank? frame-str)
-              (let [[function file-and-line] (string/split frame-str #"\(")
-                    [file-part line-part]    (string/split file-and-line #":")]
-                {:file     (string/replace file-part
-                             (str output-dir
-                               #?(:clj File/separator :cljs "/"))
-                             "")
-                 :function function
-                 :line     (when (and line-part (not (string/blank? line-part)))
-                             (parse-int
-                               (.substring line-part 0
-                                 (dec (count line-part)))))
-                 :column   0})))]
-    (->> (string/split st #"\n")
-      (map process-frame)
-      (remove nil?)
-      vec)))
-
-(comment
-  (parse-stacktrace {}
-    "Error: 1 is not ISeqable
-    \tat cljs$core$seq (.cljs_nashorn_repl/goog/../cljs/core.js:3998)
-    \tat cljs$core$first (.cljs_nashorn_repl/goog/../cljs/core.js:4017)
-    \tat cljs$core$ffirst (.cljs_nashorn_repl/goog/../cljs/core.js:5160)
-    \tat <anonymous> (.cljs_nashorn_repl/goog/../cljs/core.js:16005)
-    \tat <anonymous> (.cljs_nashorn_repl/goog/../cljs/core.js:16004)
-    \tat sval (.cljs_nashorn_repl/goog/../cljs/core.js:10243)
-    \tat cljs$core$ISeqable$_seq$arity$1-6 (.cljs_nashorn_repl/goog/../cljs/core.js:10334)
-    \tat cljs$core$seq (.cljs_nashorn_repl/goog/../cljs/core.js:3979)
-    \tat cljs$core$pr_sequential_writer (.cljs_nashorn_repl/goog/../cljs/core.js:28083)
-    \tat cljs$core$IPrintWithWriter$_pr_writer$arity$3-5 (.cljs_nashorn_repl/goog/../cljs/core.js:28811)
-    \tat cljs$core$pr_writer_impl (.cljs_nashorn_repl/goog/../cljs/core.js:28267)
-    \tat cljs$core$pr_writer (.cljs_nashorn_repl/goog/../cljs/core.js:28349)
-    \tat cljs$core$pr_seq_writer (.cljs_nashorn_repl/goog/../cljs/core.js:28353)
-    \tat cljs$core$pr_sb_with_opts (.cljs_nashorn_repl/goog/../cljs/core.js:28416)
-    \tat cljs$core$pr_str_with_opts (.cljs_nashorn_repl/goog/../cljs/core.js:28430)
-    \tat cljs$core$IFn$_invoke$arity$variadic-71 (.cljs_nashorn_repl/goog/../cljs/core.js:28524)
-    \tat cljs$core$pr_str (.cljs_nashorn_repl/goog/../cljs/core.js:28520)
-    \tat <anonymous> (<eval>:1)
-    \tat <program> (<eval>:1)\n"
-    {:ua-product :nashorn}
-    {:output-dir ".cljs_nashorn_repl"})
-  )
-
-;; -----------------------------------------------------------------------------
-;; Node.js Stacktrace
-
-(defmethod parse-stacktrace :nodejs
-  [repl-env st err {:keys [output-dir] :as opts}]
-  (letfn [(parse-source-loc-info [x]
-            (when (and x (not (string/blank? x)))
-              (parse-int x)))
-          (process-frame [frame-str]
-            (when-not (or (string/blank? frame-str)
-                          (nil? (re-find #"^\s+at" frame-str)))
-              (let [frame-str (string/replace frame-str #"\s+at\s+" "")]
-                (when-not (string/starts-with? frame-str "repl:")
-                  (let [parts (string/split frame-str #"\s+")
-                        [function file&line] (if (== 2 (count parts))
-                                                   [(first parts)
-                                                    (subs (second parts) 1
-                                                      (dec (count (second parts))))]
-                                                   [nil (first parts)])
-                        [file-part line-part col-part] (string/split file&line #":")]
-                    {:file     (if function
-                                 (cond-> file-part
-                                   output-dir
-                                   (string/replace
-                                     (str output-dir
-                                       #?(:clj File/separator :cljs "/"))
-                                     ""))
-                                 file-part)
-                     :function function
-                     :line     (parse-source-loc-info line-part)
-                     :column   (parse-source-loc-info col-part)})))))]
-    (->> (string/split st #"\n")
-      (map process-frame)
-      (remove nil?)
-      vec)))
-
-(comment
-  (parse-stacktrace {}
-    "Error: 1 is not ISeqable
-    at cljs$core$seq (.cljs_node_repl/cljs/core.cljs:1118:20)
-    at repl:1:65
-    at repl:9:4
-    at repl:17:3
-    at repl:22:4
-    at Object.exports.runInThisContext (vm.js:54:17)
-    at Domain.<anonymous> ([stdin]:41:34)
-    at Domain.run (domain.js:228:14)
-    at Socket.<anonymous> ([stdin]:40:25)
-    at emitOne (events.js:77:13)"
-
-    {:ua-product :nodejs}
-    {:output-dir ".cljs_node_repl"})
-  )
-
-;; -----------------------------------------------------------------------------
-;; Stacktrace Mapping
-
-(defn remove-ext [file]
-  (-> file
-    (string/replace #"\.js$" "")
-    (string/replace #"\.cljs$" "")
-    (string/replace #"\.cljc$" "")
-    (string/replace #"\.clj$" "")))
-
-(defn mapped-line-column-call
-  "Given a cljs.source-map source map data structure map a generated line
-   and column back to the original line, column, and function called."
-  [sms file line column]
-  (let [source-map (get sms (symbol (string/replace (remove-ext file) "/" ".")))]
-    ;; source maps are 0 indexed for columns
-    ;; multiple segments may exist at column
-    ;; the last segment seems most accurate
-    (letfn [(get-best-column [columns column]
-             (last (or (get columns
-                         (last (filter #(<= % (dec column))
-                                 (sort (keys columns)))))
-                     (second (first columns)))))
-           (adjust [mapped]
-             (vec (map #(%1 %2) [inc inc identity] mapped)))]
-     (let [default [line column nil]]
-       ;; source maps are 0 indexed for lines
-       (if-let [columns (get source-map (dec line))]
-         (adjust (map (get-best-column columns column) [:line :col :name]))
-         default)))))
-
-(defn mapped-frame
-  "Given opts and a canonicalized JavaScript stacktrace frame, return the
-  ClojureScript frame."
-  [{:keys [function file line column]} sms opts]
-  (let [no-source-file?      (if-not file true (starts-with? file "<"))
-        [line' column' call] (if no-source-file?
-                               [line column nil]
-                               (mapped-line-column-call sms file line column))
-        file'                (when-not no-source-file?
-                               (if (ends-with? file ".js")
-                                 (str (subs file 0 (- (count file) 3)) ".cljs")
-                                 file))]
-    {:function function
-     :call     call
-     :file     (if no-source-file?
-                 (str "NO_SOURCE_FILE" (when file (str " " file)))
-                 file')
-     :line     line'
-     :column   column'}))
-
-(defn mapped-stacktrace
-  "Given a vector representing the canonicalized JavaScript stacktrace
-   return the ClojureScript stacktrace. The canonical stacktrace must be
-   in the form:
-
-    [{:file <string>
-      :function <string>
-      :line <integer>
-      :column <integer>}*]
-
-   :file must be a URL path (without protocol) relative to :output-dir or a
-   identifier delimited by angle brackets. The returned mapped stacktrace will
-   also contain :url entries to the original sources if it can be determined
-   from the classpath."
-  ([stacktrace sms]
-   (mapped-stacktrace stacktrace sms nil))
-  ([stacktrace sms opts]
-   (letfn [(call->function [x]
-             (if (:call x)
-               (hash-map :function (:call x))
-               {}))
-           (call-merge [function call]
-             (merge-with
-               (fn [munged-fn-name unmunged-call-name]
-                 (if (= munged-fn-name
-                        (string/replace (munge unmunged-call-name) "." "$"))
-                   unmunged-call-name
-                   munged-fn-name))
-               function call))]
-     (let [mapped-frames (map (memoize #(mapped-frame % sms opts)) stacktrace)]
-       ;; take each non-nil :call and optionally merge it into :function one-level
-       ;; up to avoid replacing with local symbols, we only replace munged name if
-       ;; we can munge call symbol back to it
-       (vec (map call-merge
-              (map #(dissoc % :call) mapped-frames)
-              (concat (rest (map call->function mapped-frames)) [{}])))))))
-
-(defn mapped-stacktrace-str
-  "Given a vector representing the canonicalized JavaScript stacktrace and a map
-  of library names to decoded source maps, print the ClojureScript stacktrace .
-  See mapped-stacktrace."
-  ([stacktrace sms]
-   (mapped-stacktrace-str stacktrace sms nil))
-  ([stacktrace sms opts]
-   (with-out-str
-     (doseq [{:keys [function file line column]}
-             (mapped-stacktrace stacktrace sms opts)]
-       (println "\t"
-         (str (when function (str function " "))
-              "(" file (when line (str ":" line))
-                       (when column (str ":" column)) ")"))))))
-
-(comment
-  (require '[cljs.closure :as cljsc]
-           '[clojure.data.json :as json]
-           '[cljs.source-map :as sm]
-           '[clojure.pprint :as pp])
-
-  (cljsc/build "samples/hello/src"
-    {:optimizations :none
-     :output-dir "samples/hello/out"
-     :output-to "samples/hello/out/hello.js"
-     :source-map true})
-
-  (def sms
-    {'hello.core
-     (sm/decode
-       (json/read-str
-         (slurp "samples/hello/out/hello/core.js.map")
-         :key-fn keyword))})
-
-  (pp/pprint sms)
-
-  ;; maps to :line 5 :column 24
-  (mapped-stacktrace
-    [{:file "hello/core.js"
-      :function "first"
-      :line 6
-      :column 0}]
-    sms {:output-dir "samples/hello/out"})
-
-  (mapped-stacktrace-str
-    [{:file "hello/core.js"
-      :function "first"
-      :line 6
-      :column 0}]
-    sms {:output-dir "samples/hello/out"})
-  )

docs/js/compiled/out/cljs/stacktrace.js

@@ -1,665 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.stacktrace');
-goog.require('cljs.core');
-goog.require('goog.string');
-goog.require('clojure.string');
-if((typeof cljs !== 'undefined') && (typeof cljs.stacktrace !== 'undefined') && (typeof cljs.stacktrace.parse_stacktrace !== 'undefined')){
-} else {
-/**
- * Parse a JavaScript stacktrace string into a canonical data form. The
- *   arguments:
- * 
- *   repl-env - the repl environment, an optional map with :host and :port keys
- *           if the stacktrace includes url, not file references
- *   st       - the original stacktrace string to parse
- *   err      - an error map. :ua-product key defines the type of stacktrace parser
- *           to use, for example :chrome
- *   opts     - additional options. :output-dir maybe given in this argument if
- *           :host and :port do not apply, for example, a file path
- * 
- *   The canonical stacktrace representation can easily be mapped to a
- *   ClojureScript one see mapped-stacktrace and mapped-stacktrace-str
- */
-cljs.stacktrace.parse_stacktrace = (function (){var method_table__4613__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var prefer_table__4614__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var method_cache__4615__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var cached_hierarchy__4616__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var hierarchy__4617__auto__ = cljs.core.get.call(null,cljs.core.PersistentArrayMap.EMPTY,new cljs.core.Keyword(null,"hierarchy","hierarchy",-1053470341),cljs.core.get_global_hierarchy.call(null));
-return (new cljs.core.MultiFn(cljs.core.symbol.call(null,"cljs.stacktrace","parse-stacktrace"),((function (method_table__4613__auto__,prefer_table__4614__auto__,method_cache__4615__auto__,cached_hierarchy__4616__auto__,hierarchy__4617__auto__){
-return (function (repl_env,st,err,opts){
-return new cljs.core.Keyword(null,"ua-product","ua-product",938384227).cljs$core$IFn$_invoke$arity$1(err);
-});})(method_table__4613__auto__,prefer_table__4614__auto__,method_cache__4615__auto__,cached_hierarchy__4616__auto__,hierarchy__4617__auto__))
-,new cljs.core.Keyword(null,"default","default",-1987822328),hierarchy__4617__auto__,method_table__4613__auto__,prefer_table__4614__auto__,method_cache__4615__auto__,cached_hierarchy__4616__auto__));
-})();
-}
-cljs.stacktrace.parse_int = (function cljs$stacktrace$parse_int(s){
-return parseInt(s,(10));
-});
-cljs.stacktrace.starts_with_QMARK_ = (function cljs$stacktrace$starts_with_QMARK_(s0,s1){
-return goog.string.startsWith(s0,s1);
-});
-cljs.stacktrace.ends_with_QMARK_ = (function cljs$stacktrace$ends_with_QMARK_(s0,s1){
-return goog.string.endsWith(s0,s1);
-});
-cljs.stacktrace.string__GT_regex = (function cljs$stacktrace$string__GT_regex(s){
-return (new RegExp(s));
-});
-cljs.stacktrace.output_directory = (function cljs$stacktrace$output_directory(opts){
-var or__4131__auto__ = new cljs.core.Keyword(null,"output-dir","output-dir",-290956991).cljs$core$IFn$_invoke$arity$1(opts);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return "out";
-}
-});
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"default","default",-1987822328),(function (repl_env,st,err,opts){
-return st;
-}));
-cljs.stacktrace.parse_file_line_column = (function cljs$stacktrace$parse_file_line_column(flc){
-if(cljs.core.not.call(null,cljs.core.re_find.call(null,/:/,flc))){
-return new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [flc,null,null], null);
-} else {
-var xs = clojure.string.split.call(null,flc,/:/);
-var vec__28172 = cljs.core.reduce.call(null,((function (xs){
-return (function (p__28178,p__28179){
-var vec__28180 = p__28178;
-var pre = cljs.core.nth.call(null,vec__28180,(0),null);
-var post = cljs.core.nth.call(null,vec__28180,(1),null);
-var vec__28183 = p__28179;
-var x = cljs.core.nth.call(null,vec__28183,(0),null);
-var i = cljs.core.nth.call(null,vec__28183,(1),null);
-if((i <= (2))){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [pre,cljs.core.conj.call(null,post,x)], null);
-} else {
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.conj.call(null,pre,x),post], null);
-}
-});})(xs))
-,new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.PersistentVector.EMPTY,cljs.core.PersistentVector.EMPTY], null),cljs.core.map.call(null,cljs.core.vector,xs,cljs.core.range.call(null,cljs.core.count.call(null,xs),(0),(-1))));
-var pre = cljs.core.nth.call(null,vec__28172,(0),null);
-var vec__28175 = cljs.core.nth.call(null,vec__28172,(1),null);
-var line = cljs.core.nth.call(null,vec__28175,(0),null);
-var column = cljs.core.nth.call(null,vec__28175,(1),null);
-var file = clojure.string.join.call(null,":",pre);
-return new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [(function (){var G__28186 = file;
-if(cljs.stacktrace.starts_with_QMARK_.call(null,file,"(")){
-return clojure.string.replace.call(null,G__28186,"(","");
-} else {
-return G__28186;
-}
-})(),cljs.stacktrace.parse_int.call(null,(function (){var G__28187 = line;
-if(cljs.stacktrace.ends_with_QMARK_.call(null,line,")")){
-return clojure.string.replace.call(null,G__28187,")","");
-} else {
-return G__28187;
-}
-})()),cljs.stacktrace.parse_int.call(null,(function (){var G__28188 = column;
-if(cljs.stacktrace.ends_with_QMARK_.call(null,column,")")){
-return clojure.string.replace.call(null,G__28188,")","");
-} else {
-return G__28188;
-}
-})())], null);
-}
-});
-/**
- * Given a browser file url convert it into a relative path that can be used
- * to locate the original source.
- */
-cljs.stacktrace.parse_file = (function cljs$stacktrace$parse_file(p__28189,file,p__28190){
-var map__28191 = p__28189;
-var map__28191__$1 = (((((!((map__28191 == null))))?(((((map__28191.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28191.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28191):map__28191);
-var repl_env = map__28191__$1;
-var host = cljs.core.get.call(null,map__28191__$1,new cljs.core.Keyword(null,"host","host",-1558485167));
-var host_port = cljs.core.get.call(null,map__28191__$1,new cljs.core.Keyword(null,"host-port","host-port",1956551772));
-var port = cljs.core.get.call(null,map__28191__$1,new cljs.core.Keyword(null,"port","port",1534937262));
-var map__28192 = p__28190;
-var map__28192__$1 = (((((!((map__28192 == null))))?(((((map__28192.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28192.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28192):map__28192);
-var opts = map__28192__$1;
-var asset_path = cljs.core.get.call(null,map__28192__$1,new cljs.core.Keyword(null,"asset-path","asset-path",1500889617));
-var urlpat = (cljs.core.truth_(host)?cljs.stacktrace.string__GT_regex.call(null,["http://",cljs.core.str.cljs$core$IFn$_invoke$arity$1(host),":",cljs.core.str.cljs$core$IFn$_invoke$arity$1((function (){var or__4131__auto__ = host_port;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return port;
-}
-})()),"/"].join('')):"");
-var match = (cljs.core.truth_(host)?cljs.core.re_find.call(null,urlpat,file):cljs.core.contains_QMARK_.call(null,opts,new cljs.core.Keyword(null,"output-dir","output-dir",-290956991)));
-if(cljs.core.truth_(match)){
-return clojure.string.replace.call(null,clojure.string.replace.call(null,file,urlpat,""),cljs.stacktrace.string__GT_regex.call(null,["^",cljs.core.str.cljs$core$IFn$_invoke$arity$1((function (){var or__4131__auto__ = (function (){var and__4120__auto__ = asset_path;
-if(cljs.core.truth_(and__4120__auto__)){
-return clojure.string.replace.call(null,asset_path,/^\//,"");
-} else {
-return and__4120__auto__;
-}
-})();
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return cljs.stacktrace.output_directory.call(null,opts);
-}
-})()),"/"].join('')),"");
-} else {
-var temp__5718__auto__ = new cljs.core.Keyword(null,"asset-root","asset-root",1771735072).cljs$core$IFn$_invoke$arity$1(opts);
-if(cljs.core.truth_(temp__5718__auto__)){
-var asset_root = temp__5718__auto__;
-return clojure.string.replace.call(null,file,asset_root,"");
-} else {
-throw cljs.core.ex_info.call(null,["Could not relativize URL ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(file)].join(''),new cljs.core.PersistentArrayMap(null, 2, [new cljs.core.Keyword(null,"type","type",1174270348),new cljs.core.Keyword(null,"parse-stacktrace","parse-stacktrace",-38208461),new cljs.core.Keyword(null,"reason","reason",-2070751759),new cljs.core.Keyword(null,"relativize-url","relativize-url",621482324)], null));
-}
-}
-});
-cljs.stacktrace.chrome_st_el__GT_frame = (function cljs$stacktrace$chrome_st_el__GT_frame(repl_env,st_el,opts){
-var xs = clojure.string.split.call(null,clojure.string.replace.call(null,st_el,/\s+at\s+/,""),/\s+/);
-var vec__28195 = ((((1) === cljs.core.count.call(null,xs)))?new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,cljs.core.first.call(null,xs)], null):new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.first.call(null,xs),cljs.core.last.call(null,xs)], null));
-var function$ = cljs.core.nth.call(null,vec__28195,(0),null);
-var flc = cljs.core.nth.call(null,vec__28195,(1),null);
-var vec__28198 = cljs.stacktrace.parse_file_line_column.call(null,flc);
-var file = cljs.core.nth.call(null,vec__28198,(0),null);
-var line = cljs.core.nth.call(null,vec__28198,(1),null);
-var column = cljs.core.nth.call(null,vec__28198,(2),null);
-if(cljs.core.truth_((function (){var and__4120__auto__ = file;
-if(cljs.core.truth_(and__4120__auto__)){
-var and__4120__auto____$1 = function$;
-if(cljs.core.truth_(and__4120__auto____$1)){
-var and__4120__auto____$2 = line;
-if(cljs.core.truth_(and__4120__auto____$2)){
-return column;
-} else {
-return and__4120__auto____$2;
-}
-} else {
-return and__4120__auto____$1;
-}
-} else {
-return and__4120__auto__;
-}
-})())){
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),cljs.stacktrace.parse_file.call(null,repl_env,file,opts),new cljs.core.Keyword(null,"function","function",-2127255473),clojure.string.replace.call(null,function$,/Object\./,""),new cljs.core.Keyword(null,"line","line",212345235),line,new cljs.core.Keyword(null,"column","column",2078222095),column], null);
-} else {
-if(clojure.string.blank_QMARK_.call(null,function$)){
-return null;
-} else {
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),null,new cljs.core.Keyword(null,"function","function",-2127255473),clojure.string.replace.call(null,function$,/Object\./,""),new cljs.core.Keyword(null,"line","line",212345235),null,new cljs.core.Keyword(null,"column","column",2078222095),null], null);
-}
-}
-});
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"chrome","chrome",1718738387),(function (repl_env,st,err,opts){
-return cljs.core.vec.call(null,cljs.core.remove.call(null,cljs.core.nil_QMARK_,cljs.core.map.call(null,(function (p1__28203_SHARP_){
-return cljs.stacktrace.chrome_st_el__GT_frame.call(null,repl_env,p1__28203_SHARP_,opts);
-}),cljs.core.take_while.call(null,(function (p1__28202_SHARP_){
-return (!(cljs.stacktrace.starts_with_QMARK_.call(null,p1__28202_SHARP_,"    at eval")));
-}),cljs.core.drop_while.call(null,(function (p1__28201_SHARP_){
-return cljs.stacktrace.starts_with_QMARK_.call(null,p1__28201_SHARP_,"Error");
-}),clojure.string.split_lines.call(null,st))))));
-}));
-cljs.stacktrace.safari_st_el__GT_frame = (function cljs$stacktrace$safari_st_el__GT_frame(repl_env,st_el,opts){
-var vec__28204 = (cljs.core.truth_(cljs.core.re_find.call(null,/@/,st_el))?clojure.string.split.call(null,st_el,/@/):new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,st_el], null));
-var function$ = cljs.core.nth.call(null,vec__28204,(0),null);
-var flc = cljs.core.nth.call(null,vec__28204,(1),null);
-var vec__28207 = cljs.stacktrace.parse_file_line_column.call(null,flc);
-var file = cljs.core.nth.call(null,vec__28207,(0),null);
-var line = cljs.core.nth.call(null,vec__28207,(1),null);
-var column = cljs.core.nth.call(null,vec__28207,(2),null);
-if(cljs.core.truth_((function (){var and__4120__auto__ = file;
-if(cljs.core.truth_(and__4120__auto__)){
-var and__4120__auto____$1 = function$;
-if(cljs.core.truth_(and__4120__auto____$1)){
-var and__4120__auto____$2 = line;
-if(cljs.core.truth_(and__4120__auto____$2)){
-return column;
-} else {
-return and__4120__auto____$2;
-}
-} else {
-return and__4120__auto____$1;
-}
-} else {
-return and__4120__auto__;
-}
-})())){
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),cljs.stacktrace.parse_file.call(null,repl_env,file,opts),new cljs.core.Keyword(null,"function","function",-2127255473),clojure.string.trim.call(null,function$),new cljs.core.Keyword(null,"line","line",212345235),line,new cljs.core.Keyword(null,"column","column",2078222095),column], null);
-} else {
-if(clojure.string.blank_QMARK_.call(null,function$)){
-return null;
-} else {
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),null,new cljs.core.Keyword(null,"function","function",-2127255473),clojure.string.trim.call(null,function$),new cljs.core.Keyword(null,"line","line",212345235),null,new cljs.core.Keyword(null,"column","column",2078222095),null], null);
-}
-}
-});
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"safari","safari",497115653),(function (repl_env,st,err,opts){
-return cljs.core.vec.call(null,cljs.core.remove.call(null,cljs.core.nil_QMARK_,cljs.core.map.call(null,(function (p1__28212_SHARP_){
-return cljs.stacktrace.safari_st_el__GT_frame.call(null,repl_env,p1__28212_SHARP_,opts);
-}),cljs.core.remove.call(null,clojure.string.blank_QMARK_,cljs.core.take_while.call(null,(function (p1__28211_SHARP_){
-return (!(cljs.stacktrace.starts_with_QMARK_.call(null,p1__28211_SHARP_,"eval code")));
-}),cljs.core.drop_while.call(null,(function (p1__28210_SHARP_){
-return cljs.stacktrace.starts_with_QMARK_.call(null,p1__28210_SHARP_,"Error");
-}),clojure.string.split_lines.call(null,st)))))));
-}));
-cljs.stacktrace.firefox_clean_function = (function cljs$stacktrace$firefox_clean_function(f){
-var f__$1 = f;
-var f__$2 = ((clojure.string.blank_QMARK_.call(null,f__$1))?null:((cljs.core.not_EQ_.call(null,f__$1.indexOf("</"),(-1)))?(function (){var idx = f__$1.indexOf("</");
-return f__$1.substring((idx + (2)));
-})():f__$1
-));
-return clojure.string.replace.call(null,clojure.string.replace.call(null,f__$2,/</,""),(new RegExp("\\/")),"");
-});
-cljs.stacktrace.firefox_st_el__GT_frame = (function cljs$stacktrace$firefox_st_el__GT_frame(repl_env,st_el,opts){
-var vec__28213 = (cljs.core.truth_(cljs.core.re_find.call(null,/@/,st_el))?clojure.string.split.call(null,st_el,/@/):new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,st_el], null));
-var function$ = cljs.core.nth.call(null,vec__28213,(0),null);
-var flc = cljs.core.nth.call(null,vec__28213,(1),null);
-var vec__28216 = cljs.stacktrace.parse_file_line_column.call(null,flc);
-var file = cljs.core.nth.call(null,vec__28216,(0),null);
-var line = cljs.core.nth.call(null,vec__28216,(1),null);
-var column = cljs.core.nth.call(null,vec__28216,(2),null);
-if(cljs.core.truth_((function (){var and__4120__auto__ = file;
-if(cljs.core.truth_(and__4120__auto__)){
-var and__4120__auto____$1 = function$;
-if(cljs.core.truth_(and__4120__auto____$1)){
-var and__4120__auto____$2 = line;
-if(cljs.core.truth_(and__4120__auto____$2)){
-return column;
-} else {
-return and__4120__auto____$2;
-}
-} else {
-return and__4120__auto____$1;
-}
-} else {
-return and__4120__auto__;
-}
-})())){
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),cljs.stacktrace.parse_file.call(null,repl_env,file,opts),new cljs.core.Keyword(null,"function","function",-2127255473),cljs.stacktrace.firefox_clean_function.call(null,function$),new cljs.core.Keyword(null,"line","line",212345235),line,new cljs.core.Keyword(null,"column","column",2078222095),column], null);
-} else {
-if(clojure.string.blank_QMARK_.call(null,function$)){
-return null;
-} else {
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),null,new cljs.core.Keyword(null,"function","function",-2127255473),cljs.stacktrace.firefox_clean_function.call(null,function$),new cljs.core.Keyword(null,"line","line",212345235),null,new cljs.core.Keyword(null,"column","column",2078222095),null], null);
-}
-}
-});
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"firefox","firefox",1283768880),(function (repl_env,st,err,opts){
-return cljs.core.vec.call(null,cljs.core.remove.call(null,cljs.core.nil_QMARK_,cljs.core.map.call(null,(function (p1__28221_SHARP_){
-return cljs.stacktrace.firefox_st_el__GT_frame.call(null,repl_env,p1__28221_SHARP_,opts);
-}),cljs.core.remove.call(null,clojure.string.blank_QMARK_,cljs.core.take_while.call(null,(function (p1__28220_SHARP_){
-return cljs.core._EQ_.call(null,p1__28220_SHARP_.indexOf("> eval"),(-1));
-}),cljs.core.drop_while.call(null,(function (p1__28219_SHARP_){
-return cljs.stacktrace.starts_with_QMARK_.call(null,p1__28219_SHARP_,"Error");
-}),clojure.string.split_lines.call(null,st)))))));
-}));
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"rhino","rhino",1962118035),(function (repl_env,st,err,p__28222){
-var map__28223 = p__28222;
-var map__28223__$1 = (((((!((map__28223 == null))))?(((((map__28223.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28223.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28223):map__28223);
-var opts = map__28223__$1;
-var output_dir = cljs.core.get.call(null,map__28223__$1,new cljs.core.Keyword(null,"output-dir","output-dir",-290956991));
-var process_frame = ((function (map__28223,map__28223__$1,opts,output_dir){
-return (function cljs$stacktrace$process_frame(frame_str){
-if(((clojure.string.blank_QMARK_.call(null,frame_str)) || (((-1) === frame_str.indexOf("\tat"))))){
-return null;
-} else {
-var vec__28231 = clojure.string.split.call(null,frame_str,/:/);
-var file_side = cljs.core.nth.call(null,vec__28231,(0),null);
-var line_fn_side = cljs.core.nth.call(null,vec__28231,(1),null);
-var file = clojure.string.replace.call(null,file_side,/\s+at\s+/,"");
-var vec__28234 = clojure.string.split.call(null,line_fn_side,/\s+/);
-var line = cljs.core.nth.call(null,vec__28234,(0),null);
-var function$ = cljs.core.nth.call(null,vec__28234,(1),null);
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),clojure.string.replace.call(null,file,[cljs.core.str.cljs$core$IFn$_invoke$arity$1(output_dir),"/"].join(''),""),new cljs.core.Keyword(null,"function","function",-2127255473),(cljs.core.truth_(function$)?clojure.string.replace.call(null,clojure.string.replace.call(null,function$,"(",""),")",""):null),new cljs.core.Keyword(null,"line","line",212345235),(cljs.core.truth_((function (){var and__4120__auto__ = line;
-if(cljs.core.truth_(and__4120__auto__)){
-return (!(clojure.string.blank_QMARK_.call(null,line)));
-} else {
-return and__4120__auto__;
-}
-})())?cljs.stacktrace.parse_int.call(null,line):null),new cljs.core.Keyword(null,"column","column",2078222095),(0)], null);
-}
-});})(map__28223,map__28223__$1,opts,output_dir))
-;
-return cljs.core.vec.call(null,cljs.core.remove.call(null,cljs.core.nil_QMARK_,cljs.core.map.call(null,process_frame,clojure.string.split.call(null,st,/\n/))));
-}));
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"nashorn","nashorn",988299963),(function (repl_env,st,err,p__28237){
-var map__28238 = p__28237;
-var map__28238__$1 = (((((!((map__28238 == null))))?(((((map__28238.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28238.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28238):map__28238);
-var opts = map__28238__$1;
-var output_dir = cljs.core.get.call(null,map__28238__$1,new cljs.core.Keyword(null,"output-dir","output-dir",-290956991));
-var process_frame = ((function (map__28238,map__28238__$1,opts,output_dir){
-return (function cljs$stacktrace$process_frame(frame_str){
-if(((clojure.string.blank_QMARK_.call(null,frame_str)) || (((-1) === frame_str.indexOf("\tat"))))){
-return null;
-} else {
-var frame_str__$1 = clojure.string.replace.call(null,frame_str,/\s+at\s+/,"");
-var vec__28246 = clojure.string.split.call(null,frame_str__$1,/\s+/);
-var function$ = cljs.core.nth.call(null,vec__28246,(0),null);
-var file_and_line = cljs.core.nth.call(null,vec__28246,(1),null);
-var vec__28249 = clojure.string.split.call(null,file_and_line,/:/);
-var file_part = cljs.core.nth.call(null,vec__28249,(0),null);
-var line_part = cljs.core.nth.call(null,vec__28249,(1),null);
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),clojure.string.replace.call(null,file_part.substring((1)),[cljs.core.str.cljs$core$IFn$_invoke$arity$1(output_dir),"/"].join(''),""),new cljs.core.Keyword(null,"function","function",-2127255473),function$,new cljs.core.Keyword(null,"line","line",212345235),(cljs.core.truth_((function (){var and__4120__auto__ = line_part;
-if(cljs.core.truth_(and__4120__auto__)){
-return (!(clojure.string.blank_QMARK_.call(null,line_part)));
-} else {
-return and__4120__auto__;
-}
-})())?cljs.stacktrace.parse_int.call(null,line_part.substring((0),(cljs.core.count.call(null,line_part) - (1)))):null),new cljs.core.Keyword(null,"column","column",2078222095),(0)], null);
-}
-});})(map__28238,map__28238__$1,opts,output_dir))
-;
-return cljs.core.vec.call(null,cljs.core.remove.call(null,cljs.core.nil_QMARK_,cljs.core.map.call(null,process_frame,clojure.string.split.call(null,st,/\n/))));
-}));
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"graaljs","graaljs",1880468686),(function (repl_env,st,err,p__28252){
-var map__28253 = p__28252;
-var map__28253__$1 = (((((!((map__28253 == null))))?(((((map__28253.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28253.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28253):map__28253);
-var opts = map__28253__$1;
-var output_dir = cljs.core.get.call(null,map__28253__$1,new cljs.core.Keyword(null,"output-dir","output-dir",-290956991));
-var process_frame = ((function (map__28253,map__28253__$1,opts,output_dir){
-return (function cljs$stacktrace$process_frame(frame_str){
-if(clojure.string.blank_QMARK_.call(null,frame_str)){
-return null;
-} else {
-var vec__28261 = clojure.string.split.call(null,frame_str,/\(/);
-var function$ = cljs.core.nth.call(null,vec__28261,(0),null);
-var file_and_line = cljs.core.nth.call(null,vec__28261,(1),null);
-var vec__28264 = clojure.string.split.call(null,file_and_line,/:/);
-var file_part = cljs.core.nth.call(null,vec__28264,(0),null);
-var line_part = cljs.core.nth.call(null,vec__28264,(1),null);
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),clojure.string.replace.call(null,file_part,[cljs.core.str.cljs$core$IFn$_invoke$arity$1(output_dir),"/"].join(''),""),new cljs.core.Keyword(null,"function","function",-2127255473),function$,new cljs.core.Keyword(null,"line","line",212345235),(cljs.core.truth_((function (){var and__4120__auto__ = line_part;
-if(cljs.core.truth_(and__4120__auto__)){
-return (!(clojure.string.blank_QMARK_.call(null,line_part)));
-} else {
-return and__4120__auto__;
-}
-})())?cljs.stacktrace.parse_int.call(null,line_part.substring((0),(cljs.core.count.call(null,line_part) - (1)))):null),new cljs.core.Keyword(null,"column","column",2078222095),(0)], null);
-}
-});})(map__28253,map__28253__$1,opts,output_dir))
-;
-return cljs.core.vec.call(null,cljs.core.remove.call(null,cljs.core.nil_QMARK_,cljs.core.map.call(null,process_frame,clojure.string.split.call(null,st,/\n/))));
-}));
-cljs.core._add_method.call(null,cljs.stacktrace.parse_stacktrace,new cljs.core.Keyword(null,"nodejs","nodejs",321212524),(function (repl_env,st,err,p__28267){
-var map__28268 = p__28267;
-var map__28268__$1 = (((((!((map__28268 == null))))?(((((map__28268.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28268.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28268):map__28268);
-var opts = map__28268__$1;
-var output_dir = cljs.core.get.call(null,map__28268__$1,new cljs.core.Keyword(null,"output-dir","output-dir",-290956991));
-var parse_source_loc_info = ((function (map__28268,map__28268__$1,opts,output_dir){
-return (function cljs$stacktrace$parse_source_loc_info(x){
-if(cljs.core.truth_((function (){var and__4120__auto__ = x;
-if(cljs.core.truth_(and__4120__auto__)){
-return (!(clojure.string.blank_QMARK_.call(null,x)));
-} else {
-return and__4120__auto__;
-}
-})())){
-return cljs.stacktrace.parse_int.call(null,x);
-} else {
-return null;
-}
-});})(map__28268,map__28268__$1,opts,output_dir))
-;
-var process_frame = ((function (map__28268,map__28268__$1,opts,output_dir){
-return (function cljs$stacktrace$process_frame(frame_str){
-if(((clojure.string.blank_QMARK_.call(null,frame_str)) || ((cljs.core.re_find.call(null,/^\s+at/,frame_str) == null)))){
-return null;
-} else {
-var frame_str__$1 = clojure.string.replace.call(null,frame_str,/\s+at\s+/,"");
-if(clojure.string.starts_with_QMARK_.call(null,frame_str__$1,"repl:")){
-return null;
-} else {
-var parts = clojure.string.split.call(null,frame_str__$1,/\s+/);
-var vec__28277 = ((((2) === cljs.core.count.call(null,parts)))?new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.first.call(null,parts),cljs.core.subs.call(null,cljs.core.second.call(null,parts),(1),(cljs.core.count.call(null,cljs.core.second.call(null,parts)) - (1)))], null):new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,cljs.core.first.call(null,parts)], null));
-var function$ = cljs.core.nth.call(null,vec__28277,(0),null);
-var file_AMPERSAND_line = cljs.core.nth.call(null,vec__28277,(1),null);
-var vec__28280 = clojure.string.split.call(null,file_AMPERSAND_line,/:/);
-var file_part = cljs.core.nth.call(null,vec__28280,(0),null);
-var line_part = cljs.core.nth.call(null,vec__28280,(1),null);
-var col_part = cljs.core.nth.call(null,vec__28280,(2),null);
-return new cljs.core.PersistentArrayMap(null, 4, [new cljs.core.Keyword(null,"file","file",-1269645878),(cljs.core.truth_(function$)?(function (){var G__28283 = file_part;
-if(cljs.core.truth_(output_dir)){
-return clojure.string.replace.call(null,G__28283,[cljs.core.str.cljs$core$IFn$_invoke$arity$1(output_dir),"/"].join(''),"");
-} else {
-return G__28283;
-}
-})():file_part),new cljs.core.Keyword(null,"function","function",-2127255473),function$,new cljs.core.Keyword(null,"line","line",212345235),parse_source_loc_info.call(null,line_part),new cljs.core.Keyword(null,"column","column",2078222095),parse_source_loc_info.call(null,col_part)], null);
-}
-}
-});})(map__28268,map__28268__$1,opts,output_dir))
-;
-return cljs.core.vec.call(null,cljs.core.remove.call(null,cljs.core.nil_QMARK_,cljs.core.map.call(null,process_frame,clojure.string.split.call(null,st,/\n/))));
-}));
-cljs.stacktrace.remove_ext = (function cljs$stacktrace$remove_ext(file){
-return clojure.string.replace.call(null,clojure.string.replace.call(null,clojure.string.replace.call(null,clojure.string.replace.call(null,file,/\.js$/,""),/\.cljs$/,""),/\.cljc$/,""),/\.clj$/,"");
-});
-/**
- * Given a cljs.source-map source map data structure map a generated line
- * and column back to the original line, column, and function called.
- */
-cljs.stacktrace.mapped_line_column_call = (function cljs$stacktrace$mapped_line_column_call(sms,file,line,column){
-var source_map = cljs.core.get.call(null,sms,cljs.core.symbol.call(null,clojure.string.replace.call(null,cljs.stacktrace.remove_ext.call(null,file),"/",".")));
-var get_best_column = ((function (source_map){
-return (function cljs$stacktrace$mapped_line_column_call_$_get_best_column(columns,column__$1){
-return cljs.core.last.call(null,(function (){var or__4131__auto__ = cljs.core.get.call(null,columns,cljs.core.last.call(null,cljs.core.filter.call(null,((function (source_map){
-return (function (p1__28284_SHARP_){
-return (p1__28284_SHARP_ <= (column__$1 - (1)));
-});})(source_map))
-,cljs.core.sort.call(null,cljs.core.keys.call(null,columns)))));
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return cljs.core.second.call(null,cljs.core.first.call(null,columns));
-}
-})());
-});})(source_map))
-;
-var adjust = ((function (source_map){
-return (function cljs$stacktrace$mapped_line_column_call_$_adjust(mapped){
-return cljs.core.vec.call(null,cljs.core.map.call(null,((function (source_map){
-return (function (p1__28285_SHARP_,p2__28286_SHARP_){
-return p1__28285_SHARP_.call(null,p2__28286_SHARP_);
-});})(source_map))
-,new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.inc,cljs.core.inc,cljs.core.identity], null),mapped));
-});})(source_map))
-;
-var default$ = new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [line,column,null], null);
-var temp__5718__auto__ = cljs.core.get.call(null,source_map,(line - (1)));
-if(cljs.core.truth_(temp__5718__auto__)){
-var columns = temp__5718__auto__;
-return adjust.call(null,cljs.core.map.call(null,get_best_column.call(null,columns,column),new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Keyword(null,"line","line",212345235),new cljs.core.Keyword(null,"col","col",-1959363084),new cljs.core.Keyword(null,"name","name",1843675177)], null)));
-} else {
-return default$;
-}
-});
-/**
- * Given opts and a canonicalized JavaScript stacktrace frame, return the
- *   ClojureScript frame.
- */
-cljs.stacktrace.mapped_frame = (function cljs$stacktrace$mapped_frame(p__28287,sms,opts){
-var map__28288 = p__28287;
-var map__28288__$1 = (((((!((map__28288 == null))))?(((((map__28288.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28288.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28288):map__28288);
-var function$ = cljs.core.get.call(null,map__28288__$1,new cljs.core.Keyword(null,"function","function",-2127255473));
-var file = cljs.core.get.call(null,map__28288__$1,new cljs.core.Keyword(null,"file","file",-1269645878));
-var line = cljs.core.get.call(null,map__28288__$1,new cljs.core.Keyword(null,"line","line",212345235));
-var column = cljs.core.get.call(null,map__28288__$1,new cljs.core.Keyword(null,"column","column",2078222095));
-var no_source_file_QMARK_ = ((cljs.core.not.call(null,file))?true:cljs.stacktrace.starts_with_QMARK_.call(null,file,"<"));
-var vec__28290 = ((no_source_file_QMARK_)?new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [line,column,null], null):cljs.stacktrace.mapped_line_column_call.call(null,sms,file,line,column));
-var line_SINGLEQUOTE_ = cljs.core.nth.call(null,vec__28290,(0),null);
-var column_SINGLEQUOTE_ = cljs.core.nth.call(null,vec__28290,(1),null);
-var call = cljs.core.nth.call(null,vec__28290,(2),null);
-var file_SINGLEQUOTE_ = ((no_source_file_QMARK_)?null:((cljs.stacktrace.ends_with_QMARK_.call(null,file,".js"))?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(cljs.core.subs.call(null,file,(0),(cljs.core.count.call(null,file) - (3)))),".cljs"].join(''):file));
-return new cljs.core.PersistentArrayMap(null, 5, [new cljs.core.Keyword(null,"function","function",-2127255473),function$,new cljs.core.Keyword(null,"call","call",-519999866),call,new cljs.core.Keyword(null,"file","file",-1269645878),((no_source_file_QMARK_)?["NO_SOURCE_FILE",(cljs.core.truth_(file)?[" ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(file)].join(''):null)].join(''):file_SINGLEQUOTE_),new cljs.core.Keyword(null,"line","line",212345235),line_SINGLEQUOTE_,new cljs.core.Keyword(null,"column","column",2078222095),column_SINGLEQUOTE_], null);
-});
-/**
- * Given a vector representing the canonicalized JavaScript stacktrace
- * return the ClojureScript stacktrace. The canonical stacktrace must be
- * in the form:
- * 
- *  [{:file <string>
- *    :function <string>
- *    :line <integer>
- *    :column <integer>}*]
- * 
- * :file must be a URL path (without protocol) relative to :output-dir or a
- * identifier delimited by angle brackets. The returned mapped stacktrace will
- * also contain :url entries to the original sources if it can be determined
- * from the classpath.
- */
-cljs.stacktrace.mapped_stacktrace = (function cljs$stacktrace$mapped_stacktrace(var_args){
-var G__28296 = arguments.length;
-switch (G__28296) {
-case 2:
-return cljs.stacktrace.mapped_stacktrace.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-case 3:
-return cljs.stacktrace.mapped_stacktrace.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.stacktrace.mapped_stacktrace.cljs$core$IFn$_invoke$arity$2 = (function (stacktrace,sms){
-return cljs.stacktrace.mapped_stacktrace.call(null,stacktrace,sms,null);
-});
-
-cljs.stacktrace.mapped_stacktrace.cljs$core$IFn$_invoke$arity$3 = (function (stacktrace,sms,opts){
-var call__GT_function = (function cljs$stacktrace$call__GT_function(x){
-if(cljs.core.truth_(new cljs.core.Keyword(null,"call","call",-519999866).cljs$core$IFn$_invoke$arity$1(x))){
-return cljs.core.PersistentHashMap.fromArrays([new cljs.core.Keyword(null,"function","function",-2127255473)],[new cljs.core.Keyword(null,"call","call",-519999866).cljs$core$IFn$_invoke$arity$1(x)]);
-} else {
-return cljs.core.PersistentArrayMap.EMPTY;
-}
-});
-var call_merge = (function cljs$stacktrace$call_merge(function$,call){
-return cljs.core.merge_with.call(null,(function (munged_fn_name,unmunged_call_name){
-if(cljs.core._EQ_.call(null,munged_fn_name,clojure.string.replace.call(null,cljs.core.munge.call(null,unmunged_call_name),".","$"))){
-return unmunged_call_name;
-} else {
-return munged_fn_name;
-}
-}),function$,call);
-});
-var mapped_frames = cljs.core.map.call(null,cljs.core.memoize.call(null,(function (p1__28293_SHARP_){
-return cljs.stacktrace.mapped_frame.call(null,p1__28293_SHARP_,sms,opts);
-})),stacktrace);
-return cljs.core.vec.call(null,cljs.core.map.call(null,call_merge,cljs.core.map.call(null,((function (mapped_frames){
-return (function (p1__28294_SHARP_){
-return cljs.core.dissoc.call(null,p1__28294_SHARP_,new cljs.core.Keyword(null,"call","call",-519999866));
-});})(mapped_frames))
-,mapped_frames),cljs.core.concat.call(null,cljs.core.rest.call(null,cljs.core.map.call(null,call__GT_function,mapped_frames)),new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.PersistentArrayMap.EMPTY], null))));
-});
-
-cljs.stacktrace.mapped_stacktrace.cljs$lang$maxFixedArity = 3;
-
-/**
- * Given a vector representing the canonicalized JavaScript stacktrace and a map
- *   of library names to decoded source maps, print the ClojureScript stacktrace .
- *   See mapped-stacktrace.
- */
-cljs.stacktrace.mapped_stacktrace_str = (function cljs$stacktrace$mapped_stacktrace_str(var_args){
-var G__28299 = arguments.length;
-switch (G__28299) {
-case 2:
-return cljs.stacktrace.mapped_stacktrace_str.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-case 3:
-return cljs.stacktrace.mapped_stacktrace_str.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.stacktrace.mapped_stacktrace_str.cljs$core$IFn$_invoke$arity$2 = (function (stacktrace,sms){
-return cljs.stacktrace.mapped_stacktrace_str.call(null,stacktrace,sms,null);
-});
-
-cljs.stacktrace.mapped_stacktrace_str.cljs$core$IFn$_invoke$arity$3 = (function (stacktrace,sms,opts){
-var sb__4661__auto__ = (new goog.string.StringBuffer());
-var _STAR_print_newline_STAR__orig_val__28300_28317 = cljs.core._STAR_print_newline_STAR_;
-var _STAR_print_fn_STAR__orig_val__28301_28318 = cljs.core._STAR_print_fn_STAR_;
-var _STAR_print_newline_STAR__temp_val__28302_28319 = true;
-var _STAR_print_fn_STAR__temp_val__28303_28320 = ((function (_STAR_print_newline_STAR__orig_val__28300_28317,_STAR_print_fn_STAR__orig_val__28301_28318,_STAR_print_newline_STAR__temp_val__28302_28319,sb__4661__auto__){
-return (function (x__4662__auto__){
-return sb__4661__auto__.append(x__4662__auto__);
-});})(_STAR_print_newline_STAR__orig_val__28300_28317,_STAR_print_fn_STAR__orig_val__28301_28318,_STAR_print_newline_STAR__temp_val__28302_28319,sb__4661__auto__))
-;
-cljs.core._STAR_print_newline_STAR_ = _STAR_print_newline_STAR__temp_val__28302_28319;
-
-cljs.core._STAR_print_fn_STAR_ = _STAR_print_fn_STAR__temp_val__28303_28320;
-
-try{var seq__28304_28321 = cljs.core.seq.call(null,cljs.stacktrace.mapped_stacktrace.call(null,stacktrace,sms,opts));
-var chunk__28305_28322 = null;
-var count__28306_28323 = (0);
-var i__28307_28324 = (0);
-while(true){
-if((i__28307_28324 < count__28306_28323)){
-var map__28312_28325 = cljs.core._nth.call(null,chunk__28305_28322,i__28307_28324);
-var map__28312_28326__$1 = (((((!((map__28312_28325 == null))))?(((((map__28312_28325.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28312_28325.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28312_28325):map__28312_28325);
-var function_28327 = cljs.core.get.call(null,map__28312_28326__$1,new cljs.core.Keyword(null,"function","function",-2127255473));
-var file_28328 = cljs.core.get.call(null,map__28312_28326__$1,new cljs.core.Keyword(null,"file","file",-1269645878));
-var line_28329 = cljs.core.get.call(null,map__28312_28326__$1,new cljs.core.Keyword(null,"line","line",212345235));
-var column_28330 = cljs.core.get.call(null,map__28312_28326__$1,new cljs.core.Keyword(null,"column","column",2078222095));
-cljs.core.println.call(null,"\t",[(cljs.core.truth_(function_28327)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(function_28327)," "].join(''):null),"(",cljs.core.str.cljs$core$IFn$_invoke$arity$1(file_28328),(cljs.core.truth_(line_28329)?[":",cljs.core.str.cljs$core$IFn$_invoke$arity$1(line_28329)].join(''):null),(cljs.core.truth_(column_28330)?[":",cljs.core.str.cljs$core$IFn$_invoke$arity$1(column_28330)].join(''):null),")"].join(''));
-
-
-var G__28331 = seq__28304_28321;
-var G__28332 = chunk__28305_28322;
-var G__28333 = count__28306_28323;
-var G__28334 = (i__28307_28324 + (1));
-seq__28304_28321 = G__28331;
-chunk__28305_28322 = G__28332;
-count__28306_28323 = G__28333;
-i__28307_28324 = G__28334;
-continue;
-} else {
-var temp__5720__auto___28335 = cljs.core.seq.call(null,seq__28304_28321);
-if(temp__5720__auto___28335){
-var seq__28304_28336__$1 = temp__5720__auto___28335;
-if(cljs.core.chunked_seq_QMARK_.call(null,seq__28304_28336__$1)){
-var c__4550__auto___28337 = cljs.core.chunk_first.call(null,seq__28304_28336__$1);
-var G__28338 = cljs.core.chunk_rest.call(null,seq__28304_28336__$1);
-var G__28339 = c__4550__auto___28337;
-var G__28340 = cljs.core.count.call(null,c__4550__auto___28337);
-var G__28341 = (0);
-seq__28304_28321 = G__28338;
-chunk__28305_28322 = G__28339;
-count__28306_28323 = G__28340;
-i__28307_28324 = G__28341;
-continue;
-} else {
-var map__28314_28342 = cljs.core.first.call(null,seq__28304_28336__$1);
-var map__28314_28343__$1 = (((((!((map__28314_28342 == null))))?(((((map__28314_28342.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__28314_28342.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__28314_28342):map__28314_28342);
-var function_28344 = cljs.core.get.call(null,map__28314_28343__$1,new cljs.core.Keyword(null,"function","function",-2127255473));
-var file_28345 = cljs.core.get.call(null,map__28314_28343__$1,new cljs.core.Keyword(null,"file","file",-1269645878));
-var line_28346 = cljs.core.get.call(null,map__28314_28343__$1,new cljs.core.Keyword(null,"line","line",212345235));
-var column_28347 = cljs.core.get.call(null,map__28314_28343__$1,new cljs.core.Keyword(null,"column","column",2078222095));
-cljs.core.println.call(null,"\t",[(cljs.core.truth_(function_28344)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(function_28344)," "].join(''):null),"(",cljs.core.str.cljs$core$IFn$_invoke$arity$1(file_28345),(cljs.core.truth_(line_28346)?[":",cljs.core.str.cljs$core$IFn$_invoke$arity$1(line_28346)].join(''):null),(cljs.core.truth_(column_28347)?[":",cljs.core.str.cljs$core$IFn$_invoke$arity$1(column_28347)].join(''):null),")"].join(''));
-
-
-var G__28348 = cljs.core.next.call(null,seq__28304_28336__$1);
-var G__28349 = null;
-var G__28350 = (0);
-var G__28351 = (0);
-seq__28304_28321 = G__28348;
-chunk__28305_28322 = G__28349;
-count__28306_28323 = G__28350;
-i__28307_28324 = G__28351;
-continue;
-}
-} else {
-}
-}
-break;
-}
-}finally {cljs.core._STAR_print_fn_STAR_ = _STAR_print_fn_STAR__orig_val__28301_28318;
-
-cljs.core._STAR_print_newline_STAR_ = _STAR_print_newline_STAR__orig_val__28300_28317;
-}
-return cljs.core.str.cljs$core$IFn$_invoke$arity$1(sb__4661__auto__);
-});
-
-cljs.stacktrace.mapped_stacktrace_str.cljs$lang$maxFixedArity = 3;
-
-
-//# sourceMappingURL=stacktrace.js.map?rel=1582560150591

docs/js/compiled/out/cljs/tools/reader.cljs

@@ -1,950 +0,0 @@
-;;   Copyright (c) Nicola Mometto, Rich Hickey & contributors.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns ^{:doc "A clojure reader in clojure"
-      :author "Bronsa"}
-  cljs.tools.reader
-  (:refer-clojure :exclude [read read-line read-string char read+string
-                            default-data-readers *default-data-reader-fn*
-                            *data-readers* *suppress-read*])
-  (:require-macros [cljs.tools.reader.reader-types :refer [log-source]])
-  (:require [cljs.tools.reader.reader-types :refer
-             [read-char unread peek-char indexing-reader?
-              get-line-number get-column-number get-file-name
-              string-push-back-reader]]
-            [cljs.tools.reader.impl.utils :refer
-             [char ex-info? whitespace? numeric? desugar-meta next-id namespace-keys second'
-              ReaderConditional reader-conditional reader-conditional? char-code]]
-            [cljs.tools.reader.impl.commons :refer
-             [number-literal? read-past match-number parse-symbol read-comment throwing-reader]]
-            [cljs.tools.reader.impl.errors :as err]
-            [goog.array :as garray]
-            [goog.string :as gstring])
-  (:import goog.string.StringBuffer))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; helpers
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(declare ^:private read*
-         macros dispatch-macros
-         ^:dynamic *data-readers*
-         ^:dynamic *default-data-reader-fn*
-         ^:dynamic *suppress-read*
-         default-data-readers)
-
-(defn- ^boolean macro-terminating? [ch]
-  (case ch
-    (\" \; \@ \^ \` \~ \( \) \[ \] \{ \} \\) true
-    false))
-
-(def sb (StringBuffer.))
-
-(defn- read-token
-  "Read in a single logical token from the reader"
-  [^not-native rdr kind initch]
-  (if (nil? initch)
-    (err/throw-eof-at-start rdr kind)
-    (do
-      (.clear sb)
-      (loop [ch initch]
-        (if (or (whitespace? ch)
-                (macro-terminating? ch)
-                (nil? ch))
-          (do
-            (when-not (nil? ch)
-              (unread rdr ch))
-            (.toString sb))
-          (do
-            (.append sb ch)
-            (recur (read-char rdr))))))))
-
-(declare read-tagged)
-
-(defn- read-dispatch
-  [^not-native rdr _ opts pending-forms]
-  (if-let [ch (read-char rdr)]
-    (if-let [dm (dispatch-macros ch)]
-      (dm rdr ch opts pending-forms)
-      (read-tagged (doto rdr (unread ch)) ch opts pending-forms)) ;; ctor reader is implemented as a tagged literal
-    (err/throw-eof-at-dispatch rdr)))
-
-(defn- read-unmatched-delimiter
-  [rdr ch opts pending-forms]
-  (err/throw-unmatch-delimiter rdr ch))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; readers
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(defn read-regex
-  [^not-native rdr ch opts pending-forms]
-  (let [sb (StringBuffer.)]
-    (loop [ch (read-char rdr)]
-      (if (identical? \" ch)
-        (re-pattern (str sb))
-        (if (nil? ch)
-          (err/throw-eof-reading rdr :regex sb)
-          (do
-            (.append sb ch )
-            (when (identical? \\ ch)
-              (let [ch (read-char rdr)]
-                (if (nil? ch)
-                  (err/throw-eof-reading rdr :regex sb))
-                (.append sb ch)))
-            (recur (read-char rdr))))))))
-
-(defn- read-unicode-char
-  ([token offset length base]
-     (let [l (+ offset length)]
-       (when-not (== (count token) l)
-         (err/throw-invalid-unicode-literal nil token))
-       (loop [i offset uc 0]
-         (if (== i l)
-           (js/String.fromCharCode uc)
-           (let [d (char-code (nth token i) base)]
-             (if (== d -1)
-               (err/throw-invalid-unicode-digit-in-token nil (nth token i) token)
-               (recur (inc i) (+ d (* uc base)))))))))
-
-  ([^not-native rdr initch base length exact?]
-     (loop [i 1 uc (char-code initch base)]
-       (if (== uc -1)
-         (err/throw-invalid-unicode-digit rdr initch)
-         (if-not (== i length)
-           (let [ch (peek-char rdr)]
-             (if (or (whitespace? ch)
-                     (macros ch)
-                     (nil? ch))
-               (if exact?
-                 (err/throw-invalid-unicode-len rdr i length)
-                 (js/String.fromCharCode uc))
-               (let [d (char-code ch base)]
-                 (read-char rdr)
-                 (if (== d -1)
-                   (err/throw-invalid-unicode-digit rdr ch)
-                   (recur (inc i) (+ d (* uc base)))))))
-           (js/String.fromCharCode uc))))))
-
-(def ^:private ^:const upper-limit (.charCodeAt \uD7ff 0))
-(def ^:private ^:const lower-limit (.charCodeAt \uE000 0))
-
-(defn- valid-octal? [token base]
-  (<= (js/parseInt token base) 0377))
-
-(defn- read-char*
-  "Read in a character literal"
-  [^not-native rdr backslash opts pending-forms]
-  (let [ch (read-char rdr)]
-    (if-not (nil? ch)
-      (let [token (if (or (macro-terminating? ch)
-                          (whitespace? ch))
-                    (str ch)
-                    (read-token rdr :character ch))
-            token-len (. token -length)]
-        (cond
-
-         (== 1 token-len)  (.charAt token 0) ;;; no char type - so can't ensure/cache char
-
-         (= token "newline") \newline
-         (= token "space") \space
-         (= token "tab") \tab
-         (= token "backspace") \backspace
-         (= token "formfeed") \formfeed
-         (= token "return") \return
-
-         (gstring/startsWith token "u")
-         (let [c (read-unicode-char token 1 4 16)
-               ic (.charCodeAt c 0)]
-           (if (and (> ic upper-limit)
-                    (< ic lower-limit))
-             (err/throw-invalid-character-literal rdr (.toString ic 16))
-             c))
-
-         (gstring/startsWith token "o")
-         (let [len (dec token-len)]
-           (if (> len 3)
-             (err/throw-invalid-octal-len rdr token)
-             (let [offset 1
-                   base 8
-                   uc (read-unicode-char token offset len base)]
-               (if-not (valid-octal? (subs token offset) base)
-                 (err/throw-bad-octal-number rdr)
-                 uc))))
-
-         :else (err/throw-unsupported-character rdr token)))
-      (err/throw-eof-in-character rdr))))
-
-(defn- starting-line-col-info [^not-native rdr]
-  (when (indexing-reader? rdr)
-    [(get-line-number rdr) (int (dec (get-column-number rdr)))]))
-
-(defn- ending-line-col-info [^not-native rdr]
-  (when (indexing-reader? rdr)
-    [(get-line-number rdr) (get-column-number rdr)]))
-
-(defonce ^:private READ_EOF (js/Object.))
-(defonce ^:private READ_FINISHED (js/Object.))
-
-(def ^:dynamic *read-delim* false)
-
-(defn- read-delimited-internal [kind delim rdr opts pending-forms]
-  (let [[start-line start-column] (starting-line-col-info rdr)
-        delim (char delim)]
-    (loop [a (transient [])]
-      (let [form (read* rdr false READ_EOF delim opts pending-forms)]
-        (if (identical? form READ_FINISHED)
-          (persistent! a)
-          (if (identical? form READ_EOF)
-            (err/throw-eof-delimited rdr kind start-line start-column (count a))
-            (recur (conj! a form))))))))
-
-(defn- read-delimited
-  "Reads and returns a collection ended with delim"
-  [kind delim rdr opts pending-forms]
-  (binding [*read-delim* true]
-    (read-delimited-internal kind delim rdr opts pending-forms)))
-
-(defn- read-list
-  "Read in a list, including its location if the reader is an indexing reader"
-  [rdr _ opts pending-forms]
-  (let [[start-line start-column] (starting-line-col-info rdr)
-        the-list (read-delimited :list \) rdr opts pending-forms)
-        [end-line end-column] (ending-line-col-info rdr)]
-    (with-meta (if (empty? the-list)
-                 '()
-                 (apply list the-list))
-      (when start-line
-        (merge
-         (when-let [file (get-file-name rdr)]
-           {:file file})
-         {:line start-line
-          :column start-column
-          :end-line end-line
-          :end-column end-column})))))
-
-(defn- read-vector
-  "Read in a vector, including its location if the reader is an indexing reader"
-  [rdr _ opts pending-forms]
-  (let [[start-line start-column] (starting-line-col-info rdr)
-        the-vector (read-delimited :vector \] rdr opts pending-forms)
-        [end-line end-column] (ending-line-col-info rdr)]
-    (with-meta the-vector
-      (when start-line
-        (merge
-         (when-let [file (get-file-name rdr)]
-           {:file file})
-         {:line start-line
-          :column start-column
-          :end-line end-line
-          :end-column end-column})))))
-
-(defn- read-map
-  "Read in a map, including its location if the reader is an indexing reader"
-  [rdr _ opts pending-forms]
-  (let [[start-line start-column] (starting-line-col-info rdr)
-        the-map (read-delimited :map \} rdr opts pending-forms)
-        map-count (count the-map)
-        ks (take-nth 2 the-map)
-        key-set (set ks)
-        [end-line end-column] (ending-line-col-info rdr)]
-    (when (odd? map-count)
-      (err/throw-odd-map rdr start-line start-column the-map))
-    (when-not (= (count key-set) (count ks))
-      (err/throw-dup-keys rdr :map ks))
-    (with-meta
-      (if (<= map-count (* 2 (.-HASHMAP-THRESHOLD cljs.core/PersistentArrayMap)))
-        (.fromArray cljs.core/PersistentArrayMap (to-array the-map) true true)
-        (.fromArray cljs.core/PersistentHashMap (to-array the-map) true))
-      (when start-line
-        (merge
-         (when-let [file (get-file-name rdr)]
-           {:file file})
-         {:line start-line
-          :column start-column
-          :end-line end-line
-          :end-column end-column})))))
-
-(defn- read-number
-  [^not-native rdr initch]
-  (loop [sb (doto (StringBuffer.) (.append initch))
-         ch (read-char rdr)]
-    (if (or (whitespace? ch) (macros ch) (nil? ch))
-      (let [s (str sb)]
-        (unread rdr ch)
-        (or (match-number s)
-            (err/throw-invalid-number rdr s)))
-      (recur (doto sb (.append ch)) (read-char rdr)))))
-
-(defn- escape-char [sb ^not-native rdr]
-  (let [ch (read-char rdr)]
-    (case ch
-      \t "\t"
-      \r "\r"
-      \n "\n"
-      \\ "\\"
-      \" "\""
-      \b "\b"
-      \f "\f"
-      \u (let [ch (read-char rdr)]
-           (if (== -1 (js/parseInt (int ch) 16))
-             (err/throw-invalid-unicode-escape rdr ch)
-             (read-unicode-char rdr ch 16 4 true)))
-      (if (numeric? ch)
-        (let [ch (read-unicode-char rdr ch 8 3 false)]
-          (if (> (int ch) 0377)
-            (err/throw-bad-octal-number rdr)
-            ch))
-        (err/throw-bad-escape-char rdr ch)))))
-
-(defn- read-string*
-  [^not-native reader _ opts pending-forms]
-  (loop [sb (StringBuffer.)
-         ch (read-char reader)]
-    (if (nil? ch)
-      (err/throw-eof-reading reader :string \" sb)
-      (case ch
-        \\ (recur (doto sb (.append (escape-char sb reader)))
-             (read-char reader))
-        \" (str sb)
-        (recur (doto sb (.append ch)) (read-char reader))))))
-
-(defn- loc-info [rdr line column]
-  (when-not (nil? line)
-    (let [file (get-file-name rdr)
-          filem (when-not (nil? file) {:file file})
-          [end-line end-column] (ending-line-col-info rdr)
-          lcm {:line line
-               :column column
-               :end-line end-line
-               :end-column end-column}]
-      (merge filem lcm))))
-
-(defn- read-symbol
-  [rdr initch]
-  (let [[line column] (starting-line-col-info rdr)
-        token (read-token rdr :symbol initch)]
-    (when-not (nil? token)
-      (case token
-
-        ;; special symbols
-        "nil" nil
-        "true" true
-        "false" false
-        "/" '/
-
-        (let [^not-native p (parse-symbol token)]
-          (if-not (nil? p)
-            (let [^not-native sym (symbol (-nth p 0) (-nth p 1))]
-              (-with-meta sym (loc-info rdr line column)))
-            (err/throw-invalid rdr :symbol token)))))))
-
-(def ^:dynamic *alias-map*
-  "Map from ns alias to ns, if non-nil, it will be used to resolve read-time
-   ns aliases.
-
-   Defaults to nil"
-  nil)
-
-(defn- resolve-alias [sym]
-  (get *alias-map* sym))
-
-(defn- resolve-ns [sym]
-  (or (resolve-alias sym)
-      (when-let [ns (find-ns sym)]
-        (symbol (ns-name ns)))))
-
-(defn- read-keyword
-  [^not-native reader initch opts pending-forms]
-  (let [ch (read-char reader)]
-    (if-not (whitespace? ch)
-      (let [token (read-token reader :keyword ch)
-            ^not-native s (parse-symbol token)]
-        (if-not (nil? s)
-          (let [ns (-nth s 0)
-                name (-nth s 1)]
-            (if (identical? \: (.charAt token 0))
-              (if-not (nil? ns)
-                (if-let [ns (resolve-alias (symbol (subs ns 1)))]
-                  (keyword (str ns) name)
-                  (err/throw-invalid reader :keyword (str \: token)))
-                (if-let [ns *ns*]
-                  (keyword (str ns) (subs name 1))
-                  (err/reader-error reader "Invalid token: :" token)))
-              (keyword ns name)))
-          (err/throw-invalid reader :keyword (str \: token))))
-      (err/throw-single-colon reader))))
-
-(defn- wrapping-reader
-  "Returns a function which wraps a reader in a call to sym"
-  [sym]
-  (fn [rdr _ opts pending-forms]
-    (list sym (read* rdr true nil opts pending-forms))))
-
-(defn- read-meta
-  "Read metadata and return the following object with the metadata applied"
-  [rdr _ opts pending-forms]
-  (log-source rdr
-    (let [[line column] (starting-line-col-info rdr)
-          m (desugar-meta (read* rdr true nil opts pending-forms))]
-      (when-not (map? m)
-        (err/throw-bad-metadata rdr m))
-      (let [o (read* rdr true nil opts pending-forms)]
-        (if (implements? IMeta o)
-          (let [m (if (and line (seq? o))
-                    (assoc m :line line :column column)
-                    m)]
-            (if (implements? IWithMeta o)
-              (with-meta o (merge (meta o) m))
-              (reset-meta! o m)))
-          (err/throw-bad-metadata-target rdr o))))))
-
-(defn- read-set
-  [rdr _ opts pending-forms]
-  (let [[start-line start-column] (starting-line-col-info rdr)
-        ;; subtract 1 from start-column so it includes the # in the leading #{
-        start-column (if start-column (int (dec start-column)))
-        coll (read-delimited :set \} rdr opts pending-forms)
-        the-set (set coll)
-        [end-line end-column] (ending-line-col-info rdr)]
-      (when-not (= (count coll) (count the-set))
-        (err/reader-error rdr (err/throw-dup-keys rdr :set coll)))
-      (with-meta the-set
-        (when start-line
-          (merge
-           (when-let [file (get-file-name rdr)]
-             {:file file})
-           {:line start-line
-            :column start-column
-            :end-line end-line
-            :end-column end-column})))))
-
-(defn- read-discard
-  "Read and discard the first object from rdr"
-  [rdr _ opts pending-forms]
-  (doto rdr
-    (read* true nil opts pending-forms)))
-
-(defn- read-symbolic-value
-  [rdr _ opts pending-forms]
-  (let [sym (read* rdr true nil opts pending-forms)]
-    (case sym
-
-      NaN js/Number.NaN
-      -Inf js/Number.NEGATIVE_INFINITY
-      Inf js/Number.POSITIVE_INFINITY
-
-      (err/reader-error rdr (str "Invalid token: ##" sym)))))
-
-(def ^:private RESERVED_FEATURES #{:else :none})
-
-(defn- has-feature?
-  [rdr feature opts]
-  (if (keyword? feature)
-    (or (= :default feature) (contains? (get opts :features) feature))
-    (err/reader-error rdr "Feature should be a keyword: " feature)))
-
-(defn- check-eof-error
-  [form rdr first-line]
-  (when (identical? form READ_EOF)
-    (err/throw-eof-error rdr (and (< first-line 0) first-line))))
-
-(defn- check-reserved-features
-  [rdr form]
-  (when (get RESERVED_FEATURES form)
-    (err/reader-error rdr "Feature name " form " is reserved")))
-
-(defn- check-invalid-read-cond
-  [form rdr first-line]
-  (when (identical? form READ_FINISHED)
-    (if (< first-line 0)
-      (err/reader-error rdr "read-cond requires an even number of forms")
-      (err/reader-error rdr "read-cond starting on line " first-line " requires an even number of forms"))))
-
-(defn- read-suppress
-  "Read next form and suppress. Return nil or READ_FINISHED."
-  [first-line rdr opts pending-forms]
-  (binding [*suppress-read* true]
-    (let [form (read* rdr false READ_EOF \) opts pending-forms)]
-      (check-eof-error form rdr first-line)
-      (when (identical? form READ_FINISHED)
-        READ_FINISHED))))
-
-(defonce ^:private NO_MATCH (js/Object.))
-
-(defn- match-feature
-  "Read next feature. If matched, read next form and return.
-   Otherwise, read and skip next form, returning READ_FINISHED or nil."
-  [first-line rdr opts pending-forms]
-  (let [feature (read* rdr false READ_EOF \) opts pending-forms)]
-    (check-eof-error feature rdr first-line)
-    (if (= feature READ_FINISHED)
-      READ_FINISHED
-      (do
-        (check-reserved-features rdr feature)
-        (if (has-feature? rdr feature opts)
-          ;; feature matched, read selected form
-          (doto (read* rdr false READ_EOF \) opts pending-forms)
-            (check-eof-error rdr first-line)
-            (check-invalid-read-cond rdr first-line))
-          ;; feature not matched, ignore next form
-          (or (read-suppress first-line rdr opts pending-forms)
-              NO_MATCH))))))
-
-(defn- read-cond-delimited
-  [rdr splicing opts pending-forms]
-  (let [first-line (if (indexing-reader? rdr) (get-line-number rdr) -1)
-        result (loop [matched NO_MATCH
-                      finished nil]
-                 (cond
-                  ;; still looking for match, read feature+form
-                  (identical? matched NO_MATCH)
-                  (let [match (match-feature first-line rdr opts pending-forms)]
-                    (if (identical? match READ_FINISHED)
-                      READ_FINISHED
-                      (recur match nil)))
-
-                  ;; found match, just read and ignore the rest
-                  (not (identical? finished READ_FINISHED))
-                  (recur matched (read-suppress first-line rdr opts pending-forms))
-
-                  :else
-                  matched))]
-    (if (identical? result READ_FINISHED)
-      rdr
-      (if splicing
-        (do
-          (if (implements? ISequential result)
-            (do
-              (garray/insertArrayAt pending-forms (to-array result) 0)
-              rdr)
-            (err/reader-error rdr "Spliced form list in read-cond-splicing must implement ISequential")))
-        result))))
-
-(defn- read-cond
-  [^not-native rdr _ opts pending-forms]
-  (when (not (and opts (#{:allow :preserve} (:read-cond opts))))
-    (throw (ex-info "Conditional read not allowed"
-                    {:type :runtime-exception})))
-  (if-let [ch (read-char rdr)]
-    (let [splicing (= ch \@)
-          ch (if splicing (read-char rdr) ch)]
-      (when splicing
-        (when-not *read-delim*
-          (err/reader-error rdr "cond-splice not in list")))
-      (if-let [ch (if (whitespace? ch) (read-past whitespace? rdr) ch)]
-        (if (not= ch \()
-          (throw (ex-info "read-cond body must be a list"
-                          {:type :runtime-exception}))
-          (binding [*suppress-read* (or *suppress-read* (= :preserve (:read-cond opts)))]
-            (if *suppress-read*
-              (reader-conditional (read-list rdr ch opts pending-forms) splicing)
-              (read-cond-delimited rdr splicing opts pending-forms))))
-        (err/throw-eof-in-character rdr)))
-    (err/throw-eof-in-character rdr)))
-
-(def ^:private ^:dynamic arg-env nil)
-
-(defn- garg
-  "Get a symbol for an anonymous ?argument?"
-  [n]
-  (symbol (str (if (== -1 n) "rest" (str "p" n))
-               "__" (next-id) "#")))
-
-(defn- read-fn
-  [rdr _ opts pending-forms]
-  (if arg-env
-    (throw (ex-info "Nested #()s are not allowed" {:type :illegal-state})))
-  (binding [arg-env (sorted-map)]
-    (let [form (read* (doto rdr (unread \()) true nil opts pending-forms) ;; this sets bindings
-          rargs (rseq arg-env)
-          args (if rargs
-                 (let [higharg (key (first rargs))]
-                   (let [args (loop [i 1 args (transient [])]
-                                (if (> i higharg)
-                                  (persistent! args)
-                                  (recur (inc i) (conj! args (or (get arg-env i)
-                                                                 (garg i))))))
-                         args (if (arg-env -1)
-                                (conj args '& (arg-env -1))
-                                args)]
-                     args))
-                 [])]
-      (list 'fn* args form))))
-
-(defn- register-arg
-  "Registers an argument to the arg-env"
-  [n]
-  (if arg-env
-    (if-let [ret (arg-env n)]
-      ret
-      (let [g (garg n)]
-        (set! arg-env (assoc arg-env n g))
-        g))
-    (throw (ex-info "Arg literal not in #()"
-                    {:type :illegal-state})))) ;; should never hit this
-
-(declare read-symbol)
-
-(defn- read-arg
-  [^not-native rdr pct opts pending-forms]
-  (if (nil? arg-env)
-    (read-symbol rdr pct)
-    (let [ch (peek-char rdr)]
-      (cond
-       (or (whitespace? ch)
-           (macro-terminating? ch)
-           (nil? ch))
-       (register-arg 1)
-
-       (= ch \&)
-       (do (read-char rdr)
-           (register-arg -1))
-
-       :else
-       (let [n (read* rdr true nil opts pending-forms)]
-         (if-not (integer? n)
-           (throw (ex-info "Arg literal must be %, %& or %integer"
-                           {:type :illegal-state}))
-           (register-arg n)))))))
-
-(def ^:private ^:dynamic gensym-env nil)
-
-(defn- read-unquote
-  [^not-native rdr comma opts pending-forms]
-  (if-let [ch (peek-char rdr)]
-    (if (= \@ ch)
-      ((wrapping-reader 'clojure.core/unquote-splicing) (doto rdr read-char) \@ opts pending-forms)
-      ((wrapping-reader 'clojure.core/unquote) rdr \~ opts pending-forms))))
-
-(declare syntax-quote*)
-
-(defn- unquote-splicing? [form]
-  (and (seq? form)
-       (= (first form) 'clojure.core/unquote-splicing)))
-
-(defn- unquote? [form]
-  (and (seq? form)
-       (= (first form) 'clojure.core/unquote)))
-
-(defn- expand-list
-  "Expand a list by resolving its syntax quotes and unquotes"
-  [s]
-  (loop [s (seq s) r (transient [])]
-    (if s
-      (let [item (first s)
-            ret (conj! r
-                       (cond
-                        (unquote? item)          (list 'clojure.core/list (second item))
-                        (unquote-splicing? item) (second item)
-                        :else                    (list 'clojure.core/list (syntax-quote* item))))]
-        (recur (next s) ret))
-      (seq (persistent! r)))))
-
-(defn- flatten-map
-  "Flatten a map into a seq of alternate keys and values"
-  [form]
-  (loop [s (seq form) key-vals (transient [])]
-    (if s
-      (let [e (first s)]
-        (recur (next s) (-> key-vals
-                          (conj! (key e))
-                          (conj! (val e)))))
-      (seq (persistent! key-vals)))))
-
-(defn- register-gensym [sym]
-  (if-not gensym-env
-    (throw (ex-info "Gensym literal not in syntax-quote"
-                    {:type :illegal-state})))
-  (or (get gensym-env sym)
-      (let [gs (symbol (str (subs (name sym)
-                                  0 (dec (count (name sym))))
-                            "__" (next-id) "__auto__"))]
-        (set! gensym-env (assoc gensym-env sym gs))
-        gs)))
-
-(defn- add-meta [form ret]
-  (if (and (implements? IWithMeta form)
-           (seq (dissoc (meta form) :line :column :end-line :end-column :file :source)))
-    (list 'cljs.core/with-meta ret (syntax-quote* (meta form)))
-    ret))
-
-(defn- syntax-quote-coll [type coll]
-  (let [res (list 'cljs.core/sequence
-                  (cons 'cljs.core/concat
-                        (expand-list coll)))]
-    (if type
-      (list 'cljs.core/apply type res)
-      res)))
-
-(defn map-func
-  "Decide which map type to use, array-map if less than 16 elements"
-  [coll]
-  (if (>= (count coll) 16)
-    'cljs.core/hash-map
-    'cljs.core/array-map))
-
-(defn bool? [x]
-  (or (instance? js/Boolean x)
-      (true? x)
-      (false? x)))
-
-(defn ^:dynamic resolve-symbol
-  "Resolve a symbol s into its fully qualified namespace version"
-  [s]
-  (throw (ex-info "resolve-symbol is not implemented" {:sym s})))
-
-(defn- syntax-quote* [form]
-  (->>
-   (cond
-    (special-symbol? form) (list 'quote form)
-
-    (symbol? form)
-    (list 'quote
-          (if (and (not (namespace form))
-                   (gstring/endsWith (name form) "#"))
-            (register-gensym form)
-            (let [sym (str form)]
-              (if (gstring/endsWith sym ".")
-                (let [csym (symbol (subs sym 0 (dec (count sym))))]
-                  (symbol (str (resolve-symbol csym) ".")))
-                (resolve-symbol form)))))
-
-    (unquote? form) (second form)
-    (unquote-splicing? form) (throw (ex-info "unquote-splice not in list"
-                                             {:type :illegal-state}))
-
-    (coll? form)
-    (cond
-
-     (implements? IRecord form) form
-     (map? form) (syntax-quote-coll (map-func form) (flatten-map form))
-     (vector? form) (list 'cljs.core/vec (syntax-quote-coll nil form))
-     (set? form) (syntax-quote-coll 'cljs.core/hash-set form)
-     (or (seq? form) (list? form))
-     (let [seq (seq form)]
-       (if seq
-         (syntax-quote-coll nil seq)
-         '(cljs.core/list)))
-
-     :else (throw (ex-info "Unknown Collection type"
-                           {:type :unsupported-operation})))
-
-    (or (keyword? form)
-        (number? form)
-        (string? form)
-        (nil? form)
-        (bool? form)
-        (instance? js/RegExp form))
-    form
-
-    :else (list 'quote form))
-   (add-meta form)))
-
-(defn- read-syntax-quote
-  [rdr backquote opts pending-forms]
-  (binding [gensym-env {}]
-    (-> (read* rdr true nil opts pending-forms)
-      syntax-quote*)))
-
-(defn- read-namespaced-map
-  [rdr _ opts pending-forms]
-  (let [token (read-token rdr :namespaced-map (read-char rdr))]
-    (if-let [ns (cond
-                  (= token ":")
-                  (ns-name *ns*)
-
-                  (= \: (first token))
-                  (some-> token (subs 1) parse-symbol second' symbol resolve-ns)
-
-                  :else
-                  (some-> token parse-symbol second'))]
-
-      (let [ch (read-past whitespace? rdr)]
-        (if (identical? ch \{)
-          (let [items (read-delimited :namespaced-map \} rdr opts pending-forms)]
-            (when (odd? (count items))
-              (err/throw-odd-map rdr nil nil items))
-            (let [keys (namespace-keys (str ns) (take-nth 2 items))
-                  vals (take-nth 2 (rest items))]
-              (when-not (= (count (set keys)) (count keys))
-                (err/throw-dup-keys rdr :namespaced-map keys))
-              (zipmap keys vals)))
-              (err/throw-ns-map-no-map rdr token)))
-          (err/throw-bad-ns rdr token))))
-
-(defn- macros [ch]
-  (case ch
-    \" read-string*
-    \: read-keyword
-    \; read-comment
-    \' (wrapping-reader 'quote)
-    \@ (wrapping-reader 'clojure.core/deref)
-    \^ read-meta
-    \` read-syntax-quote
-    \~ read-unquote
-    \( read-list
-    \) read-unmatched-delimiter
-    \[ read-vector
-    \] read-unmatched-delimiter
-    \{ read-map
-    \} read-unmatched-delimiter
-    \\ read-char*
-    \% read-arg
-    \# read-dispatch
-    nil))
-
-(defn- dispatch-macros [ch]
-  (case ch
-    \^ read-meta                ;; deprecated
-    \' (wrapping-reader 'var)
-    \( read-fn
-    \{ read-set
-    \< (throwing-reader "Unreadable form")
-    \= (throwing-reader "read-eval not supported")
-    \" read-regex
-    \! read-comment
-    \_ read-discard
-    \? read-cond
-    \: read-namespaced-map
-    \# read-symbolic-value
-    nil))
-
-(defn- read-tagged [^not-native rdr initch opts pending-forms]
-  (let [tag (read* rdr true nil opts pending-forms)]
-    (if-not (symbol? tag)
-      (err/throw-bad-reader-tag rdr tag))
-    (if *suppress-read*
-      (tagged-literal tag (read* rdr true nil opts pending-forms))
-      (if-let [f (or (*data-readers* tag)
-                     (default-data-readers tag))]
-        (f (read* rdr true nil opts pending-forms))
-        (if-let [f *default-data-reader-fn*]
-          (f tag (read* rdr true nil opts pending-forms))
-          (err/throw-unknown-reader-tag rdr tag))))))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Public API
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(def ^:dynamic *data-readers*
-  "Map from reader tag symbols to data reader Vars.
-  Reader tags without namespace qualifiers are reserved for Clojure.
-  This light version of tools.reader has no implementation for default
-  reader tags such as #inst and #uuid."
-  {})
-
-(def ^:dynamic *default-data-reader-fn*
-  "When no data reader is found for a tag and *default-data-reader-fn*
-  is non-nil, it will be called with two arguments, the tag and the value.
-  If *default-data-reader-fn* is nil (the default value), an exception
-  will be thrown for the unknown tag."
-  nil)
-
-(def ^:dynamic *suppress-read* false)
-
-(def default-data-readers
-  "Default map of data reader functions provided by Clojure.
-  May be overridden by binding *data-readers*"
-  {})
-
-(defn- read*-internal
-  [^not-native reader ^boolean eof-error? sentinel return-on opts pending-forms]
-  (loop []
-    (log-source reader
-      (if-not ^boolean (garray/isEmpty pending-forms)
-        (let [form (aget pending-forms 0)]
-          (garray/removeAt pending-forms 0)
-          form)
-        (let [ch (read-char reader)]
-          (cond
-            (whitespace? ch) (recur)
-            (nil? ch) (if eof-error? (err/throw-eof-error reader nil) sentinel)
-            (identical? ch return-on) READ_FINISHED
-            (number-literal? reader ch) (read-number reader ch)
-            :else (let [f (macros ch)]
-                    (if-not (nil? f)
-                      (let [res (f reader ch opts pending-forms)]
-                        (if (identical? res reader)
-                          (recur)
-                          res))
-                      (read-symbol reader ch)))))))))
-
-(defn- read*
-  ([reader eof-error? sentinel opts pending-forms]
-     (read* reader eof-error? sentinel nil opts pending-forms))
-  ([^not-native reader eof-error? sentinel return-on opts pending-forms]
-     (try
-       (read*-internal reader eof-error? sentinel return-on opts pending-forms)
-       (catch js/Error e
-         (if (ex-info? e)
-           (let [d (ex-data e)]
-             (if (= :reader-exception (:type d))
-               (throw e)
-               (throw (ex-info (.-message e)
-                               (merge {:type :reader-exception}
-                                      d
-                                      (if (indexing-reader? reader)
-                                        {:line   (get-line-number reader)
-                                         :column (get-column-number reader)
-                                         :file   (get-file-name reader)}))
-                               e))))
-           (throw (ex-info (.-message e)
-                           (merge {:type :reader-exception}
-                                  (if (indexing-reader? reader)
-                                    {:line   (get-line-number reader)
-                                     :column (get-column-number reader)
-                                     :file   (get-file-name reader)}))
-                           e)))))))
-
-(defn read
-  "Reads the first object from an IPushbackReader.
-   Returns the object read. If EOF, throws if eof-error? is true.
-   Otherwise returns sentinel. If no stream is providen, *in* will be used.
-
-   Opts is a persistent map with valid keys:
-    :read-cond - :allow to process reader conditionals, or
-                 :preserve to keep all branches
-    :features - persistent set of feature keywords for reader conditionals
-    :eof - on eof, return value unless :eofthrow, then throw.
-           if not specified, will throw
-
-   To read data structures only, use clojure.tools.reader.edn/read
-
-   Note that the function signature of clojure.tools.reader/read and
-   clojure.tools.reader.edn/read is not the same for eof-handling"
-  {:arglists '([reader] [opts reader] [reader eof-error? eof-value])}
-  ([reader] (read reader true nil))
-  ([{eof :eof :as opts :or {eof :eofthrow}} reader] (read* reader (= eof :eofthrow) eof nil opts (to-array [])))
-  ([reader eof-error? sentinel] (read* reader eof-error? sentinel nil {} (to-array []))))
-
-(defn read-string
-  "Reads one object from the string s.
-   Returns nil when s is nil or empty.
-
-   To read data structures only, use clojure.tools.reader.edn/read-string
-
-   Note that the function signature of clojure.tools.reader/read-string and
-   clojure.tools.reader.edn/read-string is not the same for eof-handling"
-  ([s]
-     (read-string {} s))
-  ([opts s]
-     (when (and s (not (identical? s "")))
-       (read opts (string-push-back-reader s)))))
-
-(defn read+string
-  "Like read, and taking the same args. reader must be a SourceLoggingPushbackReader.
-  Returns a vector containing the object read and the (whitespace-trimmed) string read."
-  ([reader & args]
-   (let [buf (fn [reader] (str (:buffer @(.-frames reader))))
-         offset (count (buf reader))
-         o (log-source reader (if (= 1 (count args))
-                                (read (first args) reader)
-                                (apply read reader args)))
-         s (.trim (subs (buf reader) offset))]
-     [o s])))

docs/js/compiled/out/cljs/tools/reader/edn.cljs

@@ -1,448 +0,0 @@
-;;   Copyright (c) Nicola Mometto, Rich Hickey & contributors.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns ^{:doc "An EDN reader in clojure"
-      :author "Bronsa"}
-  cljs.tools.reader.edn
-  (:refer-clojure :exclude [read read-string char default-data-readers])
-  (:require [cljs.tools.reader.impl.errors :as err]
-            [cljs.tools.reader.reader-types :refer
-             [read-char unread peek-char indexing-reader?
-              get-line-number get-column-number get-file-name string-push-back-reader]]
-            [cljs.tools.reader.impl.utils :refer
-             [char ex-info? whitespace? numeric? desugar-meta namespace-keys second' char-code]]
-            [cljs.tools.reader.impl.commons :refer
-             [number-literal? read-past match-number parse-symbol read-comment throwing-reader]]
-            [cljs.tools.reader :refer [default-data-readers]]
-            [goog.string :as gstring])
-  (:import goog.string.StringBuffer))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; helpers
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(declare read macros dispatch-macros)
-
-(defn- ^boolean macro-terminating? [ch]
-  (and (not (identical? \# ch))
-       (not (identical? \' ch))
-       (not (identical? \: ch))
-       (macros ch)))
-
-(defn- ^boolean not-constituent? [ch]
-  (or (identical? \@ ch)
-      (identical? \` ch)
-      (identical? \~ ch)))
-
-(defn- read-token
-  ([rdr kind initch]
-     (read-token rdr kind initch true))
-  ([rdr kind initch validate-leading?]
-     (cond
-      (not initch)
-      (err/throw-eof-at-start rdr kind)
-
-      (and validate-leading?
-           (not-constituent? initch))
-      (err/throw-bad-char rdr kind initch)
-
-      :else
-      (loop [sb (StringBuffer.)
-             ch (do (unread rdr initch) initch)]
-        (if (or (whitespace? ch)
-                (macro-terminating? ch)
-                (nil? ch))
-          (str sb)
-          (if (not-constituent? ch)
-            (err/throw-bad-char rdr kind ch)
-            (recur (doto sb (.append (read-char rdr))) (peek-char rdr))))))))
-
-(declare read-tagged)
-
-(defn- read-dispatch
-  [rdr _ opts]
-  (if-let [ch (read-char rdr)]
-    (if-let [dm (dispatch-macros ch)]
-      (dm rdr ch opts)
-      (if-let [obj (read-tagged (doto rdr (unread ch)) ch opts)]
-        obj
-        (err/throw-no-dispatch rdr ch)))
-    (err/throw-eof-at-dispatch rdr)))
-
-(defn- read-unmatched-delimiter
-  [rdr ch opts]
-  (err/throw-unmatch-delimiter rdr ch))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; readers
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(defn- read-unicode-char
-  ([token offset length base]
-     (let [l (+ offset length)]
-       (when-not (== (count token) l)
-         (err/throw-invalid-unicode-literal nil token))
-       (loop [i offset uc 0]
-         (if (== i l)
-           (js/String.fromCharCode uc)
-           (let [d (char-code (nth token i) base)]
-             (if (== d -1)
-               (err/throw-invalid-unicode-digit-in-token nil (nth token i) token)
-               (recur (inc i) (+ d (* uc base)))))))))
-
-  ([rdr initch base length exact?]
-     (loop [i 1 uc (char-code initch base)]
-       (if (== uc -1)
-         (err/throw-invalid-unicode-digit rdr initch)
-         (if-not (== i length)
-           (let [ch (peek-char rdr)]
-             (if (or (whitespace? ch)
-                     (macros ch)
-                     (nil? ch))
-               (if exact?
-                 (err/throw-invalid-unicode-len rdr i length)
-                 (js/String.fromCharCode uc))
-               (let [d (char-code ch base)]
-                 (read-char rdr)
-                 (if (== d -1)
-                   (err/throw-invalid-unicode-digit rdr ch)
-                   (recur (inc i) (+ d (* uc base)))))))
-           (js/String.fromCharCode uc))))))
-
-(def ^:private ^:const upper-limit (.charCodeAt \uD7ff 0))
-(def ^:private ^:const lower-limit (.charCodeAt \uE000 0))
-
-(defn- read-char*
-  [rdr backslash opts]
-  (let [ch (read-char rdr)]
-    (if-not (nil? ch)
-      (let [token (if (or (macro-terminating? ch)
-                          (not-constituent? ch)
-                          (whitespace? ch))
-                    (str ch)
-                    (read-token rdr :character ch false))
-            token-len (count token)]
-        (cond
-
-         (== 1 token-len)  (nth token 0)
-
-         (identical? token "newline") \newline
-         (identical? token "space") \space
-         (identical? token "tab") \tab
-         (identical? token "backspace") \backspace
-         (identical? token "formfeed") \formfeed
-         (identical? token "return") \return
-
-         (gstring/startsWith token "u")
-         (let [c (read-unicode-char token 1 4 16)
-               ic (.charCodeAt c)]
-           (if (and (> ic upper-limit)
-                    (< ic lower-limit))
-             (err/throw-invalid-character-literal rdr (.toString ic 16))
-             c))
-
-         (gstring/startsWith token "o")
-         (let [len (dec token-len)]
-           (if (> len 3)
-             (err/throw-invalid-octal-len rdr token)
-             (let [uc (read-unicode-char token 1 len 8)]
-               (if (> (int uc) 0377)
-                 (err/throw-bad-octal-number rdr)
-                 uc))))
-
-         :else (err/throw-unsupported-character rdr token)))
-      (err/throw-eof-in-character rdr))))
-
-(defn ^:private starting-line-col-info [rdr]
-  (when (indexing-reader? rdr)
-    [(get-line-number rdr) (int (dec (int (get-column-number rdr))))]))
-
-(defn- read-delimited
-  [kind delim rdr opts]
-  (let [[start-line start-column] (starting-line-col-info rdr)
-        delim (char delim)]
-    (loop [a (transient [])]
-      (let [ch (read-past whitespace? rdr)]
-        (when-not ch
-          (err/throw-eof-delimited rdr kind start-line start-column (count a)))
-        (if (= delim (char ch))
-          (persistent! a)
-          (if-let [macrofn (macros ch)]
-            (let [mret (macrofn rdr ch opts)]
-              (recur (if-not (identical? mret rdr) (conj! a mret) a)))
-            (let [o (read (doto rdr (unread ch)) true nil opts)]
-              (recur (if-not (identical? o rdr) (conj! a o) a)))))))))
-
-(defn- read-list
-  [rdr _ opts]
-  (let [the-list (read-delimited :list \) rdr opts)]
-    (if (empty? the-list)
-      '()
-      (apply list the-list))))
-
-(defn- read-vector
-  [rdr _ opts]
-  (read-delimited :vector \] rdr opts))
-
-
-(defn- read-map
-  [rdr _ opts]
-  (let [[start-line start-column] (starting-line-col-info rdr)
-        the-map (read-delimited :map \} rdr opts)
-        map-count (count the-map)
-        ks (take-nth 2 the-map)
-        key-set (set ks)]
-    (when (odd? map-count)
-      (err/throw-odd-map rdr start-line start-column the-map))
-    (when-not (= (count key-set) (count ks))
-      (err/throw-dup-keys rdr :map ks))
-    (if (<= map-count (* 2 (.-HASHMAP-THRESHOLD cljs.core/PersistentArrayMap)))
-      (.fromArray cljs.core/PersistentArrayMap (to-array the-map) true true)
-      (.fromArray cljs.core/PersistentHashMap (to-array the-map) true))))
-
-(defn- read-number
-  [rdr initch opts]
-  (loop [sb (doto (StringBuffer.) (.append initch))
-         ch (read-char rdr)]
-    (if (or (whitespace? ch) (macros ch) (nil? ch))
-      (let [s (str sb)]
-        (unread rdr ch)
-        (or (match-number s)
-            (err/throw-invalid-number rdr s)))
-      (recur (doto sb (.append ch)) (read-char rdr)))))
-
-(defn- escape-char [sb rdr]
-  (let [ch (read-char rdr)]
-    (case ch
-      \t "\t"
-      \r "\r"
-      \n "\n"
-      \\ "\\"
-      \" "\""
-      \b "\b"
-      \f "\f"
-      \u (let [ch (read-char rdr)]
-           (if (== -1 (js/parseInt (int ch) 16))
-             (err/throw-invalid-unicode-escape rdr ch)
-             (read-unicode-char rdr ch 16 4 true)))
-      (if (numeric? ch)
-        (let [ch (read-unicode-char rdr ch 8 3 false)]
-          (if (> (int ch) 0377)
-            (err/throw-bad-octal-number rdr)
-            ch))
-        (err/throw-bad-escape-char rdr ch)))))
-
-(defn- read-string*
-  [rdr _ opts]
-  (loop [sb (StringBuffer.)
-         ch (read-char rdr)]
-    (case ch
-      nil (err/throw-eof-reading rdr :string \" sb)
-      \\ (recur (doto sb (.append (escape-char sb rdr)))
-                (read-char rdr))
-      \" (str sb)
-      (recur (doto sb (.append ch)) (read-char rdr)))))
-
-(defn- read-symbol
-  [rdr initch]
-  (when-let [token (read-token rdr :symbol initch)]
-    (case token
-
-      ;; special symbols
-      "nil" nil
-      "true" true
-      "false" false
-      "/" '/
-
-      (or (when-let [p (parse-symbol token)]
-            (symbol (p 0) (p 1)))
-          (err/throw-invalid rdr :symbol token)))))
-
-(defn- read-keyword
-  [reader initch opts]
-  (let [ch (read-char reader)]
-    (if-not (whitespace? ch)
-      (let [token (read-token reader :keyword ch)
-            s (parse-symbol token)]
-        (if (and s (== -1 (.indexOf token "::")))
-          (let [ns (s 0)
-                name (s 1)]
-            (if (identical? \: (nth token 0))
-              (err/throw-invalid reader :keyword token) ;; no ::keyword in edn
-              (keyword ns name)))
-          (err/throw-invalid reader :keyword token)))
-      (err/throw-single-colon reader))))
-
-(defn- wrapping-reader
-  [sym]
-  (fn [rdr _ opts]
-    (list sym (read rdr true nil opts))))
-
-(defn- read-meta
-  [rdr _ opts]
-  (let [m (desugar-meta (read rdr true nil opts))]
-    (when-not (map? m)
-      (err/throw-bad-metadata rdr m))
-    (let [o (read rdr true nil opts)]
-      (if (implements? IMeta o)
-        (with-meta o (merge (meta o) m))
-        (err/throw-bad-metadata-target rdr o)))))
-
-(defn- read-set
-  [rdr _ opts]
-  (let [coll (read-delimited :set \} rdr opts)
-        the-set (set coll)]
-      (when-not (= (count coll) (count the-set))
-        (err/throw-dup-keys rdr :set coll))
-      the-set))
-
-(defn- read-discard
-  [rdr _ opts]
-  (doto rdr
-    (read true nil true)))
-
-(defn- read-namespaced-map
-  [rdr _ opts]
-  (let [token (read-token rdr :namespaced-map (read-char rdr))]
-    (if-let [ns (some-> token parse-symbol second')]
-      (let [ch (read-past whitespace? rdr)]
-        (if (identical? ch \{)
-          (let [items (read-delimited :namespaced-map \} rdr opts)]
-            (when (odd? (count items))
-              (err/throw-odd-map rdr nil nil items))
-            (let [keys (namespace-keys (str ns) (take-nth 2 items))
-                  vals (take-nth 2 (rest items))]
-              (when-not (= (count (set keys)) (count keys))
-                (err/throw-dup-keys rdr :namespaced-map keys))
-              (zipmap keys vals)))
-          (err/throw-ns-map-no-map rdr token)))
-      (err/throw-bad-ns rdr token))))
-
-(defn- read-symbolic-value
-  [rdr _ opts]
-  (let [sym (read rdr true nil opts)]
-    (case sym
-
-      NaN js/Number.NaN
-      -Inf js/Number.NEGATIVE_INFINITY
-      Inf js/Number.POSITIVE_INFINITY
-
-      (err/reader-error rdr (str "Invalid token: ##" sym)))))
-
-(defn- macros [ch]
-  (case ch
-    \" read-string*
-    \: read-keyword
-    \; read-comment
-    \^ read-meta
-    \( read-list
-    \) read-unmatched-delimiter
-    \[ read-vector
-    \] read-unmatched-delimiter
-    \{ read-map
-    \} read-unmatched-delimiter
-    \\ read-char*
-    \# read-dispatch
-    nil))
-
-(defn- dispatch-macros [ch]
-  (case ch
-    \^ read-meta                ;deprecated
-    \{ read-set
-    \< (throwing-reader "Unreadable form")
-    \! read-comment
-    \_ read-discard
-    \: read-namespaced-map
-    \# read-symbolic-value
-    nil))
-
-(defn- read-tagged [rdr initch opts]
-  (let [tag (read rdr true nil opts)
-        object (read rdr true nil opts)]
-    (if-not (symbol? tag)
-      (err/throw-bad-reader-tag rdr "Reader tag must be a symbol"))
-    (if-let [f (or (get (:readers opts) tag)
-                   (default-data-readers tag))]
-      (f object)
-      (if-let [d (:default opts)]
-        (d tag object)
-        (err/throw-unknown-reader-tag rdr tag)))))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Public API
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(defn read
-  "Reads the first object from an IPushbackReader.
-   Returns the object read. If EOF, throws if eof-error? is true otherwise returns eof.
-   If no reader is provided, *in* will be used.
-
-   Reads data in the edn format (subset of Clojure data):
-   http://edn-format.org
-
-   clojure.tools.reader.edn/read doesn't depend on dynamic Vars, all configuration
-   is done by passing an opt map.
-
-   opts is a map that can include the following keys:
-   :eof - value to return on end-of-file. When not supplied, eof throws an exception.
-   :readers  - a map of tag symbols to data-reader functions to be considered before default-data-readers.
-              When not supplied, only the default-data-readers will be used.
-   :default - A function of two args, that will, if present and no reader is found for a tag,
-              be called with the tag and the value."
-  ([reader] (read {} reader))
-  ([{:keys [eof] :as opts} reader]
-     (let [eof-error? (not (contains? opts :eof))]
-       (read reader eof-error? eof opts)))
-  ([reader eof-error? eof opts]
-     (try
-       (loop []
-         (let [ch (read-char reader)]
-           (cond
-            (whitespace? ch) (recur)
-            (nil? ch) (if eof-error? (err/throw-eof-error reader nil) eof)
-            (number-literal? reader ch) (read-number reader ch opts)
-            :else (let [f (macros ch)]
-                    (if f
-                      (let [res (f reader ch opts)]
-                        (if (identical? res reader)
-                          (recur)
-                          res))
-                      (read-symbol reader ch))))))
-       (catch js/Error e
-         (if (ex-info? e)
-           (let [d (ex-data e)]
-             (if (= :reader-exception (:type d))
-               (throw e)
-               (throw (ex-info (.-message e)
-                               (merge {:type :reader-exception}
-                                      d
-                                      (if (indexing-reader? reader)
-                                        {:line   (get-line-number reader)
-                                         :column (get-column-number reader)
-                                         :file   (get-file-name reader)}))
-                               e))))
-           (throw (ex-info (.-message e)
-                           (merge {:type :reader-exception}
-                                  (if (indexing-reader? reader)
-                                    {:line   (get-line-number reader)
-                                     :column (get-column-number reader)
-                                     :file   (get-file-name reader)}))
-                           e)))))))
-
-(defn read-string
-  "Reads one object from the string s.
-   Returns nil when s is nil or empty.
-
-   Reads data in the edn format (subset of Clojure data):
-   http://edn-format.org
-
-   opts is a map as per clojure.tools.reader.edn/read"
-  ([s] (read-string {:eof nil} s))
-  ([opts s]
-     (when (and s (not= s ""))
-       (read opts (string-push-back-reader s)))))

docs/js/compiled/out/cljs/tools/reader/edn.js

@@ -1,933 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.tools.reader.edn');
-goog.require('cljs.core');
-goog.require('cljs.tools.reader.impl.errors');
-goog.require('cljs.tools.reader.reader_types');
-goog.require('cljs.tools.reader.impl.utils');
-goog.require('cljs.tools.reader.impl.commons');
-goog.require('cljs.tools.reader');
-goog.require('goog.string');
-goog.require('goog.string.StringBuffer');
-
-
-cljs.tools.reader.edn.macro_terminating_QMARK_ = (function cljs$tools$reader$edn$macro_terminating_QMARK_(ch){
-var and__4120__auto__ = (!(("#" === ch)));
-if(and__4120__auto__){
-var and__4120__auto____$1 = (!(("'" === ch)));
-if(and__4120__auto____$1){
-var and__4120__auto____$2 = (!((":" === ch)));
-if(and__4120__auto____$2){
-return cljs.tools.reader.edn.macros.call(null,ch);
-} else {
-return and__4120__auto____$2;
-}
-} else {
-return and__4120__auto____$1;
-}
-} else {
-return and__4120__auto__;
-}
-});
-cljs.tools.reader.edn.not_constituent_QMARK_ = (function cljs$tools$reader$edn$not_constituent_QMARK_(ch){
-return ((("@" === ch)) || (("`" === ch)) || (("~" === ch)));
-});
-cljs.tools.reader.edn.read_token = (function cljs$tools$reader$edn$read_token(var_args){
-var G__21219 = arguments.length;
-switch (G__21219) {
-case 3:
-return cljs.tools.reader.edn.read_token.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-case 4:
-return cljs.tools.reader.edn.read_token.cljs$core$IFn$_invoke$arity$4((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.edn.read_token.cljs$core$IFn$_invoke$arity$3 = (function (rdr,kind,initch){
-return cljs.tools.reader.edn.read_token.call(null,rdr,kind,initch,true);
-});
-
-cljs.tools.reader.edn.read_token.cljs$core$IFn$_invoke$arity$4 = (function (rdr,kind,initch,validate_leading_QMARK_){
-if(cljs.core.not.call(null,initch)){
-return cljs.tools.reader.impl.errors.throw_eof_at_start.call(null,rdr,kind);
-} else {
-if(cljs.core.truth_((function (){var and__4120__auto__ = validate_leading_QMARK_;
-if(cljs.core.truth_(and__4120__auto__)){
-return cljs.tools.reader.edn.not_constituent_QMARK_.call(null,initch);
-} else {
-return and__4120__auto__;
-}
-})())){
-return cljs.tools.reader.impl.errors.throw_bad_char.call(null,rdr,kind,initch);
-} else {
-var sb = (new goog.string.StringBuffer());
-var ch = (function (){
-cljs.tools.reader.reader_types.unread.call(null,rdr,initch);
-
-return initch;
-})()
-;
-while(true){
-if(((cljs.tools.reader.impl.utils.whitespace_QMARK_.call(null,ch)) || (cljs.tools.reader.edn.macro_terminating_QMARK_.call(null,ch)) || ((ch == null)))){
-return cljs.core.str.cljs$core$IFn$_invoke$arity$1(sb);
-} else {
-if(cljs.tools.reader.edn.not_constituent_QMARK_.call(null,ch)){
-return cljs.tools.reader.impl.errors.throw_bad_char.call(null,rdr,kind,ch);
-} else {
-var G__21222 = (function (){var G__21220 = sb;
-G__21220.append(cljs.tools.reader.reader_types.read_char.call(null,rdr));
-
-return G__21220;
-})();
-var G__21223 = cljs.tools.reader.reader_types.peek_char.call(null,rdr);
-sb = G__21222;
-ch = G__21223;
-continue;
-}
-}
-break;
-}
-
-}
-}
-});
-
-cljs.tools.reader.edn.read_token.cljs$lang$maxFixedArity = 4;
-
-cljs.tools.reader.edn.read_dispatch = (function cljs$tools$reader$edn$read_dispatch(rdr,_,opts){
-var temp__5718__auto__ = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-if(cljs.core.truth_(temp__5718__auto__)){
-var ch = temp__5718__auto__;
-var temp__5718__auto____$1 = cljs.tools.reader.edn.dispatch_macros.call(null,ch);
-if(cljs.core.truth_(temp__5718__auto____$1)){
-var dm = temp__5718__auto____$1;
-return dm.call(null,rdr,ch,opts);
-} else {
-var temp__5718__auto____$2 = cljs.tools.reader.edn.read_tagged.call(null,(function (){var G__21224 = rdr;
-cljs.tools.reader.reader_types.unread.call(null,G__21224,ch);
-
-return G__21224;
-})(),ch,opts);
-if(cljs.core.truth_(temp__5718__auto____$2)){
-var obj = temp__5718__auto____$2;
-return obj;
-} else {
-return cljs.tools.reader.impl.errors.throw_no_dispatch.call(null,rdr,ch);
-}
-}
-} else {
-return cljs.tools.reader.impl.errors.throw_eof_at_dispatch.call(null,rdr);
-}
-});
-cljs.tools.reader.edn.read_unmatched_delimiter = (function cljs$tools$reader$edn$read_unmatched_delimiter(rdr,ch,opts){
-return cljs.tools.reader.impl.errors.throw_unmatch_delimiter.call(null,rdr,ch);
-});
-cljs.tools.reader.edn.read_unicode_char = (function cljs$tools$reader$edn$read_unicode_char(var_args){
-var G__21226 = arguments.length;
-switch (G__21226) {
-case 4:
-return cljs.tools.reader.edn.read_unicode_char.cljs$core$IFn$_invoke$arity$4((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]));
-
-break;
-case 5:
-return cljs.tools.reader.edn.read_unicode_char.cljs$core$IFn$_invoke$arity$5((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]),(arguments[(4)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.edn.read_unicode_char.cljs$core$IFn$_invoke$arity$4 = (function (token,offset,length,base){
-var l = (offset + length);
-if((cljs.core.count.call(null,token) === l)){
-} else {
-cljs.tools.reader.impl.errors.throw_invalid_unicode_literal.call(null,null,token);
-}
-
-var i = offset;
-var uc = (0);
-while(true){
-if((i === l)){
-return String.fromCharCode(uc);
-} else {
-var d = cljs.tools.reader.impl.utils.char_code.call(null,cljs.core.nth.call(null,token,i),base);
-if((d === (-1))){
-return cljs.tools.reader.impl.errors.throw_invalid_unicode_digit_in_token.call(null,null,cljs.core.nth.call(null,token,i),token);
-} else {
-var G__21228 = (i + (1));
-var G__21229 = (d + (uc * base));
-i = G__21228;
-uc = G__21229;
-continue;
-}
-}
-break;
-}
-});
-
-cljs.tools.reader.edn.read_unicode_char.cljs$core$IFn$_invoke$arity$5 = (function (rdr,initch,base,length,exact_QMARK_){
-var i = (1);
-var uc = cljs.tools.reader.impl.utils.char_code.call(null,initch,base);
-while(true){
-if((uc === (-1))){
-return cljs.tools.reader.impl.errors.throw_invalid_unicode_digit.call(null,rdr,initch);
-} else {
-if((!((i === length)))){
-var ch = cljs.tools.reader.reader_types.peek_char.call(null,rdr);
-if(cljs.core.truth_((function (){var or__4131__auto__ = cljs.tools.reader.impl.utils.whitespace_QMARK_.call(null,ch);
-if(or__4131__auto__){
-return or__4131__auto__;
-} else {
-var or__4131__auto____$1 = cljs.tools.reader.edn.macros.call(null,ch);
-if(cljs.core.truth_(or__4131__auto____$1)){
-return or__4131__auto____$1;
-} else {
-return (ch == null);
-}
-}
-})())){
-if(cljs.core.truth_(exact_QMARK_)){
-return cljs.tools.reader.impl.errors.throw_invalid_unicode_len.call(null,rdr,i,length);
-} else {
-return String.fromCharCode(uc);
-}
-} else {
-var d = cljs.tools.reader.impl.utils.char_code.call(null,ch,base);
-cljs.tools.reader.reader_types.read_char.call(null,rdr);
-
-if((d === (-1))){
-return cljs.tools.reader.impl.errors.throw_invalid_unicode_digit.call(null,rdr,ch);
-} else {
-var G__21230 = (i + (1));
-var G__21231 = (d + (uc * base));
-i = G__21230;
-uc = G__21231;
-continue;
-}
-}
-} else {
-return String.fromCharCode(uc);
-}
-}
-break;
-}
-});
-
-cljs.tools.reader.edn.read_unicode_char.cljs$lang$maxFixedArity = 5;
-
-cljs.tools.reader.edn.upper_limit = "\uD7FF".charCodeAt((0));
-cljs.tools.reader.edn.lower_limit = "\uE000".charCodeAt((0));
-cljs.tools.reader.edn.read_char_STAR_ = (function cljs$tools$reader$edn$read_char_STAR_(rdr,backslash,opts){
-var ch = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-if((!((ch == null)))){
-var token = ((((cljs.tools.reader.edn.macro_terminating_QMARK_.call(null,ch)) || (cljs.tools.reader.edn.not_constituent_QMARK_.call(null,ch)) || (cljs.tools.reader.impl.utils.whitespace_QMARK_.call(null,ch))))?cljs.core.str.cljs$core$IFn$_invoke$arity$1(ch):cljs.tools.reader.edn.read_token.call(null,rdr,new cljs.core.Keyword(null,"character","character",380652989),ch,false));
-var token_len = cljs.core.count.call(null,token);
-if(((1) === token_len)){
-return cljs.core.nth.call(null,token,(0));
-} else {
-if((token === "newline")){
-return "\n";
-} else {
-if((token === "space")){
-return " ";
-} else {
-if((token === "tab")){
-return "\t";
-} else {
-if((token === "backspace")){
-return "\b";
-} else {
-if((token === "formfeed")){
-return "\f";
-} else {
-if((token === "return")){
-return "\r";
-} else {
-if(cljs.core.truth_(goog.string.startsWith(token,"u"))){
-var c = cljs.tools.reader.edn.read_unicode_char.call(null,token,(1),(4),(16));
-var ic = c.charCodeAt();
-if((((ic > cljs.tools.reader.edn.upper_limit)) && ((ic < cljs.tools.reader.edn.lower_limit)))){
-return cljs.tools.reader.impl.errors.throw_invalid_character_literal.call(null,rdr,ic.toString((16)));
-} else {
-return c;
-}
-} else {
-if(cljs.core.truth_(goog.string.startsWith(token,"o"))){
-var len = (token_len - (1));
-if((len > (3))){
-return cljs.tools.reader.impl.errors.throw_invalid_octal_len.call(null,rdr,token);
-} else {
-var uc = cljs.tools.reader.edn.read_unicode_char.call(null,token,(1),len,(8));
-if(((uc | (0)) > (255))){
-return cljs.tools.reader.impl.errors.throw_bad_octal_number.call(null,rdr);
-} else {
-return uc;
-}
-}
-} else {
-return cljs.tools.reader.impl.errors.throw_unsupported_character.call(null,rdr,token);
-
-}
-}
-}
-}
-}
-}
-}
-}
-}
-} else {
-return cljs.tools.reader.impl.errors.throw_eof_in_character.call(null,rdr);
-}
-});
-cljs.tools.reader.edn.starting_line_col_info = (function cljs$tools$reader$edn$starting_line_col_info(rdr){
-if(cljs.tools.reader.reader_types.indexing_reader_QMARK_.call(null,rdr)){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.tools.reader.reader_types.get_line_number.call(null,rdr),(((cljs.tools.reader.reader_types.get_column_number.call(null,rdr) | (0)) - (1)) | (0))], null);
-} else {
-return null;
-}
-});
-cljs.tools.reader.edn.read_delimited = (function cljs$tools$reader$edn$read_delimited(kind,delim,rdr,opts){
-var vec__21232 = cljs.tools.reader.edn.starting_line_col_info.call(null,rdr);
-var start_line = cljs.core.nth.call(null,vec__21232,(0),null);
-var start_column = cljs.core.nth.call(null,vec__21232,(1),null);
-var delim__$1 = cljs.tools.reader.impl.utils.char$.call(null,delim);
-var a = cljs.core.transient$.call(null,cljs.core.PersistentVector.EMPTY);
-while(true){
-var ch = cljs.tools.reader.impl.commons.read_past.call(null,cljs.tools.reader.impl.utils.whitespace_QMARK_,rdr);
-if(cljs.core.truth_(ch)){
-} else {
-cljs.tools.reader.impl.errors.throw_eof_delimited.call(null,rdr,kind,start_line,start_column,cljs.core.count.call(null,a));
-}
-
-if(cljs.core._EQ_.call(null,delim__$1,cljs.tools.reader.impl.utils.char$.call(null,ch))){
-return cljs.core.persistent_BANG_.call(null,a);
-} else {
-var temp__5718__auto__ = cljs.tools.reader.edn.macros.call(null,ch);
-if(cljs.core.truth_(temp__5718__auto__)){
-var macrofn = temp__5718__auto__;
-var mret = macrofn.call(null,rdr,ch,opts);
-var G__21236 = (((!((mret === rdr))))?cljs.core.conj_BANG_.call(null,a,mret):a);
-a = G__21236;
-continue;
-} else {
-var o = cljs.tools.reader.edn.read.call(null,(function (){var G__21235 = rdr;
-cljs.tools.reader.reader_types.unread.call(null,G__21235,ch);
-
-return G__21235;
-})(),true,null,opts);
-var G__21237 = (((!((o === rdr))))?cljs.core.conj_BANG_.call(null,a,o):a);
-a = G__21237;
-continue;
-}
-}
-break;
-}
-});
-cljs.tools.reader.edn.read_list = (function cljs$tools$reader$edn$read_list(rdr,_,opts){
-var the_list = cljs.tools.reader.edn.read_delimited.call(null,new cljs.core.Keyword(null,"list","list",765357683),")",rdr,opts);
-if(cljs.core.empty_QMARK_.call(null,the_list)){
-return cljs.core.List.EMPTY;
-} else {
-return cljs.core.apply.call(null,cljs.core.list,the_list);
-}
-});
-cljs.tools.reader.edn.read_vector = (function cljs$tools$reader$edn$read_vector(rdr,_,opts){
-return cljs.tools.reader.edn.read_delimited.call(null,new cljs.core.Keyword(null,"vector","vector",1902966158),"]",rdr,opts);
-});
-cljs.tools.reader.edn.read_map = (function cljs$tools$reader$edn$read_map(rdr,_,opts){
-var vec__21238 = cljs.tools.reader.edn.starting_line_col_info.call(null,rdr);
-var start_line = cljs.core.nth.call(null,vec__21238,(0),null);
-var start_column = cljs.core.nth.call(null,vec__21238,(1),null);
-var the_map = cljs.tools.reader.edn.read_delimited.call(null,new cljs.core.Keyword(null,"map","map",1371690461),"}",rdr,opts);
-var map_count = cljs.core.count.call(null,the_map);
-var ks = cljs.core.take_nth.call(null,(2),the_map);
-var key_set = cljs.core.set.call(null,ks);
-if(cljs.core.odd_QMARK_.call(null,map_count)){
-cljs.tools.reader.impl.errors.throw_odd_map.call(null,rdr,start_line,start_column,the_map);
-} else {
-}
-
-if(cljs.core._EQ_.call(null,cljs.core.count.call(null,key_set),cljs.core.count.call(null,ks))){
-} else {
-cljs.tools.reader.impl.errors.throw_dup_keys.call(null,rdr,new cljs.core.Keyword(null,"map","map",1371690461),ks);
-}
-
-if((map_count <= ((2) * cljs.core.PersistentArrayMap.HASHMAP_THRESHOLD))){
-return cljs.core.PersistentArrayMap.fromArray(cljs.core.to_array.call(null,the_map),true,true);
-} else {
-return cljs.core.PersistentHashMap.fromArray(cljs.core.to_array.call(null,the_map),true);
-}
-});
-cljs.tools.reader.edn.read_number = (function cljs$tools$reader$edn$read_number(rdr,initch,opts){
-var sb = (function (){var G__21241 = (new goog.string.StringBuffer());
-G__21241.append(initch);
-
-return G__21241;
-})();
-var ch = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-while(true){
-if(cljs.core.truth_((function (){var or__4131__auto__ = cljs.tools.reader.impl.utils.whitespace_QMARK_.call(null,ch);
-if(or__4131__auto__){
-return or__4131__auto__;
-} else {
-var or__4131__auto____$1 = cljs.tools.reader.edn.macros.call(null,ch);
-if(cljs.core.truth_(or__4131__auto____$1)){
-return or__4131__auto____$1;
-} else {
-return (ch == null);
-}
-}
-})())){
-var s = cljs.core.str.cljs$core$IFn$_invoke$arity$1(sb);
-cljs.tools.reader.reader_types.unread.call(null,rdr,ch);
-
-var or__4131__auto__ = cljs.tools.reader.impl.commons.match_number.call(null,s);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return cljs.tools.reader.impl.errors.throw_invalid_number.call(null,rdr,s);
-}
-} else {
-var G__21243 = (function (){var G__21242 = sb;
-G__21242.append(ch);
-
-return G__21242;
-})();
-var G__21244 = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-sb = G__21243;
-ch = G__21244;
-continue;
-}
-break;
-}
-});
-cljs.tools.reader.edn.escape_char = (function cljs$tools$reader$edn$escape_char(sb,rdr){
-var ch = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-var G__21245 = ch;
-switch (G__21245) {
-case "t":
-return "\t";
-
-break;
-case "r":
-return "\r";
-
-break;
-case "n":
-return "\n";
-
-break;
-case "\\":
-return "\\";
-
-break;
-case "\"":
-return "\"";
-
-break;
-case "b":
-return "\b";
-
-break;
-case "f":
-return "\f";
-
-break;
-case "u":
-var ch__$1 = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-if(((-1) === parseInt((ch__$1 | (0)),(16)))){
-return cljs.tools.reader.impl.errors.throw_invalid_unicode_escape.call(null,rdr,ch__$1);
-} else {
-return cljs.tools.reader.edn.read_unicode_char.call(null,rdr,ch__$1,(16),(4),true);
-}
-
-break;
-default:
-if(cljs.tools.reader.impl.utils.numeric_QMARK_.call(null,ch)){
-var ch__$1 = cljs.tools.reader.edn.read_unicode_char.call(null,rdr,ch,(8),(3),false);
-if(((ch__$1 | (0)) > (255))){
-return cljs.tools.reader.impl.errors.throw_bad_octal_number.call(null,rdr);
-} else {
-return ch__$1;
-}
-} else {
-return cljs.tools.reader.impl.errors.throw_bad_escape_char.call(null,rdr,ch);
-}
-
-}
-});
-cljs.tools.reader.edn.read_string_STAR_ = (function cljs$tools$reader$edn$read_string_STAR_(rdr,_,opts){
-var sb = (new goog.string.StringBuffer());
-var ch = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-while(true){
-var G__21247 = ch;
-if(cljs.core._EQ_.call(null,null,G__21247)){
-return cljs.tools.reader.impl.errors.throw_eof_reading.call(null,rdr,new cljs.core.Keyword(null,"string","string",-1989541586),"\"",sb);
-} else {
-if(cljs.core._EQ_.call(null,"\\",G__21247)){
-var G__21250 = (function (){var G__21248 = sb;
-G__21248.append(cljs.tools.reader.edn.escape_char.call(null,sb,rdr));
-
-return G__21248;
-})();
-var G__21251 = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-sb = G__21250;
-ch = G__21251;
-continue;
-} else {
-if(cljs.core._EQ_.call(null,"\"",G__21247)){
-return cljs.core.str.cljs$core$IFn$_invoke$arity$1(sb);
-} else {
-var G__21252 = (function (){var G__21249 = sb;
-G__21249.append(ch);
-
-return G__21249;
-})();
-var G__21253 = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-sb = G__21252;
-ch = G__21253;
-continue;
-
-}
-}
-}
-break;
-}
-});
-cljs.tools.reader.edn.read_symbol = (function cljs$tools$reader$edn$read_symbol(rdr,initch){
-var temp__5720__auto__ = cljs.tools.reader.edn.read_token.call(null,rdr,new cljs.core.Keyword(null,"symbol","symbol",-1038572696),initch);
-if(cljs.core.truth_(temp__5720__auto__)){
-var token = temp__5720__auto__;
-var G__21254 = token;
-switch (G__21254) {
-case "nil":
-return null;
-
-break;
-case "true":
-return true;
-
-break;
-case "false":
-return false;
-
-break;
-case "/":
-return new cljs.core.Symbol(null,"/","/",-1371932971,null);
-
-break;
-default:
-var or__4131__auto__ = (function (){var temp__5720__auto____$1 = cljs.tools.reader.impl.commons.parse_symbol.call(null,token);
-if(cljs.core.truth_(temp__5720__auto____$1)){
-var p = temp__5720__auto____$1;
-return cljs.core.symbol.call(null,p.call(null,(0)),p.call(null,(1)));
-} else {
-return null;
-}
-})();
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return cljs.tools.reader.impl.errors.throw_invalid.call(null,rdr,new cljs.core.Keyword(null,"symbol","symbol",-1038572696),token);
-}
-
-}
-} else {
-return null;
-}
-});
-cljs.tools.reader.edn.read_keyword = (function cljs$tools$reader$edn$read_keyword(reader,initch,opts){
-var ch = cljs.tools.reader.reader_types.read_char.call(null,reader);
-if((!(cljs.tools.reader.impl.utils.whitespace_QMARK_.call(null,ch)))){
-var token = cljs.tools.reader.edn.read_token.call(null,reader,new cljs.core.Keyword(null,"keyword","keyword",811389747),ch);
-var s = cljs.tools.reader.impl.commons.parse_symbol.call(null,token);
-if(cljs.core.truth_((function (){var and__4120__auto__ = s;
-if(cljs.core.truth_(and__4120__auto__)){
-return ((-1) === token.indexOf("::"));
-} else {
-return and__4120__auto__;
-}
-})())){
-var ns = s.call(null,(0));
-var name = s.call(null,(1));
-if((":" === cljs.core.nth.call(null,token,(0)))){
-return cljs.tools.reader.impl.errors.throw_invalid.call(null,reader,new cljs.core.Keyword(null,"keyword","keyword",811389747),token);
-} else {
-return cljs.core.keyword.call(null,ns,name);
-}
-} else {
-return cljs.tools.reader.impl.errors.throw_invalid.call(null,reader,new cljs.core.Keyword(null,"keyword","keyword",811389747),token);
-}
-} else {
-return cljs.tools.reader.impl.errors.throw_single_colon.call(null,reader);
-}
-});
-cljs.tools.reader.edn.wrapping_reader = (function cljs$tools$reader$edn$wrapping_reader(sym){
-return (function (rdr,_,opts){
-return (new cljs.core.List(null,sym,(new cljs.core.List(null,cljs.tools.reader.edn.read.call(null,rdr,true,null,opts),null,(1),null)),(2),null));
-});
-});
-cljs.tools.reader.edn.read_meta = (function cljs$tools$reader$edn$read_meta(rdr,_,opts){
-var m = cljs.tools.reader.impl.utils.desugar_meta.call(null,cljs.tools.reader.edn.read.call(null,rdr,true,null,opts));
-if(cljs.core.map_QMARK_.call(null,m)){
-} else {
-cljs.tools.reader.impl.errors.throw_bad_metadata.call(null,rdr,m);
-}
-
-var o = cljs.tools.reader.edn.read.call(null,rdr,true,null,opts);
-if((((!((o == null))))?(((((o.cljs$lang$protocol_mask$partition0$ & (131072))) || ((cljs.core.PROTOCOL_SENTINEL === o.cljs$core$IMeta$))))?true:false):false)){
-return cljs.core.with_meta.call(null,o,cljs.core.merge.call(null,cljs.core.meta.call(null,o),m));
-} else {
-return cljs.tools.reader.impl.errors.throw_bad_metadata_target.call(null,rdr,o);
-}
-});
-cljs.tools.reader.edn.read_set = (function cljs$tools$reader$edn$read_set(rdr,_,opts){
-var coll = cljs.tools.reader.edn.read_delimited.call(null,new cljs.core.Keyword(null,"set","set",304602554),"}",rdr,opts);
-var the_set = cljs.core.set.call(null,coll);
-if(cljs.core._EQ_.call(null,cljs.core.count.call(null,coll),cljs.core.count.call(null,the_set))){
-} else {
-cljs.tools.reader.impl.errors.throw_dup_keys.call(null,rdr,new cljs.core.Keyword(null,"set","set",304602554),coll);
-}
-
-return the_set;
-});
-cljs.tools.reader.edn.read_discard = (function cljs$tools$reader$edn$read_discard(rdr,_,opts){
-var G__21257 = rdr;
-cljs.tools.reader.edn.read.call(null,G__21257,true,null,true);
-
-return G__21257;
-});
-cljs.tools.reader.edn.read_namespaced_map = (function cljs$tools$reader$edn$read_namespaced_map(rdr,_,opts){
-var token = cljs.tools.reader.edn.read_token.call(null,rdr,new cljs.core.Keyword(null,"namespaced-map","namespaced-map",1235665380),cljs.tools.reader.reader_types.read_char.call(null,rdr));
-var temp__5718__auto__ = (function (){var G__21258 = token;
-var G__21258__$1 = (((G__21258 == null))?null:cljs.tools.reader.impl.commons.parse_symbol.call(null,G__21258));
-if((G__21258__$1 == null)){
-return null;
-} else {
-return cljs.tools.reader.impl.utils.second_SINGLEQUOTE_.call(null,G__21258__$1);
-}
-})();
-if(cljs.core.truth_(temp__5718__auto__)){
-var ns = temp__5718__auto__;
-var ch = cljs.tools.reader.impl.commons.read_past.call(null,cljs.tools.reader.impl.utils.whitespace_QMARK_,rdr);
-if((ch === "{")){
-var items = cljs.tools.reader.edn.read_delimited.call(null,new cljs.core.Keyword(null,"namespaced-map","namespaced-map",1235665380),"}",rdr,opts);
-if(cljs.core.odd_QMARK_.call(null,cljs.core.count.call(null,items))){
-cljs.tools.reader.impl.errors.throw_odd_map.call(null,rdr,null,null,items);
-} else {
-}
-
-var keys = cljs.tools.reader.impl.utils.namespace_keys.call(null,cljs.core.str.cljs$core$IFn$_invoke$arity$1(ns),cljs.core.take_nth.call(null,(2),items));
-var vals = cljs.core.take_nth.call(null,(2),cljs.core.rest.call(null,items));
-if(cljs.core._EQ_.call(null,cljs.core.count.call(null,cljs.core.set.call(null,keys)),cljs.core.count.call(null,keys))){
-} else {
-cljs.tools.reader.impl.errors.throw_dup_keys.call(null,rdr,new cljs.core.Keyword(null,"namespaced-map","namespaced-map",1235665380),keys);
-}
-
-return cljs.core.zipmap.call(null,keys,vals);
-} else {
-return cljs.tools.reader.impl.errors.throw_ns_map_no_map.call(null,rdr,token);
-}
-} else {
-return cljs.tools.reader.impl.errors.throw_bad_ns.call(null,rdr,token);
-}
-});
-cljs.tools.reader.edn.read_symbolic_value = (function cljs$tools$reader$edn$read_symbolic_value(rdr,_,opts){
-var sym = cljs.tools.reader.edn.read.call(null,rdr,true,null,opts);
-var G__21259 = sym;
-if(cljs.core._EQ_.call(null,new cljs.core.Symbol(null,"NaN","NaN",666918153,null),G__21259)){
-return Number.NaN;
-} else {
-if(cljs.core._EQ_.call(null,new cljs.core.Symbol(null,"-Inf","-Inf",-2123243689,null),G__21259)){
-return Number.NEGATIVE_INFINITY;
-} else {
-if(cljs.core._EQ_.call(null,new cljs.core.Symbol(null,"Inf","Inf",647172781,null),G__21259)){
-return Number.POSITIVE_INFINITY;
-} else {
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,["Invalid token: ##",cljs.core.str.cljs$core$IFn$_invoke$arity$1(sym)].join(''));
-
-}
-}
-}
-});
-cljs.tools.reader.edn.macros = (function cljs$tools$reader$edn$macros(ch){
-var G__21260 = ch;
-switch (G__21260) {
-case "\"":
-return cljs.tools.reader.edn.read_string_STAR_;
-
-break;
-case ":":
-return cljs.tools.reader.edn.read_keyword;
-
-break;
-case ";":
-return cljs.tools.reader.impl.commons.read_comment;
-
-break;
-case "^":
-return cljs.tools.reader.edn.read_meta;
-
-break;
-case "(":
-return cljs.tools.reader.edn.read_list;
-
-break;
-case ")":
-return cljs.tools.reader.edn.read_unmatched_delimiter;
-
-break;
-case "[":
-return cljs.tools.reader.edn.read_vector;
-
-break;
-case "]":
-return cljs.tools.reader.edn.read_unmatched_delimiter;
-
-break;
-case "{":
-return cljs.tools.reader.edn.read_map;
-
-break;
-case "}":
-return cljs.tools.reader.edn.read_unmatched_delimiter;
-
-break;
-case "\\":
-return cljs.tools.reader.edn.read_char_STAR_;
-
-break;
-case "#":
-return cljs.tools.reader.edn.read_dispatch;
-
-break;
-default:
-return null;
-
-}
-});
-cljs.tools.reader.edn.dispatch_macros = (function cljs$tools$reader$edn$dispatch_macros(ch){
-var G__21262 = ch;
-switch (G__21262) {
-case "^":
-return cljs.tools.reader.edn.read_meta;
-
-break;
-case "{":
-return cljs.tools.reader.edn.read_set;
-
-break;
-case "<":
-return cljs.tools.reader.impl.commons.throwing_reader.call(null,"Unreadable form");
-
-break;
-case "!":
-return cljs.tools.reader.impl.commons.read_comment;
-
-break;
-case "_":
-return cljs.tools.reader.edn.read_discard;
-
-break;
-case ":":
-return cljs.tools.reader.edn.read_namespaced_map;
-
-break;
-case "#":
-return cljs.tools.reader.edn.read_symbolic_value;
-
-break;
-default:
-return null;
-
-}
-});
-cljs.tools.reader.edn.read_tagged = (function cljs$tools$reader$edn$read_tagged(rdr,initch,opts){
-var tag = cljs.tools.reader.edn.read.call(null,rdr,true,null,opts);
-var object = cljs.tools.reader.edn.read.call(null,rdr,true,null,opts);
-if((!((tag instanceof cljs.core.Symbol)))){
-cljs.tools.reader.impl.errors.throw_bad_reader_tag.call(null,rdr,"Reader tag must be a symbol");
-} else {
-}
-
-var temp__5718__auto__ = (function (){var or__4131__auto__ = cljs.core.get.call(null,new cljs.core.Keyword(null,"readers","readers",-2118263030).cljs$core$IFn$_invoke$arity$1(opts),tag);
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return cljs.tools.reader.default_data_readers.call(null,tag);
-}
-})();
-if(cljs.core.truth_(temp__5718__auto__)){
-var f = temp__5718__auto__;
-return f.call(null,object);
-} else {
-var temp__5718__auto____$1 = new cljs.core.Keyword(null,"default","default",-1987822328).cljs$core$IFn$_invoke$arity$1(opts);
-if(cljs.core.truth_(temp__5718__auto____$1)){
-var d = temp__5718__auto____$1;
-return d.call(null,tag,object);
-} else {
-return cljs.tools.reader.impl.errors.throw_unknown_reader_tag.call(null,rdr,tag);
-}
-}
-});
-/**
- * Reads the first object from an IPushbackReader.
- * Returns the object read. If EOF, throws if eof-error? is true otherwise returns eof.
- * If no reader is provided, *in* will be used.
- * 
- * Reads data in the edn format (subset of Clojure data):
- * http://edn-format.org
- * 
- * clojure.tools.reader.edn/read doesn't depend on dynamic Vars, all configuration
- * is done by passing an opt map.
- * 
- * opts is a map that can include the following keys:
- * :eof - value to return on end-of-file. When not supplied, eof throws an exception.
- * :readers  - a map of tag symbols to data-reader functions to be considered before default-data-readers.
- *            When not supplied, only the default-data-readers will be used.
- * :default - A function of two args, that will, if present and no reader is found for a tag,
- *            be called with the tag and the value.
- */
-cljs.tools.reader.edn.read = (function cljs$tools$reader$edn$read(var_args){
-var G__21265 = arguments.length;
-switch (G__21265) {
-case 1:
-return cljs.tools.reader.edn.read.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.tools.reader.edn.read.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-case 4:
-return cljs.tools.reader.edn.read.cljs$core$IFn$_invoke$arity$4((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.edn.read.cljs$core$IFn$_invoke$arity$1 = (function (reader){
-return cljs.tools.reader.edn.read.call(null,cljs.core.PersistentArrayMap.EMPTY,reader);
-});
-
-cljs.tools.reader.edn.read.cljs$core$IFn$_invoke$arity$2 = (function (p__21266,reader){
-var map__21267 = p__21266;
-var map__21267__$1 = (((((!((map__21267 == null))))?(((((map__21267.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__21267.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__21267):map__21267);
-var opts = map__21267__$1;
-var eof = cljs.core.get.call(null,map__21267__$1,new cljs.core.Keyword(null,"eof","eof",-489063237));
-var eof_error_QMARK_ = (!(cljs.core.contains_QMARK_.call(null,opts,new cljs.core.Keyword(null,"eof","eof",-489063237))));
-return cljs.tools.reader.edn.read.call(null,reader,eof_error_QMARK_,eof,opts);
-});
-
-cljs.tools.reader.edn.read.cljs$core$IFn$_invoke$arity$4 = (function (reader,eof_error_QMARK_,eof,opts){
-try{while(true){
-var ch = cljs.tools.reader.reader_types.read_char.call(null,reader);
-if(cljs.tools.reader.impl.utils.whitespace_QMARK_.call(null,ch)){
-continue;
-} else {
-if((ch == null)){
-if(cljs.core.truth_(eof_error_QMARK_)){
-return cljs.tools.reader.impl.errors.throw_eof_error.call(null,reader,null);
-} else {
-return eof;
-}
-} else {
-if(cljs.tools.reader.impl.commons.number_literal_QMARK_.call(null,reader,ch)){
-return cljs.tools.reader.edn.read_number.call(null,reader,ch,opts);
-} else {
-var f = cljs.tools.reader.edn.macros.call(null,ch);
-if(cljs.core.truth_(f)){
-var res = f.call(null,reader,ch,opts);
-if((res === reader)){
-continue;
-} else {
-return res;
-}
-} else {
-return cljs.tools.reader.edn.read_symbol.call(null,reader,ch);
-}
-
-}
-}
-}
-break;
-}
-}catch (e21269){if((e21269 instanceof Error)){
-var e = e21269;
-if(cljs.tools.reader.impl.utils.ex_info_QMARK_.call(null,e)){
-var d = cljs.core.ex_data.call(null,e);
-if(cljs.core._EQ_.call(null,new cljs.core.Keyword(null,"reader-exception","reader-exception",-1938323098),new cljs.core.Keyword(null,"type","type",1174270348).cljs$core$IFn$_invoke$arity$1(d))){
-throw e;
-} else {
-throw cljs.core.ex_info.call(null,e.message,cljs.core.merge.call(null,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"type","type",1174270348),new cljs.core.Keyword(null,"reader-exception","reader-exception",-1938323098)], null),d,((cljs.tools.reader.reader_types.indexing_reader_QMARK_.call(null,reader))?new cljs.core.PersistentArrayMap(null, 3, [new cljs.core.Keyword(null,"line","line",212345235),cljs.tools.reader.reader_types.get_line_number.call(null,reader),new cljs.core.Keyword(null,"column","column",2078222095),cljs.tools.reader.reader_types.get_column_number.call(null,reader),new cljs.core.Keyword(null,"file","file",-1269645878),cljs.tools.reader.reader_types.get_file_name.call(null,reader)], null):null)),e);
-}
-} else {
-throw cljs.core.ex_info.call(null,e.message,cljs.core.merge.call(null,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"type","type",1174270348),new cljs.core.Keyword(null,"reader-exception","reader-exception",-1938323098)], null),((cljs.tools.reader.reader_types.indexing_reader_QMARK_.call(null,reader))?new cljs.core.PersistentArrayMap(null, 3, [new cljs.core.Keyword(null,"line","line",212345235),cljs.tools.reader.reader_types.get_line_number.call(null,reader),new cljs.core.Keyword(null,"column","column",2078222095),cljs.tools.reader.reader_types.get_column_number.call(null,reader),new cljs.core.Keyword(null,"file","file",-1269645878),cljs.tools.reader.reader_types.get_file_name.call(null,reader)], null):null)),e);
-}
-} else {
-throw e21269;
-
-}
-}});
-
-cljs.tools.reader.edn.read.cljs$lang$maxFixedArity = 4;
-
-/**
- * Reads one object from the string s.
- * Returns nil when s is nil or empty.
- * 
- * Reads data in the edn format (subset of Clojure data):
- * http://edn-format.org
- * 
- * opts is a map as per clojure.tools.reader.edn/read
- */
-cljs.tools.reader.edn.read_string = (function cljs$tools$reader$edn$read_string(var_args){
-var G__21272 = arguments.length;
-switch (G__21272) {
-case 1:
-return cljs.tools.reader.edn.read_string.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.tools.reader.edn.read_string.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.edn.read_string.cljs$core$IFn$_invoke$arity$1 = (function (s){
-return cljs.tools.reader.edn.read_string.call(null,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"eof","eof",-489063237),null], null),s);
-});
-
-cljs.tools.reader.edn.read_string.cljs$core$IFn$_invoke$arity$2 = (function (opts,s){
-if(cljs.core.truth_((function (){var and__4120__auto__ = s;
-if(cljs.core.truth_(and__4120__auto__)){
-return cljs.core.not_EQ_.call(null,s,"");
-} else {
-return and__4120__auto__;
-}
-})())){
-return cljs.tools.reader.edn.read.call(null,opts,cljs.tools.reader.reader_types.string_push_back_reader.call(null,s));
-} else {
-return null;
-}
-});
-
-cljs.tools.reader.edn.read_string.cljs$lang$maxFixedArity = 2;
-
-
-//# sourceMappingURL=edn.js.map?rel=1582560147180

docs/js/compiled/out/cljs/tools/reader/impl/commons.cljs

@@ -1,131 +0,0 @@
-;;   Copyright (c) Nicola Mometto, Rich Hickey & contributors.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.tools.reader.impl.commons
-  (:refer-clojure :exclude [char])
-  (:require
-   [cljs.tools.reader.impl.errors :refer [reader-error]]
-   [cljs.tools.reader.reader-types :refer [peek-char read-char]]
-   [cljs.tools.reader.impl.utils :refer [numeric? newline? char]]))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; helpers
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(defn ^boolean number-literal?
-  "Checks whether the reader is at the start of a number literal"
-  [^not-native reader initch]
-  (or (numeric? initch)
-      (and (or (identical? \+ initch) (identical?  \- initch))
-           (numeric? (peek-char reader)))))
-
-(defn read-past
-  "Read until first character that doesn't match pred, returning
-   char."
-  [pred ^not-native rdr]
-  (loop [ch (read-char rdr)]
-    (if ^boolean (pred ch)
-      (recur (read-char rdr))
-      ch)))
-
-(defn skip-line
-  "Advances the reader to the end of a line. Returns the reader"
-  [^not-native reader]
-  (loop []
-    (when-not (newline? (read-char reader))
-      (recur)))
-  reader)
-
-(def int-pattern #"^([-+]?)(?:(0)|([1-9][0-9]*)|0[xX]([0-9A-Fa-f]+)|0([0-7]+)|([1-9][0-9]?)[rR]([0-9A-Za-z]+)|0[0-9]+)(N)?$")
-(def ratio-pattern #"([-+]?[0-9]+)/([0-9]+)")
-(def float-pattern #"([-+]?[0-9]+(\.[0-9]*)?([eE][-+]?[0-9]+)?)(M)?")
-
-(defn- match-int
-  [s]
-  (let [m (vec (re-find int-pattern s))]
-    (if-not (nil? (m 2))
-      0
-      (let [^boolean negate? (identical? "-" (m 1))
-            a (cond
-               (not (nil? (m 3))) [(m 3) 10]
-               (not (nil? (m 4))) [(m 4) 16]
-               (not (nil? (m 5))) [(m 5) 8]
-               (not (nil? (m 7))) [(m 7) (js/parseInt (m 6))]
-               :else              [nil nil])
-            n (a 0)]
-        (when-not (nil? n)
-          (let [bn (js/parseInt n (a 1))
-                bn (if negate? (* -1 bn) bn)]
-            (when-not (js/isNaN bn)
-              bn)))))))
-
-(defn- match-ratio
-  [s]
-  (let [m (vec (re-find ratio-pattern s))
-        numerator (m 1)
-        denominator (m 2)
-        numerator (if (re-find #"^\+" numerator)
-                    (subs numerator 1)
-                    numerator)]
-    (/ (-> numerator   js/parseInt) ;;; No ratio type in cljs
-       (-> denominator js/parseInt)))); So will convert to js/Number
-
-(defn- match-float
-  [s]
-  (let [m (vec (re-find float-pattern s))]
-    (if-not (nil? (m 4)) ;; for BigDecimal "10.03M", as all parsed to js/Number
-      (js/parseFloat (m 1))
-      (js/parseFloat s))))
-
-(defn ^boolean matches? [pattern s]
-  (let [[match] (re-find pattern s)]
-    (identical? match s)))
-
-(defn match-number [s]
-  (if (matches? int-pattern s)
-    (match-int s)
-    (if (matches? float-pattern s)
-      (match-float s)
-      (when (matches? ratio-pattern s)
-        (match-ratio s)))))
-
-(defn parse-symbol
-  "Parses a string into a vector of the namespace and symbol"
-  [token]
-  (when-not (or (identical? "" token)
-                (true? (.test #":$" token))
-                (true? (.test #"^::" token)))
-    (let [ns-idx (.indexOf token "/")
-          ns (when (pos? ns-idx)
-               (subs token 0 ns-idx))]
-      (if-not (nil? ns)
-        (let [ns-idx (inc ns-idx)]
-          (when-not (== ns-idx (count token))
-            (let [sym (subs token ns-idx)]
-              (when (and (not (numeric? (nth sym 0)))
-                         (not (identical? "" sym))
-                         (false? (.test #":$" ns))
-                         (or (identical? sym "/")
-                             (== -1 (.indexOf sym "/"))))
-                [ns sym]))))
-        (when (or (identical? token "/")
-                  (== -1 (.indexOf token "/")))
-          [nil token])))))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; readers
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(defn read-comment
-  [rdr & _]
-  (skip-line rdr))
-
-(defn throwing-reader
-  [msg]
-  (fn [rdr & _]
-    (reader-error rdr msg)))

docs/js/compiled/out/cljs/tools/reader/impl/commons.js

@@ -1,193 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.tools.reader.impl.commons');
-goog.require('cljs.core');
-goog.require('cljs.tools.reader.impl.errors');
-goog.require('cljs.tools.reader.reader_types');
-goog.require('cljs.tools.reader.impl.utils');
-/**
- * Checks whether the reader is at the start of a number literal
- */
-cljs.tools.reader.impl.commons.number_literal_QMARK_ = (function cljs$tools$reader$impl$commons$number_literal_QMARK_(reader,initch){
-return ((cljs.tools.reader.impl.utils.numeric_QMARK_.call(null,initch)) || (((((("+" === initch)) || (("-" === initch)))) && (cljs.tools.reader.impl.utils.numeric_QMARK_.call(null,cljs.tools.reader.reader_types.peek_char.call(null,reader))))));
-});
-/**
- * Read until first character that doesn't match pred, returning
- * char.
- */
-cljs.tools.reader.impl.commons.read_past = (function cljs$tools$reader$impl$commons$read_past(pred,rdr){
-var ch = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-while(true){
-if(pred.call(null,ch)){
-var G__21061 = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-ch = G__21061;
-continue;
-} else {
-return ch;
-}
-break;
-}
-});
-/**
- * Advances the reader to the end of a line. Returns the reader
- */
-cljs.tools.reader.impl.commons.skip_line = (function cljs$tools$reader$impl$commons$skip_line(reader){
-while(true){
-if(cljs.tools.reader.impl.utils.newline_QMARK_.call(null,cljs.tools.reader.reader_types.read_char.call(null,reader))){
-} else {
-continue;
-}
-break;
-}
-
-return reader;
-});
-cljs.tools.reader.impl.commons.int_pattern = /^([-+]?)(?:(0)|([1-9][0-9]*)|0[xX]([0-9A-Fa-f]+)|0([0-7]+)|([1-9][0-9]?)[rR]([0-9A-Za-z]+)|0[0-9]+)(N)?$/;
-cljs.tools.reader.impl.commons.ratio_pattern = /([-+]?[0-9]+)\/([0-9]+)/;
-cljs.tools.reader.impl.commons.float_pattern = /([-+]?[0-9]+(\.[0-9]*)?([eE][-+]?[0-9]+)?)(M)?/;
-cljs.tools.reader.impl.commons.match_int = (function cljs$tools$reader$impl$commons$match_int(s){
-var m = cljs.core.vec.call(null,cljs.core.re_find.call(null,cljs.tools.reader.impl.commons.int_pattern,s));
-if((!((m.call(null,(2)) == null)))){
-return (0);
-} else {
-var negate_QMARK_ = ("-" === m.call(null,(1)));
-var a = (((!((m.call(null,(3)) == null))))?new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [m.call(null,(3)),(10)], null):(((!((m.call(null,(4)) == null))))?new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [m.call(null,(4)),(16)], null):(((!((m.call(null,(5)) == null))))?new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [m.call(null,(5)),(8)], null):(((!((m.call(null,(7)) == null))))?new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [m.call(null,(7)),parseInt(m.call(null,(6)))], null):new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,null], null)
-))));
-var n = a.call(null,(0));
-if((n == null)){
-return null;
-} else {
-var bn = parseInt(n,a.call(null,(1)));
-var bn__$1 = ((negate_QMARK_)?((-1) * bn):bn);
-if(cljs.core.truth_(isNaN(bn__$1))){
-return null;
-} else {
-return bn__$1;
-}
-}
-}
-});
-cljs.tools.reader.impl.commons.match_ratio = (function cljs$tools$reader$impl$commons$match_ratio(s){
-var m = cljs.core.vec.call(null,cljs.core.re_find.call(null,cljs.tools.reader.impl.commons.ratio_pattern,s));
-var numerator = m.call(null,(1));
-var denominator = m.call(null,(2));
-var numerator__$1 = (cljs.core.truth_(cljs.core.re_find.call(null,/^\+/,numerator))?cljs.core.subs.call(null,numerator,(1)):numerator);
-return (parseInt(numerator__$1) / parseInt(denominator));
-});
-cljs.tools.reader.impl.commons.match_float = (function cljs$tools$reader$impl$commons$match_float(s){
-var m = cljs.core.vec.call(null,cljs.core.re_find.call(null,cljs.tools.reader.impl.commons.float_pattern,s));
-if((!((m.call(null,(4)) == null)))){
-return parseFloat(m.call(null,(1)));
-} else {
-return parseFloat(s);
-}
-});
-cljs.tools.reader.impl.commons.matches_QMARK_ = (function cljs$tools$reader$impl$commons$matches_QMARK_(pattern,s){
-var vec__21062 = cljs.core.re_find.call(null,pattern,s);
-var match = cljs.core.nth.call(null,vec__21062,(0),null);
-return (match === s);
-});
-cljs.tools.reader.impl.commons.match_number = (function cljs$tools$reader$impl$commons$match_number(s){
-if(cljs.tools.reader.impl.commons.matches_QMARK_.call(null,cljs.tools.reader.impl.commons.int_pattern,s)){
-return cljs.tools.reader.impl.commons.match_int.call(null,s);
-} else {
-if(cljs.tools.reader.impl.commons.matches_QMARK_.call(null,cljs.tools.reader.impl.commons.float_pattern,s)){
-return cljs.tools.reader.impl.commons.match_float.call(null,s);
-} else {
-if(cljs.tools.reader.impl.commons.matches_QMARK_.call(null,cljs.tools.reader.impl.commons.ratio_pattern,s)){
-return cljs.tools.reader.impl.commons.match_ratio.call(null,s);
-} else {
-return null;
-}
-}
-}
-});
-/**
- * Parses a string into a vector of the namespace and symbol
- */
-cljs.tools.reader.impl.commons.parse_symbol = (function cljs$tools$reader$impl$commons$parse_symbol(token){
-if(((("" === token)) || (/:$/.test(token) === true) || (/^::/.test(token) === true))){
-return null;
-} else {
-var ns_idx = token.indexOf("/");
-var ns = (((ns_idx > (0)))?cljs.core.subs.call(null,token,(0),ns_idx):null);
-if((!((ns == null)))){
-var ns_idx__$1 = (ns_idx + (1));
-if((ns_idx__$1 === cljs.core.count.call(null,token))){
-return null;
-} else {
-var sym = cljs.core.subs.call(null,token,ns_idx__$1);
-if((((!(cljs.tools.reader.impl.utils.numeric_QMARK_.call(null,cljs.core.nth.call(null,sym,(0)))))) && ((!(("" === sym)))) && (/:$/.test(ns) === false) && ((((sym === "/")) || (((-1) === sym.indexOf("/"))))))){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [ns,sym], null);
-} else {
-return null;
-}
-}
-} else {
-if((((token === "/")) || (((-1) === token.indexOf("/"))))){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [null,token], null);
-} else {
-return null;
-}
-}
-}
-});
-cljs.tools.reader.impl.commons.read_comment = (function cljs$tools$reader$impl$commons$read_comment(var_args){
-var args__4736__auto__ = [];
-var len__4730__auto___21067 = arguments.length;
-var i__4731__auto___21068 = (0);
-while(true){
-if((i__4731__auto___21068 < len__4730__auto___21067)){
-args__4736__auto__.push((arguments[i__4731__auto___21068]));
-
-var G__21069 = (i__4731__auto___21068 + (1));
-i__4731__auto___21068 = G__21069;
-continue;
-} else {
-}
-break;
-}
-
-var argseq__4737__auto__ = ((((1) < args__4736__auto__.length))?(new cljs.core.IndexedSeq(args__4736__auto__.slice((1)),(0),null)):null);
-return cljs.tools.reader.impl.commons.read_comment.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),argseq__4737__auto__);
-});
-
-cljs.tools.reader.impl.commons.read_comment.cljs$core$IFn$_invoke$arity$variadic = (function (rdr,_){
-return cljs.tools.reader.impl.commons.skip_line.call(null,rdr);
-});
-
-cljs.tools.reader.impl.commons.read_comment.cljs$lang$maxFixedArity = (1);
-
-/** @this {Function} */
-cljs.tools.reader.impl.commons.read_comment.cljs$lang$applyTo = (function (seq21065){
-var G__21066 = cljs.core.first.call(null,seq21065);
-var seq21065__$1 = cljs.core.next.call(null,seq21065);
-var self__4717__auto__ = this;
-return self__4717__auto__.cljs$core$IFn$_invoke$arity$variadic(G__21066,seq21065__$1);
-});
-
-cljs.tools.reader.impl.commons.throwing_reader = (function cljs$tools$reader$impl$commons$throwing_reader(msg){
-return (function() { 
-var G__21070__delegate = function (rdr,_){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,msg);
-};
-var G__21070 = function (rdr,var_args){
-var _ = null;
-if (arguments.length > 1) {
-var G__21071__i = 0, G__21071__a = new Array(arguments.length -  1);
-while (G__21071__i < G__21071__a.length) {G__21071__a[G__21071__i] = arguments[G__21071__i + 1]; ++G__21071__i;}
-  _ = new cljs.core.IndexedSeq(G__21071__a,0,null);
-} 
-return G__21070__delegate.call(this,rdr,_);};
-G__21070.cljs$lang$maxFixedArity = 1;
-G__21070.cljs$lang$applyTo = (function (arglist__21072){
-var rdr = cljs.core.first(arglist__21072);
-var _ = cljs.core.rest(arglist__21072);
-return G__21070__delegate(rdr,_);
-});
-G__21070.cljs$core$IFn$_invoke$arity$variadic = G__21070__delegate;
-return G__21070;
-})()
-;
-});
-
-//# sourceMappingURL=commons.js.map?rel=1582560146886

docs/js/compiled/out/cljs/tools/reader/impl/commons.js.map

@@ -1 +0,0 @@
-{"version":3,"file":"\/home\/simon\/workspace\/geocsv-lite\/resources\/public\/js\/compiled\/out\/cljs\/tools\/reader\/impl\/commons.js","sources":["commons.cljs?rel=1582560146887"],"lineCount":193,"mappings":";AAQA;;;;;AAWA;;;uDAAA,vDAAeA,sHAEAC,OAAOC;AAFtB,AAGE,SAAI,AAACC,sDAASD,aACV,EAAK,EAAI,CAAA,QAAeA,aAAQ,CAAA,QAAgBA,eAC3C,AAACC,sDAAS,AAACC,mDAAUH;;AAEhC;;;;2CAAA,3CAAMI,8FAGHC,KAAiBC;AAHpB,AAIE,IAAOC,KAAG,AAACC,mDAAUF;;AAArB,AACE,GAAI,AAAUD,eAAKE;AACjB,eAAO,AAACC,mDAAUF;;;;AAClBC;;;;;AAEN;;;2CAAA,3CAAME,8FAEST;AAFf,AAGE;AAAA,AACE,GAAU,AAACU,sDAAS,AAACF,mDAAUR;AAA\/B;AAAA,AACE;;;;;AACJA;;AAEF,6CAAA,7CAAKW;AACL,+CAAA,\/CAAKC;AACL,+CAAA,\/CAAKC;AAEL,2CAAA,3CAAOC,8FACJC;AADH,AAEE,IAAMC,IAAE,AAACC,wBAAI,AAACC,4BAAQP,2CAAYI;AAAlC,AACE,GAAA,GAAQ,qBAAA,pBAAM,YAAA,ZAACC;AAAf;;AAEE,IAAeG,gBAAQ,CAAA,QAAgB,YAAA,ZAACH;IAClCI,IAAE,mCAAA,oGAAA,aAAA,mCAAA,oGAAA,aAAA,mCAAA,oGAAA,YAAA,mCAAA,uIAAA,AAAA,mFAAA,KAAA,3rBACC,GAAK,qBAAA,pBAAM,YAAA,ZAACJ,gHAAQ,YAAA,ZAACA,gCACrB,GAAK,qBAAA,pBAAM,YAAA,ZAACA,gHAAQ,YAAA,ZAACA,gCACrB,GAAK,qBAAA,pBAAM,YAAA,ZAACA,gHAAQ,YAAA,ZAACA,+BACrB,GAAK,qBAAA,pBAAM,YAAA,ZAACA,gHAAQ,YAAA,ZAACA,iBAAK,AAACK,SAAY,YAAA,ZAACL;;IAE3CM,IAAE,YAAA,ZAACF;AAPT,AAQE,GAAU,MAAA,LAAME;AAAhB;;AAAA,AACE,IAAMC,KAAG,AAACF,SAAYC,EAAE,YAAA,ZAACF;IACnBG,SAAG,EAAIJ,eAAQ,CAAA,OAAMI,IAAIA;AAD\/B,AAEE,oBAAU,AAACC,MAASD;AAApB;;AAAA,AACEA;;;;;AAEd,6CAAA,7CAAOE,kGACJV;AADH,AAEE,IAAMC,IAAE,AAACC,wBAAI,AAACC,4BAAQN,6CAAcG;IAC9BW,YAAU,YAAA,ZAACV;IACXW,cAAY,YAAA,ZAACX;IACbU,gBAAU,kBAAI,4BAAA,5BAACR,kCAAeQ,YAClB,mCAAA,nCAACE,yBAAKF,eACNA;AALlB,AAME,QAAG,SAAIA,TAAYL,0BAChB,SAAIM,TAAYN;;AAEvB,6CAAA,7CAAOQ,kGACJd;AADH,AAEE,IAAMC,IAAE,AAACC,wBAAI,AAACC,4BAAQL,6CAAcE;AAApC,AACE,GAAA,GAAQ,qBAAA,pBAAM,YAAA,ZAACC;AACb,OAACc,WAAc,YAAA,ZAACd;;AAChB,OAACc,WAAcf;;;AAErB,gDAAA,hDAAegB,wGAAUC,QAAQjB;AAAjC,AACE,IAAAkB,aAAc,AAACf,4BAAQc,QAAQjB;YAA\/B,AAAAmB,wBAAAD,WAAA,IAAA,\/CAAOE;AAAP,AACE,QAAYA,UAAMpB;;AAEtB,8CAAA,9CAAMqB,oGAAcrB;AAApB,AACE,GAAI,AAACgB,wDAASpB,2CAAYI;AACxB,OAACD,mDAAUC;;AACX,GAAI,AAACgB,wDAASlB,6CAAcE;AAC1B,OAACc,qDAAYd;;AACb,GAAM,AAACgB,wDAASnB,6CAAcG;AAA9B,AACE,OAACU,qDAAYV;;AADf;;;;;AAGN;;;8CAAA,9CAAMsB,oGAEHC;AAFH,AAGE,GAAU,EAAI,CAAA,OAAeA,YACf,AAAO,AAAA,UAAaA,qBACpB,AAAO,AAAA,WAAcA;AAFnC;;AAAA,AAGE,IAAMC,SAAO,cAAA,dAAUD;IACjBE,KAAG,kBAAA,2CAAA,3DAAM,UAAA,TAAMD,eACV,+BAAA,\/BAACX,yBAAKU,UAAQC;AAFzB,AAGE,GAAA,GAAQ,OAAA,NAAMC;AACZ,IAAMD,aAAO,UAAA,TAAKA;AAAlB,AACE,GAAU,CAAIA,eAAO,AAACE,0BAAMH;AAA5B;;AAAA,AACE,IAAMI,MAAI,AAACd,yBAAKU,MAAMC;AAAtB,AACE,GAAM,EAAK,GAAK,AAACrC,sDAAS,4BAAA,5BAACgC,wBAAIQ,iBACpB,GAAK,CAAA,OAAeA,YACpB,AAAQ,AAAA,UAAaF,mBACrB,EAAI,SAAA,RAAYE,kBACZ,CAAA,SAAO,YAAA,ZAAUA;AAJhC,AAAA,0FAKGF,GAAGE;;AALN;;;;AAMN,GAAM,EAAI,WAAA,VAAYJ,oBACZ,CAAA,SAAO,cAAA,dAAUA;AAD3B,AAAA,0FAAA,KAEOA;;AAFP;;;;;AAQR,AAAA,8CAAA,sDAAAK,pGAAMM;AAAN,AAAA,IAAAL,qBAAA;AAAA,AAAA,IAAAC,0BAAA,AAAA;AAAA,AAAA,IAAAC,wBAAA;;AAAA,AAAA,GAAA,CAAAA,wBAAAD;AAAA,AAAA,AAAAD,wBAAA,CAAA,UAAAE;;AAAA,eAAA,CAAAA,wBAAA;;;;AAAA;;;;AAAA,IAAAC,uBAAA,EAAA,CAAA,MAAA,AAAAH,4BAAA,AAAA,KAAAI,qBAAA,AAAAJ,yBAAA,KAAA,IAAA,OAAA;AAAA,AAAA,OAAAK,iFAAA,CAAA,UAAA,MAAAF;;;AAAA,AAAA,AAAA,mFAAA,nFAAME,8FACH3C,IAAMiD;AADT,AAEE,OAAC9C,mDAAUH;;;AAFb,AAAA,sEAAA,tEAAM2C;;AAAN;AAAA,AAAA,gEAAA,WAAAC,3EAAMD;AAAN,AAAA,IAAAE,WAAA,AAAAC,0BAAAF;IAAAA,eAAA,AAAAG,yBAAAH;AAAA,AAAA,IAAAI,qBAAA;AAAA,AAAA,OAAAA,wDAAAH,SAAAD;;;AAAA,AAIA,iDAAA,jDAAMM,0GACHC;AADH,AAEE;mCAAKnD,IAAMiD;AAAX,AACE,OAACG,qDAAapD,IAAImD;;yBADfnD;IAAMiD;;;;EAAAA;;oCAANjD,IAAMiD;;;IAANjD;IAAMiD;0BAANjD,IAAMiD","names":["cljs.tools.reader.impl.commons\/number-literal?","reader","initch","cljs.tools.reader.impl.utils\/numeric?","cljs.tools.reader.reader-types\/peek-char","cljs.tools.reader.impl.commons\/read-past","pred","rdr","ch","cljs.tools.reader.reader-types\/read-char","cljs.tools.reader.impl.commons\/skip-line","cljs.tools.reader.impl.utils\/newline?","cljs.tools.reader.impl.commons\/int-pattern","cljs.tools.reader.impl.commons\/ratio-pattern","cljs.tools.reader.impl.commons\/float-pattern","cljs.tools.reader.impl.commons\/match-int","s","m","cljs.core\/vec","cljs.core\/re-find","negate?","a","js\/parseInt","n","bn","js\/isNaN","cljs.tools.reader.impl.commons\/match-ratio","numerator","denominator","cljs.core\/subs","cljs.tools.reader.impl.commons\/match-float","js\/parseFloat","cljs.tools.reader.impl.commons\/matches?","pattern","vec__21062","cljs.core\/nth","match","cljs.tools.reader.impl.commons\/match-number","cljs.tools.reader.impl.commons\/parse-symbol","token","ns-idx","ns","cljs.core\/count","sym","var_args","args__4736__auto__","len__4730__auto__","i__4731__auto__","argseq__4737__auto__","cljs.core\/IndexedSeq","cljs.tools.reader.impl.commons\/read-comment","seq21065","G__21066","cljs.core\/first","cljs.core\/next","self__4717__auto__","_","cljs.tools.reader.impl.commons\/throwing-reader","msg","cljs.tools.reader.impl.errors\/reader-error"]}

docs/js/compiled/out/cljs/tools/reader/impl/errors.cljs

@@ -1,253 +0,0 @@
-;;   Copyright (c) Russ Olsen, Nicola Mometto, Rich Hickey & contributors.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.tools.reader.impl.errors
-  (:require [cljs.tools.reader.reader-types :as types]
-            [clojure.string :as s]
-            [cljs.tools.reader.impl.inspect :as i]))
-
-(defn- ex-details
-  [rdr ex-type]
-  (let [details {:type :reader-exception
-                 :ex-kind ex-type}]
-    (if (types/indexing-reader? rdr)
-      (assoc
-       details
-       :file (types/get-file-name rdr)
-       :line (types/get-line-number rdr)
-       :col (types/get-column-number rdr))
-      details)))
-
-(defn- throw-ex
-  "Throw an ex-info error."
-  [rdr ex-type & msg]
-  (let [details (ex-details rdr ex-type)
-        file (:file details)
-        line (:line details)
-        col (:col details)
-        msg1 (if file (str file " "))
-        msg2 (if line (str "[line " line ", col " col "]"))
-        msg3 (if (or msg1 msg2) " ")
-        full-msg (apply str msg1 msg2 msg3 msg)]
-    (throw (ex-info full-msg details))))
-
-(defn reader-error
-  "Throws an ExceptionInfo with the given message.
-   If rdr is an IndexingReader, additional information about column and line number is provided"
-  [rdr & msgs]
-  (throw-ex rdr :reader-error (apply str msgs)))
-
-(defn illegal-arg-error
-  "Throws an ExceptionInfo with the given message.
-   If rdr is an IndexingReader, additional information about column and line number is provided"
-  [rdr & msgs]
-  (throw-ex rdr :illegal-argument (apply str msgs)))
-
-(defn eof-error
-  "Throws an ExceptionInfo with the given message.
-   If rdr is an IndexingReader, additional information about column and line number is provided"
-  [rdr & msgs]
-  (throw-ex rdr :eof (apply str msgs)))
-
-(defn throw-eof-delimited
-  ([rdr kind column line] (throw-eof-delimited rdr kind line column nil))
-  ([rdr kind line column n]
-   (eof-error
-    rdr
-    "Unexpected EOF while reading "
-    (if n
-      (str "item " n " of "))
-    (name kind)
-    (if line
-      (str ", starting at line " line " and column " column))
-    ".")))
-
-(defn throw-odd-map [rdr line col elements]
-  (reader-error
-   rdr
-   "The map literal starting with "
-   (i/inspect (first elements))
-   (if line (str " on line " line " column " col))
-   " contains "
-   (count elements)
-   " form(s). Map literals must contain an even number of forms."))
-
-(defn throw-invalid-number [rdr token]
-  (reader-error
-   rdr
-   "Invalid number: "
-   token
-   "."))
-
-(defn throw-invalid-unicode-literal [rdr token]
-  (throw
-   (illegal-arg-error
-    rdr
-    "Invalid unicode literal: \\"
-    token
-    ".")))
-
-(defn throw-invalid-unicode-escape [rdr ch]
-  (reader-error
-   rdr
-   "Invalid unicode escape: \\u"
-   ch
-   "."))
-
-(defn throw-invalid [rdr kind token]
-  (reader-error rdr "Invalid " (name kind) ": " token "."))
-
-(defn throw-eof-at-start [rdr kind]
-  (eof-error rdr "Unexpected EOF while reading start of " (name kind) "."))
-
-(defn throw-bad-char [rdr kind ch]
-  (reader-error rdr "Invalid character: " ch " found while reading " (name kind) "."))
-
-(defn throw-eof-at-dispatch [rdr]
-  (eof-error rdr "Unexpected EOF while reading dispatch character."))
-
-(defn throw-bad-dispatch [rdr ch]
-  (reader-error rdr "No dispatch macro for " ch "."))
-
-(defn throw-unmatch-delimiter [rdr ch]
-  (reader-error rdr "Unmatched delimiter " ch "."))
-
-(defn throw-eof-reading [rdr kind & start]
-  (let [init (case kind :regex "#\"" :string \")]
-    (eof-error rdr "Unexpected EOF reading " (name kind) " starting " (apply str init start) ".")))
-
-(defn throw-no-dispatch [rdr ch]
-  (throw-bad-dispatch rdr ch))
-
-(defn throw-invalid-unicode-char[rdr token]
-  (reader-error
-   rdr
-   "Invalid unicode character \\"
-   token
-   "."))
-
-(defn throw-invalid-unicode-digit-in-token[rdr ch token]
-  (illegal-arg-error
-   rdr
-   "Invalid digit "
-   ch
-   " in unicode character \\"
-   token
-   "."))
-
-(defn throw-invalid-unicode-digit[rdr ch]
-  (illegal-arg-error
-   rdr
-   "Invalid digit "
-   ch
-   " in unicode character."))
-
-(defn throw-invalid-unicode-len[rdr actual expected]
-  (illegal-arg-error
-   rdr
-   "Invalid unicode literal. Unicode literals should be "
-   expected
-   "characters long.  "
-   "value suppled is "
-   actual
-   "characters long."))
-
-(defn throw-invalid-character-literal[rdr token]
-  (reader-error rdr "Invalid character literal \\u" token "."))
-
-(defn throw-invalid-octal-len[rdr token]
-  (reader-error
-   rdr
-   "Invalid octal escape sequence in a character literal:"
-   token
-   ". Octal escape sequences must be 3 or fewer digits."))
-
-(defn throw-bad-octal-number [rdr]
-  (reader-error rdr "Octal escape sequence must be in range [0, 377]."))
-
-(defn throw-unsupported-character[rdr token]
-  (reader-error
-   rdr
-   "Unsupported character: "
-   token
-   "."))
-
-(defn throw-eof-in-character [rdr]
-  (eof-error
-   rdr
-   "Unexpected EOF while reading character."))
-
-(defn throw-bad-escape-char [rdr ch]
-  (reader-error rdr "Unsupported escape character: \\" ch "."))
-
-(defn throw-single-colon [rdr]
-  (reader-error rdr "A single colon is not a valid keyword."))
-
-(defn throw-bad-metadata [rdr x]
-  (reader-error
-   rdr
-   "Metadata cannot be "
-   (i/inspect x)
-   ". Metadata must be a Symbol, Keyword, String or Map."))
-
-(defn throw-bad-metadata-target [rdr target]
-  (reader-error
-   rdr
-   "Metadata can not be applied to "
-   (i/inspect target)
-   ". "
-   "Metadata can only be applied to IMetas."))
-
-(defn throw-feature-not-keyword [rdr feature]
-  (reader-error
-   rdr
-   "Feature cannot be "
-   (i/inspect feature)
-   " Features must be keywords."))
-
-(defn throw-ns-map-no-map [rdr ns-name]
-  (reader-error rdr "Namespaced map with namespace " ns-name " does not specify a map."))
-
-(defn throw-bad-ns [rdr ns-name]
-  (reader-error rdr "Invalid value used as namespace in namespaced map: " ns-name "."))
-
-(defn throw-bad-reader-tag [rdr tag]
-  (reader-error
-   rdr
-   "Invalid reader tag: "
-   (i/inspect tag)
-   ". Reader tags must be symbols."))
-
-(defn throw-unknown-reader-tag [rdr tag]
-  (reader-error
-   rdr
-   "No reader function for tag "
-   (i/inspect tag)
-   "."))
-
-(defn- duplicate-keys-error [msg coll]
-  (letfn [(duplicates [seq]
-            (for [[id freq] (frequencies seq)
-                  :when (> freq 1)]
-              id))]
-    (let [dups (duplicates coll)]
-      (apply str msg
-             (when (> (count dups) 1) "s")
-             ": " (interpose ", " dups)))))
-
-(defn throw-dup-keys [rdr kind ks]
-  (reader-error
-   rdr
-   (duplicate-keys-error
-    (str (s/capitalize (name kind)) " literal contains duplicate key")
-    ks)))
-
-(defn throw-eof-error [rdr line]
-  (if line
-    (eof-error rdr "EOF while reading, starting at line " line ".")
-    (eof-error rdr "EOF while reading.")))

docs/js/compiled/out/cljs/tools/reader/impl/errors.js

@@ -1,423 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.tools.reader.impl.errors');
-goog.require('cljs.core');
-goog.require('cljs.tools.reader.reader_types');
-goog.require('clojure.string');
-goog.require('cljs.tools.reader.impl.inspect');
-cljs.tools.reader.impl.errors.ex_details = (function cljs$tools$reader$impl$errors$ex_details(rdr,ex_type){
-var details = new cljs.core.PersistentArrayMap(null, 2, [new cljs.core.Keyword(null,"type","type",1174270348),new cljs.core.Keyword(null,"reader-exception","reader-exception",-1938323098),new cljs.core.Keyword(null,"ex-kind","ex-kind",1581199296),ex_type], null);
-if(cljs.tools.reader.reader_types.indexing_reader_QMARK_.call(null,rdr)){
-return cljs.core.assoc.call(null,details,new cljs.core.Keyword(null,"file","file",-1269645878),cljs.tools.reader.reader_types.get_file_name.call(null,rdr),new cljs.core.Keyword(null,"line","line",212345235),cljs.tools.reader.reader_types.get_line_number.call(null,rdr),new cljs.core.Keyword(null,"col","col",-1959363084),cljs.tools.reader.reader_types.get_column_number.call(null,rdr));
-} else {
-return details;
-}
-});
-/**
- * Throw an ex-info error.
- */
-cljs.tools.reader.impl.errors.throw_ex = (function cljs$tools$reader$impl$errors$throw_ex(var_args){
-var args__4736__auto__ = [];
-var len__4730__auto___21007 = arguments.length;
-var i__4731__auto___21008 = (0);
-while(true){
-if((i__4731__auto___21008 < len__4730__auto___21007)){
-args__4736__auto__.push((arguments[i__4731__auto___21008]));
-
-var G__21009 = (i__4731__auto___21008 + (1));
-i__4731__auto___21008 = G__21009;
-continue;
-} else {
-}
-break;
-}
-
-var argseq__4737__auto__ = ((((2) < args__4736__auto__.length))?(new cljs.core.IndexedSeq(args__4736__auto__.slice((2)),(0),null)):null);
-return cljs.tools.reader.impl.errors.throw_ex.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__4737__auto__);
-});
-
-cljs.tools.reader.impl.errors.throw_ex.cljs$core$IFn$_invoke$arity$variadic = (function (rdr,ex_type,msg){
-var details = cljs.tools.reader.impl.errors.ex_details.call(null,rdr,ex_type);
-var file = new cljs.core.Keyword(null,"file","file",-1269645878).cljs$core$IFn$_invoke$arity$1(details);
-var line = new cljs.core.Keyword(null,"line","line",212345235).cljs$core$IFn$_invoke$arity$1(details);
-var col = new cljs.core.Keyword(null,"col","col",-1959363084).cljs$core$IFn$_invoke$arity$1(details);
-var msg1 = (cljs.core.truth_(file)?[cljs.core.str.cljs$core$IFn$_invoke$arity$1(file)," "].join(''):null);
-var msg2 = (cljs.core.truth_(line)?["[line ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(line),", col ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(col),"]"].join(''):null);
-var msg3 = (cljs.core.truth_((function (){var or__4131__auto__ = msg1;
-if(cljs.core.truth_(or__4131__auto__)){
-return or__4131__auto__;
-} else {
-return msg2;
-}
-})())?" ":null);
-var full_msg = cljs.core.apply.call(null,cljs.core.str,msg1,msg2,msg3,msg);
-throw cljs.core.ex_info.call(null,full_msg,details);
-});
-
-cljs.tools.reader.impl.errors.throw_ex.cljs$lang$maxFixedArity = (2);
-
-/** @this {Function} */
-cljs.tools.reader.impl.errors.throw_ex.cljs$lang$applyTo = (function (seq21004){
-var G__21005 = cljs.core.first.call(null,seq21004);
-var seq21004__$1 = cljs.core.next.call(null,seq21004);
-var G__21006 = cljs.core.first.call(null,seq21004__$1);
-var seq21004__$2 = cljs.core.next.call(null,seq21004__$1);
-var self__4717__auto__ = this;
-return self__4717__auto__.cljs$core$IFn$_invoke$arity$variadic(G__21005,G__21006,seq21004__$2);
-});
-
-/**
- * Throws an ExceptionInfo with the given message.
- * If rdr is an IndexingReader, additional information about column and line number is provided
- */
-cljs.tools.reader.impl.errors.reader_error = (function cljs$tools$reader$impl$errors$reader_error(var_args){
-var args__4736__auto__ = [];
-var len__4730__auto___21012 = arguments.length;
-var i__4731__auto___21013 = (0);
-while(true){
-if((i__4731__auto___21013 < len__4730__auto___21012)){
-args__4736__auto__.push((arguments[i__4731__auto___21013]));
-
-var G__21014 = (i__4731__auto___21013 + (1));
-i__4731__auto___21013 = G__21014;
-continue;
-} else {
-}
-break;
-}
-
-var argseq__4737__auto__ = ((((1) < args__4736__auto__.length))?(new cljs.core.IndexedSeq(args__4736__auto__.slice((1)),(0),null)):null);
-return cljs.tools.reader.impl.errors.reader_error.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),argseq__4737__auto__);
-});
-
-cljs.tools.reader.impl.errors.reader_error.cljs$core$IFn$_invoke$arity$variadic = (function (rdr,msgs){
-return cljs.tools.reader.impl.errors.throw_ex.call(null,rdr,new cljs.core.Keyword(null,"reader-error","reader-error",1610253121),cljs.core.apply.call(null,cljs.core.str,msgs));
-});
-
-cljs.tools.reader.impl.errors.reader_error.cljs$lang$maxFixedArity = (1);
-
-/** @this {Function} */
-cljs.tools.reader.impl.errors.reader_error.cljs$lang$applyTo = (function (seq21010){
-var G__21011 = cljs.core.first.call(null,seq21010);
-var seq21010__$1 = cljs.core.next.call(null,seq21010);
-var self__4717__auto__ = this;
-return self__4717__auto__.cljs$core$IFn$_invoke$arity$variadic(G__21011,seq21010__$1);
-});
-
-/**
- * Throws an ExceptionInfo with the given message.
- * If rdr is an IndexingReader, additional information about column and line number is provided
- */
-cljs.tools.reader.impl.errors.illegal_arg_error = (function cljs$tools$reader$impl$errors$illegal_arg_error(var_args){
-var args__4736__auto__ = [];
-var len__4730__auto___21017 = arguments.length;
-var i__4731__auto___21018 = (0);
-while(true){
-if((i__4731__auto___21018 < len__4730__auto___21017)){
-args__4736__auto__.push((arguments[i__4731__auto___21018]));
-
-var G__21019 = (i__4731__auto___21018 + (1));
-i__4731__auto___21018 = G__21019;
-continue;
-} else {
-}
-break;
-}
-
-var argseq__4737__auto__ = ((((1) < args__4736__auto__.length))?(new cljs.core.IndexedSeq(args__4736__auto__.slice((1)),(0),null)):null);
-return cljs.tools.reader.impl.errors.illegal_arg_error.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),argseq__4737__auto__);
-});
-
-cljs.tools.reader.impl.errors.illegal_arg_error.cljs$core$IFn$_invoke$arity$variadic = (function (rdr,msgs){
-return cljs.tools.reader.impl.errors.throw_ex.call(null,rdr,new cljs.core.Keyword(null,"illegal-argument","illegal-argument",-1845493170),cljs.core.apply.call(null,cljs.core.str,msgs));
-});
-
-cljs.tools.reader.impl.errors.illegal_arg_error.cljs$lang$maxFixedArity = (1);
-
-/** @this {Function} */
-cljs.tools.reader.impl.errors.illegal_arg_error.cljs$lang$applyTo = (function (seq21015){
-var G__21016 = cljs.core.first.call(null,seq21015);
-var seq21015__$1 = cljs.core.next.call(null,seq21015);
-var self__4717__auto__ = this;
-return self__4717__auto__.cljs$core$IFn$_invoke$arity$variadic(G__21016,seq21015__$1);
-});
-
-/**
- * Throws an ExceptionInfo with the given message.
- * If rdr is an IndexingReader, additional information about column and line number is provided
- */
-cljs.tools.reader.impl.errors.eof_error = (function cljs$tools$reader$impl$errors$eof_error(var_args){
-var args__4736__auto__ = [];
-var len__4730__auto___21022 = arguments.length;
-var i__4731__auto___21023 = (0);
-while(true){
-if((i__4731__auto___21023 < len__4730__auto___21022)){
-args__4736__auto__.push((arguments[i__4731__auto___21023]));
-
-var G__21024 = (i__4731__auto___21023 + (1));
-i__4731__auto___21023 = G__21024;
-continue;
-} else {
-}
-break;
-}
-
-var argseq__4737__auto__ = ((((1) < args__4736__auto__.length))?(new cljs.core.IndexedSeq(args__4736__auto__.slice((1)),(0),null)):null);
-return cljs.tools.reader.impl.errors.eof_error.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),argseq__4737__auto__);
-});
-
-cljs.tools.reader.impl.errors.eof_error.cljs$core$IFn$_invoke$arity$variadic = (function (rdr,msgs){
-return cljs.tools.reader.impl.errors.throw_ex.call(null,rdr,new cljs.core.Keyword(null,"eof","eof",-489063237),cljs.core.apply.call(null,cljs.core.str,msgs));
-});
-
-cljs.tools.reader.impl.errors.eof_error.cljs$lang$maxFixedArity = (1);
-
-/** @this {Function} */
-cljs.tools.reader.impl.errors.eof_error.cljs$lang$applyTo = (function (seq21020){
-var G__21021 = cljs.core.first.call(null,seq21020);
-var seq21020__$1 = cljs.core.next.call(null,seq21020);
-var self__4717__auto__ = this;
-return self__4717__auto__.cljs$core$IFn$_invoke$arity$variadic(G__21021,seq21020__$1);
-});
-
-cljs.tools.reader.impl.errors.throw_eof_delimited = (function cljs$tools$reader$impl$errors$throw_eof_delimited(var_args){
-var G__21026 = arguments.length;
-switch (G__21026) {
-case 4:
-return cljs.tools.reader.impl.errors.throw_eof_delimited.cljs$core$IFn$_invoke$arity$4((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]));
-
-break;
-case 5:
-return cljs.tools.reader.impl.errors.throw_eof_delimited.cljs$core$IFn$_invoke$arity$5((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]),(arguments[(4)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.impl.errors.throw_eof_delimited.cljs$core$IFn$_invoke$arity$4 = (function (rdr,kind,column,line){
-return cljs.tools.reader.impl.errors.throw_eof_delimited.call(null,rdr,kind,line,column,null);
-});
-
-cljs.tools.reader.impl.errors.throw_eof_delimited.cljs$core$IFn$_invoke$arity$5 = (function (rdr,kind,line,column,n){
-return cljs.tools.reader.impl.errors.eof_error.call(null,rdr,"Unexpected EOF while reading ",(cljs.core.truth_(n)?["item ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(n)," of "].join(''):null),cljs.core.name.call(null,kind),(cljs.core.truth_(line)?[", starting at line ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(line)," and column ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(column)].join(''):null),".");
-});
-
-cljs.tools.reader.impl.errors.throw_eof_delimited.cljs$lang$maxFixedArity = 5;
-
-cljs.tools.reader.impl.errors.throw_odd_map = (function cljs$tools$reader$impl$errors$throw_odd_map(rdr,line,col,elements){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"The map literal starting with ",cljs.tools.reader.impl.inspect.inspect.call(null,cljs.core.first.call(null,elements)),(cljs.core.truth_(line)?[" on line ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(line)," column ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(col)].join(''):null)," contains ",cljs.core.count.call(null,elements)," form(s). Map literals must contain an even number of forms.");
-});
-cljs.tools.reader.impl.errors.throw_invalid_number = (function cljs$tools$reader$impl$errors$throw_invalid_number(rdr,token){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid number: ",token,".");
-});
-cljs.tools.reader.impl.errors.throw_invalid_unicode_literal = (function cljs$tools$reader$impl$errors$throw_invalid_unicode_literal(rdr,token){
-throw cljs.tools.reader.impl.errors.illegal_arg_error.call(null,rdr,"Invalid unicode literal: \\",token,".");
-});
-cljs.tools.reader.impl.errors.throw_invalid_unicode_escape = (function cljs$tools$reader$impl$errors$throw_invalid_unicode_escape(rdr,ch){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid unicode escape: \\u",ch,".");
-});
-cljs.tools.reader.impl.errors.throw_invalid = (function cljs$tools$reader$impl$errors$throw_invalid(rdr,kind,token){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid ",cljs.core.name.call(null,kind),": ",token,".");
-});
-cljs.tools.reader.impl.errors.throw_eof_at_start = (function cljs$tools$reader$impl$errors$throw_eof_at_start(rdr,kind){
-return cljs.tools.reader.impl.errors.eof_error.call(null,rdr,"Unexpected EOF while reading start of ",cljs.core.name.call(null,kind),".");
-});
-cljs.tools.reader.impl.errors.throw_bad_char = (function cljs$tools$reader$impl$errors$throw_bad_char(rdr,kind,ch){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid character: ",ch," found while reading ",cljs.core.name.call(null,kind),".");
-});
-cljs.tools.reader.impl.errors.throw_eof_at_dispatch = (function cljs$tools$reader$impl$errors$throw_eof_at_dispatch(rdr){
-return cljs.tools.reader.impl.errors.eof_error.call(null,rdr,"Unexpected EOF while reading dispatch character.");
-});
-cljs.tools.reader.impl.errors.throw_bad_dispatch = (function cljs$tools$reader$impl$errors$throw_bad_dispatch(rdr,ch){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"No dispatch macro for ",ch,".");
-});
-cljs.tools.reader.impl.errors.throw_unmatch_delimiter = (function cljs$tools$reader$impl$errors$throw_unmatch_delimiter(rdr,ch){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Unmatched delimiter ",ch,".");
-});
-cljs.tools.reader.impl.errors.throw_eof_reading = (function cljs$tools$reader$impl$errors$throw_eof_reading(var_args){
-var args__4736__auto__ = [];
-var len__4730__auto___21032 = arguments.length;
-var i__4731__auto___21033 = (0);
-while(true){
-if((i__4731__auto___21033 < len__4730__auto___21032)){
-args__4736__auto__.push((arguments[i__4731__auto___21033]));
-
-var G__21034 = (i__4731__auto___21033 + (1));
-i__4731__auto___21033 = G__21034;
-continue;
-} else {
-}
-break;
-}
-
-var argseq__4737__auto__ = ((((2) < args__4736__auto__.length))?(new cljs.core.IndexedSeq(args__4736__auto__.slice((2)),(0),null)):null);
-return cljs.tools.reader.impl.errors.throw_eof_reading.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__4737__auto__);
-});
-
-cljs.tools.reader.impl.errors.throw_eof_reading.cljs$core$IFn$_invoke$arity$variadic = (function (rdr,kind,start){
-var init = (function (){var G__21031 = kind;
-var G__21031__$1 = (((G__21031 instanceof cljs.core.Keyword))?G__21031.fqn:null);
-switch (G__21031__$1) {
-case "regex":
-return "#\"";
-
-break;
-case "string":
-return "\"";
-
-break;
-default:
-throw (new Error(["No matching clause: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(G__21031__$1)].join('')));
-
-}
-})();
-return cljs.tools.reader.impl.errors.eof_error.call(null,rdr,"Unexpected EOF reading ",cljs.core.name.call(null,kind)," starting ",cljs.core.apply.call(null,cljs.core.str,init,start),".");
-});
-
-cljs.tools.reader.impl.errors.throw_eof_reading.cljs$lang$maxFixedArity = (2);
-
-/** @this {Function} */
-cljs.tools.reader.impl.errors.throw_eof_reading.cljs$lang$applyTo = (function (seq21028){
-var G__21029 = cljs.core.first.call(null,seq21028);
-var seq21028__$1 = cljs.core.next.call(null,seq21028);
-var G__21030 = cljs.core.first.call(null,seq21028__$1);
-var seq21028__$2 = cljs.core.next.call(null,seq21028__$1);
-var self__4717__auto__ = this;
-return self__4717__auto__.cljs$core$IFn$_invoke$arity$variadic(G__21029,G__21030,seq21028__$2);
-});
-
-cljs.tools.reader.impl.errors.throw_no_dispatch = (function cljs$tools$reader$impl$errors$throw_no_dispatch(rdr,ch){
-return cljs.tools.reader.impl.errors.throw_bad_dispatch.call(null,rdr,ch);
-});
-cljs.tools.reader.impl.errors.throw_invalid_unicode_char = (function cljs$tools$reader$impl$errors$throw_invalid_unicode_char(rdr,token){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid unicode character \\",token,".");
-});
-cljs.tools.reader.impl.errors.throw_invalid_unicode_digit_in_token = (function cljs$tools$reader$impl$errors$throw_invalid_unicode_digit_in_token(rdr,ch,token){
-return cljs.tools.reader.impl.errors.illegal_arg_error.call(null,rdr,"Invalid digit ",ch," in unicode character \\",token,".");
-});
-cljs.tools.reader.impl.errors.throw_invalid_unicode_digit = (function cljs$tools$reader$impl$errors$throw_invalid_unicode_digit(rdr,ch){
-return cljs.tools.reader.impl.errors.illegal_arg_error.call(null,rdr,"Invalid digit ",ch," in unicode character.");
-});
-cljs.tools.reader.impl.errors.throw_invalid_unicode_len = (function cljs$tools$reader$impl$errors$throw_invalid_unicode_len(rdr,actual,expected){
-return cljs.tools.reader.impl.errors.illegal_arg_error.call(null,rdr,"Invalid unicode literal. Unicode literals should be ",expected,"characters long.  ","value suppled is ",actual,"characters long.");
-});
-cljs.tools.reader.impl.errors.throw_invalid_character_literal = (function cljs$tools$reader$impl$errors$throw_invalid_character_literal(rdr,token){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid character literal \\u",token,".");
-});
-cljs.tools.reader.impl.errors.throw_invalid_octal_len = (function cljs$tools$reader$impl$errors$throw_invalid_octal_len(rdr,token){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid octal escape sequence in a character literal:",token,". Octal escape sequences must be 3 or fewer digits.");
-});
-cljs.tools.reader.impl.errors.throw_bad_octal_number = (function cljs$tools$reader$impl$errors$throw_bad_octal_number(rdr){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Octal escape sequence must be in range [0, 377].");
-});
-cljs.tools.reader.impl.errors.throw_unsupported_character = (function cljs$tools$reader$impl$errors$throw_unsupported_character(rdr,token){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Unsupported character: ",token,".");
-});
-cljs.tools.reader.impl.errors.throw_eof_in_character = (function cljs$tools$reader$impl$errors$throw_eof_in_character(rdr){
-return cljs.tools.reader.impl.errors.eof_error.call(null,rdr,"Unexpected EOF while reading character.");
-});
-cljs.tools.reader.impl.errors.throw_bad_escape_char = (function cljs$tools$reader$impl$errors$throw_bad_escape_char(rdr,ch){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Unsupported escape character: \\",ch,".");
-});
-cljs.tools.reader.impl.errors.throw_single_colon = (function cljs$tools$reader$impl$errors$throw_single_colon(rdr){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"A single colon is not a valid keyword.");
-});
-cljs.tools.reader.impl.errors.throw_bad_metadata = (function cljs$tools$reader$impl$errors$throw_bad_metadata(rdr,x){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Metadata cannot be ",cljs.tools.reader.impl.inspect.inspect.call(null,x),". Metadata must be a Symbol, Keyword, String or Map.");
-});
-cljs.tools.reader.impl.errors.throw_bad_metadata_target = (function cljs$tools$reader$impl$errors$throw_bad_metadata_target(rdr,target){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Metadata can not be applied to ",cljs.tools.reader.impl.inspect.inspect.call(null,target),". ","Metadata can only be applied to IMetas.");
-});
-cljs.tools.reader.impl.errors.throw_feature_not_keyword = (function cljs$tools$reader$impl$errors$throw_feature_not_keyword(rdr,feature){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Feature cannot be ",cljs.tools.reader.impl.inspect.inspect.call(null,feature)," Features must be keywords.");
-});
-cljs.tools.reader.impl.errors.throw_ns_map_no_map = (function cljs$tools$reader$impl$errors$throw_ns_map_no_map(rdr,ns_name){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Namespaced map with namespace ",ns_name," does not specify a map.");
-});
-cljs.tools.reader.impl.errors.throw_bad_ns = (function cljs$tools$reader$impl$errors$throw_bad_ns(rdr,ns_name){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid value used as namespace in namespaced map: ",ns_name,".");
-});
-cljs.tools.reader.impl.errors.throw_bad_reader_tag = (function cljs$tools$reader$impl$errors$throw_bad_reader_tag(rdr,tag){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"Invalid reader tag: ",cljs.tools.reader.impl.inspect.inspect.call(null,tag),". Reader tags must be symbols.");
-});
-cljs.tools.reader.impl.errors.throw_unknown_reader_tag = (function cljs$tools$reader$impl$errors$throw_unknown_reader_tag(rdr,tag){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,"No reader function for tag ",cljs.tools.reader.impl.inspect.inspect.call(null,tag),".");
-});
-cljs.tools.reader.impl.errors.duplicate_keys_error = (function cljs$tools$reader$impl$errors$duplicate_keys_error(msg,coll){
-var duplicates = (function cljs$tools$reader$impl$errors$duplicate_keys_error_$_duplicates(seq){
-var iter__4523__auto__ = (function cljs$tools$reader$impl$errors$duplicate_keys_error_$_duplicates_$_iter__21046(s__21047){
-return (new cljs.core.LazySeq(null,(function (){
-var s__21047__$1 = s__21047;
-while(true){
-var temp__5720__auto__ = cljs.core.seq.call(null,s__21047__$1);
-if(temp__5720__auto__){
-var s__21047__$2 = temp__5720__auto__;
-if(cljs.core.chunked_seq_QMARK_.call(null,s__21047__$2)){
-var c__4521__auto__ = cljs.core.chunk_first.call(null,s__21047__$2);
-var size__4522__auto__ = cljs.core.count.call(null,c__4521__auto__);
-var b__21049 = cljs.core.chunk_buffer.call(null,size__4522__auto__);
-if((function (){var i__21048 = (0);
-while(true){
-if((i__21048 < size__4522__auto__)){
-var vec__21050 = cljs.core._nth.call(null,c__4521__auto__,i__21048);
-var id = cljs.core.nth.call(null,vec__21050,(0),null);
-var freq = cljs.core.nth.call(null,vec__21050,(1),null);
-if((freq > (1))){
-cljs.core.chunk_append.call(null,b__21049,id);
-
-var G__21056 = (i__21048 + (1));
-i__21048 = G__21056;
-continue;
-} else {
-var G__21057 = (i__21048 + (1));
-i__21048 = G__21057;
-continue;
-}
-} else {
-return true;
-}
-break;
-}
-})()){
-return cljs.core.chunk_cons.call(null,cljs.core.chunk.call(null,b__21049),cljs$tools$reader$impl$errors$duplicate_keys_error_$_duplicates_$_iter__21046.call(null,cljs.core.chunk_rest.call(null,s__21047__$2)));
-} else {
-return cljs.core.chunk_cons.call(null,cljs.core.chunk.call(null,b__21049),null);
-}
-} else {
-var vec__21053 = cljs.core.first.call(null,s__21047__$2);
-var id = cljs.core.nth.call(null,vec__21053,(0),null);
-var freq = cljs.core.nth.call(null,vec__21053,(1),null);
-if((freq > (1))){
-return cljs.core.cons.call(null,id,cljs$tools$reader$impl$errors$duplicate_keys_error_$_duplicates_$_iter__21046.call(null,cljs.core.rest.call(null,s__21047__$2)));
-} else {
-var G__21058 = cljs.core.rest.call(null,s__21047__$2);
-s__21047__$1 = G__21058;
-continue;
-}
-}
-} else {
-return null;
-}
-break;
-}
-}),null,null));
-});
-return iter__4523__auto__.call(null,cljs.core.frequencies.call(null,seq));
-});
-var dups = duplicates.call(null,coll);
-return cljs.core.apply.call(null,cljs.core.str,msg,(((cljs.core.count.call(null,dups) > (1)))?"s":null),": ",cljs.core.interpose.call(null,", ",dups));
-});
-cljs.tools.reader.impl.errors.throw_dup_keys = (function cljs$tools$reader$impl$errors$throw_dup_keys(rdr,kind,ks){
-return cljs.tools.reader.impl.errors.reader_error.call(null,rdr,cljs.tools.reader.impl.errors.duplicate_keys_error.call(null,[cljs.core.str.cljs$core$IFn$_invoke$arity$1(clojure.string.capitalize.call(null,cljs.core.name.call(null,kind)))," literal contains duplicate key"].join(''),ks));
-});
-cljs.tools.reader.impl.errors.throw_eof_error = (function cljs$tools$reader$impl$errors$throw_eof_error(rdr,line){
-if(cljs.core.truth_(line)){
-return cljs.tools.reader.impl.errors.eof_error.call(null,rdr,"EOF while reading, starting at line ",line,".");
-} else {
-return cljs.tools.reader.impl.errors.eof_error.call(null,rdr,"EOF while reading.");
-}
-});
-
-//# sourceMappingURL=errors.js.map?rel=1582560146850

docs/js/compiled/out/cljs/tools/reader/impl/inspect.cljs

@@ -1,90 +0,0 @@
-;;   Copyright (c) Russ Olsen, Nicola Mometto, Rich Hickey & contributors.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.tools.reader.impl.inspect)
-
-(declare inspect*)
-
-(defn- inspect*-col [truncate col start end]
-  (let [n (count col)
-        l (if truncate 0 (min 10 n))
-        elements (map (partial inspect* true) (take l col))
-        content (apply str (interpose " " elements))
-        suffix (if (< l n) "...")]
-    (str start content suffix end)))
-
-(defn- dispatch-inspect
-  [_ x]
-  (cond
-   (nil? x) :nil
-   (string? x) :string
-   (keyword? x) :strable
-   (number? x) :strable
-   (symbol? x) :strable
-   (vector? x) :vector
-   (list? x)  :list
-   (map? x) :map
-   (set? x) :set
-   (= x true) :strable
-   (= x false) :strable
-   :default (type x)))
-
-(defmulti inspect* dispatch-inspect)
-
-(defmethod inspect* :string [truncate ^String x]
-  (let [n (if truncate 5 20)
-        suffix (if (> (.-length x) n) "...\"" "\"")]
-    (str
-      \"
-      (.substring ^String x 0 (min n (.-length x)))
-      suffix)))
-
-(defmethod inspect* :strable [truncate x] (str x))
-
-(defmethod inspect* cljs.core/IndexedSeq [truncate x]
-  "<indexed seq>")
-
-(defmethod inspect* cljs.core/PersistentArrayMapSeq [truncate x]
-  "<map seq>")
-
-(defmethod inspect* cljs.core/NodeSeq [truncate x]
-  "<map seq>")
-
-(defmethod inspect* cljs.core/Cons [truncate x] "<cons>")
-
-(defmethod inspect* cljs.core/LazySeq [truncate x] "<lazy seq>")
-
-(defmethod inspect* :nil [_ _] "nil")
-
-(defmethod inspect* :list [truncate col]
-  (inspect*-col truncate col \( \)))
-
-(defmethod inspect* :map [truncate m]
-  (let [len (count m)
-        n-shown (if truncate 0 len)
-        contents (apply concat (take n-shown m))
-        suffix (if (> len n-shown) "...}" \})]
-    (inspect*-col truncate contents \{ suffix)))
-
-(defmethod inspect* :set [truncate col]
-  (inspect*-col truncate col "#{" \}))
-
-(defmethod inspect* :vector [truncate col]
-  (inspect*-col truncate col \[ \]))
-
-(defmethod inspect* :default [truncate x]
-  (pr-str (type x)))
-
-(defn inspect
-  "Return a string description of the value supplied.
-   May be the a string version of the value itself (e.g. \"true\")
-   or it may be a description (e.g. \"an instance of Foo\").
-   If truncate is true then return a very terse version of
-   the inspection."
-  ([x] (inspect* false x))
-  ([truncate x] (inspect* truncate x)))

docs/js/compiled/out/cljs/tools/reader/impl/inspect.cljs.cache.json

@@ -1 +0,0 @@
-["^ ","~:rename-macros",["^ "],"~:renames",["^ "],"~:externs",["^ ","~$Error",["^ "]],"~:use-macros",["^ "],"~:excludes",["~#set",[]],"~:name","~$cljs.tools.reader.impl.inspect","~:imports",null,"~:requires",null,"~:cljs.spec/speced-vars",[],"~:uses",null,"~:defs",["^ ","~$inspect*",["^ ","^7","~$cljs.tools.reader.impl.inspect/inspect*","~:file","resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","~:line",37,"~:column",1,"~:end-line",37,"~:end-column",19,"~:meta",["^ ","^@","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","^A",37,"^B",11,"^C",37,"^D",19],"~:tag","~$cljs.core/MultiFn"],"~$inspect*-col",["^ ","~:protocol-inline",null,"^E",["^ ","^@","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","^A",13,"^B",8,"^C",13,"^D",20,"~:private",true,"~:arglists",["~#list",["~$quote",["^L",[["~$truncate","~$col","~$start","~$end"]]]]]],"^J",true,"^7","~$cljs.tools.reader.impl.inspect/inspect*-col","^@","resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","^D",20,"~:method-params",["^L",[["^N","^O","^P","^Q"]]],"~:protocol-impl",null,"~:arglists-meta",["^L",[null,null]],"^B",1,"~:variadic?",false,"^A",13,"~:ret-tag","~$string","^C",13,"~:max-fixed-arity",4,"~:fn-var",true,"^K",["^L",["^M",["^L",[["^N","^O","^P","^Q"]]]]]],"~$dispatch-inspect",["^ ","^I",null,"^E",["^ ","^@","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","^A",21,"^B",8,"^C",21,"^D",24,"^J",true,"^K",["^L",["^M",["^L",[["~$_","~$x"]]]]]],"^J",true,"^7","~$cljs.tools.reader.impl.inspect/dispatch-inspect","^@","resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","^D",24,"^S",["^L",[["~$_","~$x"]]],"^T",null,"^U",["^L",[null,null]],"^B",1,"^V",false,"^A",21,"^W",["^6",["~$any","~$cljs.core/Keyword","~$clj-nil"]],"^C",21,"^Y",2,"^Z",true,"^K",["^L",["^M",["^L",[["~$_","~$x"]]]]]],"~$inspect",["^ ","^I",null,"^E",["^ ","^@","/home/simon/workspace/geocsv-lite/resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","^A",83,"^B",7,"^C",83,"^D",14,"^K",["^L",["^M",["^L",[["~$x"],["^N","~$x"]]]]],"~:doc","Return a string description of the value supplied.\n   May be the a string version of the value itself (e.g. \"true\")\n   or it may be a description (e.g. \"an instance of Foo\").\n   If truncate is true then return a very terse version of\n   the inspection.","~:top-fn",["^ ","^V",false,"~:fixed-arity",2,"^Y",2,"^S",["^L",[["~$x"],["^N","~$x"]]],"^K",["^L",[["~$x"],["^N","~$x"]]],"^U",["^L",[null,null]]]],"^7","~$cljs.tools.reader.impl.inspect/inspect","^@","resources/public/js/compiled/out/cljs/tools/reader/impl/inspect.cljs","^D",14,"^16",["^ ","^V",false,"^17",2,"^Y",2,"^S",["^L",[["~$x"],["^N","~$x"]]],"^K",["^L",[["~$x"],["^N","~$x"]]],"^U",["^L",[null,null]]],"^S",["^L",[["~$x"],["^N","~$x"]]],"^T",null,"^17",2,"^U",["^L",[null,null]],"^B",1,"^V",false,"~:methods",[["^ ","^17",1,"^V",false,"^F","^11"],["^ ","^17",2,"^V",false,"^F","^11"]],"^A",83,"^C",83,"^Y",2,"^Z",true,"^K",["^L",[["~$x"],["^N","~$x"]]],"^15","Return a string description of the value supplied.\n   May be the a string version of the value itself (e.g. \"true\")\n   or it may be a description (e.g. \"an instance of Foo\").\n   If truncate is true then return a very terse version of\n   the inspection."]],"~:cljs.spec/registry-ref",[],"~:require-macros",null,"~:cljs.analyzer/constants",["^ ","~:seen",["^6",["~:default","~:string","~:vector","~:strable","~:list","~:nil","~:set","~:hierarchy","~:map"]],"~:order",["^1C","^1?","^1A","^1@","^1B","^1F","^1D","^1>","^1E"]],"^15",null]

docs/js/compiled/out/cljs/tools/reader/impl/inspect.js

@@ -1,156 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.tools.reader.impl.inspect');
-goog.require('cljs.core');
-cljs.tools.reader.impl.inspect.inspect_STAR__col = (function cljs$tools$reader$impl$inspect$inspect_STAR__col(truncate,col,start,end){
-var n = cljs.core.count.call(null,col);
-var l = (cljs.core.truth_(truncate)?(0):(function (){var x__4222__auto__ = (10);
-var y__4223__auto__ = n;
-return ((x__4222__auto__ < y__4223__auto__) ? x__4222__auto__ : y__4223__auto__);
-})());
-var elements = cljs.core.map.call(null,cljs.core.partial.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,true),cljs.core.take.call(null,l,col));
-var content = cljs.core.apply.call(null,cljs.core.str,cljs.core.interpose.call(null," ",elements));
-var suffix = (((l < n))?"...":null);
-return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(start),cljs.core.str.cljs$core$IFn$_invoke$arity$1(content),suffix,cljs.core.str.cljs$core$IFn$_invoke$arity$1(end)].join('');
-});
-cljs.tools.reader.impl.inspect.dispatch_inspect = (function cljs$tools$reader$impl$inspect$dispatch_inspect(_,x){
-if((x == null)){
-return new cljs.core.Keyword(null,"nil","nil",99600501);
-} else {
-if(typeof x === 'string'){
-return new cljs.core.Keyword(null,"string","string",-1989541586);
-} else {
-if((x instanceof cljs.core.Keyword)){
-return new cljs.core.Keyword(null,"strable","strable",1877668047);
-} else {
-if(typeof x === 'number'){
-return new cljs.core.Keyword(null,"strable","strable",1877668047);
-} else {
-if((x instanceof cljs.core.Symbol)){
-return new cljs.core.Keyword(null,"strable","strable",1877668047);
-} else {
-if(cljs.core.vector_QMARK_.call(null,x)){
-return new cljs.core.Keyword(null,"vector","vector",1902966158);
-} else {
-if(cljs.core.list_QMARK_.call(null,x)){
-return new cljs.core.Keyword(null,"list","list",765357683);
-} else {
-if(cljs.core.map_QMARK_.call(null,x)){
-return new cljs.core.Keyword(null,"map","map",1371690461);
-} else {
-if(cljs.core.set_QMARK_.call(null,x)){
-return new cljs.core.Keyword(null,"set","set",304602554);
-} else {
-if(cljs.core._EQ_.call(null,x,true)){
-return new cljs.core.Keyword(null,"strable","strable",1877668047);
-} else {
-if(cljs.core._EQ_.call(null,x,false)){
-return new cljs.core.Keyword(null,"strable","strable",1877668047);
-} else {
-return cljs.core.type.call(null,x);
-
-}
-}
-}
-}
-}
-}
-}
-}
-}
-}
-}
-});
-if((typeof cljs !== 'undefined') && (typeof cljs.tools !== 'undefined') && (typeof cljs.tools.reader !== 'undefined') && (typeof cljs.tools.reader.impl !== 'undefined') && (typeof cljs.tools.reader.impl.inspect !== 'undefined') && (typeof cljs.tools.reader.impl.inspect.inspect_STAR_ !== 'undefined')){
-} else {
-cljs.tools.reader.impl.inspect.inspect_STAR_ = (function (){var method_table__4613__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var prefer_table__4614__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var method_cache__4615__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var cached_hierarchy__4616__auto__ = cljs.core.atom.call(null,cljs.core.PersistentArrayMap.EMPTY);
-var hierarchy__4617__auto__ = cljs.core.get.call(null,cljs.core.PersistentArrayMap.EMPTY,new cljs.core.Keyword(null,"hierarchy","hierarchy",-1053470341),cljs.core.get_global_hierarchy.call(null));
-return (new cljs.core.MultiFn(cljs.core.symbol.call(null,"cljs.tools.reader.impl.inspect","inspect*"),cljs.tools.reader.impl.inspect.dispatch_inspect,new cljs.core.Keyword(null,"default","default",-1987822328),hierarchy__4617__auto__,method_table__4613__auto__,prefer_table__4614__auto__,method_cache__4615__auto__,cached_hierarchy__4616__auto__));
-})();
-}
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"string","string",-1989541586),(function (truncate,x){
-var n = (cljs.core.truth_(truncate)?(5):(20));
-var suffix = (((x.length > n))?"...\"":"\"");
-return ["\"",cljs.core.str.cljs$core$IFn$_invoke$arity$1(x.substring((0),(function (){var x__4222__auto__ = n;
-var y__4223__auto__ = x.length;
-return ((x__4222__auto__ < y__4223__auto__) ? x__4222__auto__ : y__4223__auto__);
-})())),suffix].join('');
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"strable","strable",1877668047),(function (truncate,x){
-return cljs.core.str.cljs$core$IFn$_invoke$arity$1(x);
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,cljs.core.IndexedSeq,(function (truncate,x){
-return "<indexed seq>";
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,cljs.core.PersistentArrayMapSeq,(function (truncate,x){
-return "<map seq>";
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,cljs.core.NodeSeq,(function (truncate,x){
-return "<map seq>";
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,cljs.core.Cons,(function (truncate,x){
-return "<cons>";
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,cljs.core.LazySeq,(function (truncate,x){
-return "<lazy seq>";
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"nil","nil",99600501),(function (_,___$1){
-return "nil";
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"list","list",765357683),(function (truncate,col){
-return cljs.tools.reader.impl.inspect.inspect_STAR__col.call(null,truncate,col,"(",")");
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"map","map",1371690461),(function (truncate,m){
-var len = cljs.core.count.call(null,m);
-var n_shown = (cljs.core.truth_(truncate)?(0):len);
-var contents = cljs.core.apply.call(null,cljs.core.concat,cljs.core.take.call(null,n_shown,m));
-var suffix = (((len > n_shown))?"...}":"}");
-return cljs.tools.reader.impl.inspect.inspect_STAR__col.call(null,truncate,contents,"{",suffix);
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"set","set",304602554),(function (truncate,col){
-return cljs.tools.reader.impl.inspect.inspect_STAR__col.call(null,truncate,col,"#{","}");
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"vector","vector",1902966158),(function (truncate,col){
-return cljs.tools.reader.impl.inspect.inspect_STAR__col.call(null,truncate,col,"[","]");
-}));
-cljs.core._add_method.call(null,cljs.tools.reader.impl.inspect.inspect_STAR_,new cljs.core.Keyword(null,"default","default",-1987822328),(function (truncate,x){
-return cljs.core.pr_str.call(null,cljs.core.type.call(null,x));
-}));
-/**
- * Return a string description of the value supplied.
- * May be the a string version of the value itself (e.g. "true")
- * or it may be a description (e.g. "an instance of Foo").
- * If truncate is true then return a very terse version of
- * the inspection.
- */
-cljs.tools.reader.impl.inspect.inspect = (function cljs$tools$reader$impl$inspect$inspect(var_args){
-var G__21000 = arguments.length;
-switch (G__21000) {
-case 1:
-return cljs.tools.reader.impl.inspect.inspect.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.tools.reader.impl.inspect.inspect.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.impl.inspect.inspect.cljs$core$IFn$_invoke$arity$1 = (function (x){
-return cljs.tools.reader.impl.inspect.inspect_STAR_.call(null,false,x);
-});
-
-cljs.tools.reader.impl.inspect.inspect.cljs$core$IFn$_invoke$arity$2 = (function (truncate,x){
-return cljs.tools.reader.impl.inspect.inspect_STAR_.call(null,truncate,x);
-});
-
-cljs.tools.reader.impl.inspect.inspect.cljs$lang$maxFixedArity = 2;
-
-
-//# sourceMappingURL=inspect.js.map?rel=1582560146794

docs/js/compiled/out/cljs/tools/reader/impl/inspect.js.map

@@ -1 +0,0 @@
-{"version":3,"file":"\/home\/simon\/workspace\/geocsv-lite\/resources\/public\/js\/compiled\/out\/cljs\/tools\/reader\/impl\/inspect.js","sources":["inspect.cljs?rel=1582560146795"],"lineCount":156,"mappings":";AAQA;;AAEA,AAAA,AAEA,mDAAA,nDAAOA,8GAAcC,SAASC,IAAIC,MAAMC;AAAxC,AACE,IAAMC,IAAE,AAACC,0BAAMJ;IACTK,IAAE,4BAAA,VAAIN,cAAW,iBAAAO,kBAAA;IAAAC,kBAAQJ;AAAR,AAAA,SAAAG,kBAAAC,mBAAAD,kBAAAC;;IACjBC,WAAS,AAACC,wBAAI,yEAAA,zEAACC,4BAAQC,mDAAe,AAACC,yBAAKP,EAAEL;IAC9Ca,UAAQ,AAACC,0BAAMC,cAAI,8BAAA,9BAACC,kCAAcR;IAClCS,SAAO,WAAA,MAAA,fAAI,CAAGZ,IAAEF;AAJtB,AAKE,oDAAKF,mDAAMY,SAAQI,mDAAOf;;AAE9B,kDAAA,lDAAOgB,4GACJC,EAAEC;AADL,AAEE,GACC,MAAA,LAAMA;AADP;;AAAA,GAEC,OAASA;AAFV;;AAAA,GAGC,cAAAC,bAAUD;AAHX;;AAAA,GAIC,OAASA;AAJV;;AAAA,GAKC,cAAAE,bAASF;AALV;;AAAA,GAMC,AAACG,kCAAQH;AANV;;AAAA,GAOC,AAACI,gCAAMJ;AAPR;;AAAA,GAQC,AAACK,+BAAKL;AARP;;AAAA,GASC,AAACM,+BAAKN;AATP;;AAAA,GAUC,2BAAA,3BAACO,yBAAEP;AAVJ;;AAAA,GAWC,2BAAA,3BAACO,yBAAEP;AAXJ;;AAAA,AAYU,OAACQ,yBAAKR;;;;;;;;;;;;;;AAElB,GAAA,QAAAS,iCAAAC,uCAAAC,8CAAAC,mDAAAC,2DAAAC;AAAA;AAAA,AAAA,+CAAA,iBAAAC,6BAAA,AAAAC,yBAAA,tHAAUzB;IAAV0B,6BAAA,AAAAD,yBAAA;IAAAE,6BAAA,AAAAF,yBAAA;IAAAG,iCAAA,AAAAH,yBAAA;IAAAI,0BAAA,AAAAC,wBAAA,mCAAA,gEAAA,AAAA;AAAA,AAAA,YAAAC,kBAAA,AAAAC,2BAAA,iCAAA,4DAAA,4DAAAH,wBAAAL,2BAAAE,2BAAAC,2BAAAC,rNAAmBrB;;;AAEnB,AAAA0B,gCAAAjC,6CAAA,0DAAA,WAA6BZ,SAAiBqB;AAA9C,AACE,IAAMjB,IAAE,4BAAA,IAAA,dAAIJ;IACNkB,SAAO,kBAAA,QAAA,xBAAI,CAAG,AAAUG,WAAGjB;AADjC,AAEE,QAAA,iDAEE,YAAA,ZAAoBiB,gBAAI,iBAAAd,kBAAKH;IAALI,kBAAO,AAAUa;AAAjB,AAAA,SAAAd,kBAAAC,mBAAAD,kBAAAC;OACxBU;;AAEN,AAAA2B,gCAAAjC,6CAAA,2DAAA,WAA8BZ,SAASqB;AAAvC,AAA0C,mDAAKA;;AAE\/C,AAAAwB,gCAAAjC,kEAAA,rBAAoBkC,gCAAsB9C,SAASqB;AAAnD,AAAA;;AAGA,AAAAwB,gCAAAjC,6EAAA,hCAAoBmC,2CAAiC\/C,SAASqB;AAA9D,AAAA;;AAGA,AAAAwB,gCAAAjC,+DAAA,lBAAoBoC,6BAAmBhD,SAASqB;AAAhD,AAAA;;AAGA,AAAAwB,gCAAAjC,4DAAA,fAAoBqC,0BAAgBjD,SAASqB;AAA7C,AAAA;;AAEA,AAAAwB,gCAAAjC,+DAAA,lBAAoBsC,6BAAmBlD,SAASqB;AAAhD,AAAA;;AAEA,AAAAwB,gCAAAjC,6CAAA,iDAAA,WAA0BQ,EAAEA;AAA5B,AAAA;;AAEA,AAAAyB,gCAAAjC,6CAAA,oDAAA,WAA2BZ,SAASC;AAApC,AACE,+EAAA,IAAA,5EAACF,2DAAaC,SAASC;;AAEzB,AAAA4C,gCAAAjC,6CAAA,mDAAA,WAA0BZ,SAASmD;AAAnC,AACE,IAAMC,MAAI,AAAC\/C,0BAAM8C;IACXE,UAAQ,4BAAA,VAAIrD,cAAWoD;IACvBE,WAAS,AAACvC,0BAAMwC,iBAAO,AAAC1C,yBAAKwC,QAAQF;IACrCjC,SAAO,mBAAA,OAAA,xBAAI,CAAGkC,MAAIC;AAHxB,AAIE,oFAAA,7EAACtD,2DAAaC,SAASsD,aAAYpC;;AAEvC,AAAA2B,gCAAAjC,6CAAA,kDAAA,WAA0BZ,SAASC;AAAnC,AACE,+EAAA,KAAA,7EAACF,2DAAaC,SAASC;;AAEzB,AAAA4C,gCAAAjC,6CAAA,yDAAA,WAA6BZ,SAASC;AAAtC,AACE,+EAAA,IAAA,5EAACF,2DAAaC,SAASC;;AAEzB,AAAA4C,gCAAAjC,6CAAA,4DAAA,WAA8BZ,SAASqB;AAAvC,AACE,OAACmC,2BAAO,AAAC3B,yBAAKR;;AAEhB,AAAA;;;;;;;yCAAA,iDAAAoC,1FAAME;AAAN,AAAA,IAAAD,WAAA,AAAA;AAAA,AAAA,QAAAA;KAAA;AAAA,OAAAC,qEAAA,CAAA,UAAA;;;KAAA;AAAA,OAAAA,qEAAA,CAAA,UAAA,MAAA,CAAA,UAAA;;;;AAAA,MAAA,KAAAC,MAAA,CAAA,8DAAA,AAAA;;;;;AAAA,AAAA,uEAAA,vEAAMD,kFAMFtC;AANJ,AAMO,8DAAA,vDAACT,6DAAeS;;;AANvB,AAAA,uEAAA,vEAAMsC,kFAOF3D,SAASqB;AAPb,AAOgB,OAACT,uDAASZ,SAASqB;;;AAPnC,AAAA,iEAAA,jEAAMsC;;AAAN","names":["cljs.tools.reader.impl.inspect\/inspect*-col","truncate","col","start","end","n","cljs.core\/count","l","x__4222__auto__","y__4223__auto__","elements","cljs.core\/map","cljs.core\/partial","cljs.tools.reader.impl.inspect\/inspect*","cljs.core\/take","content","cljs.core\/apply","cljs.core\/str","cljs.core\/interpose","suffix","cljs.tools.reader.impl.inspect\/dispatch-inspect","_","x","cljs.core\/Keyword","cljs.core\/Symbol","cljs.core\/vector?","cljs.core\/list?","cljs.core\/map?","cljs.core\/set?","cljs.core\/=","cljs.core\/type","js\/cljs","js\/cljs.tools","js\/cljs.tools.reader","js\/cljs.tools.reader.impl","js\/cljs.tools.reader.impl.inspect","js\/cljs.tools.reader.impl.inspect.inspect*","method-table__4613__auto__","cljs.core\/atom","prefer-table__4614__auto__","method-cache__4615__auto__","cached-hierarchy__4616__auto__","hierarchy__4617__auto__","cljs.core\/get","cljs.core\/MultiFn","cljs.core\/symbol","cljs.core\/-add-method","cljs.core\/IndexedSeq","cljs.core\/PersistentArrayMapSeq","cljs.core\/NodeSeq","cljs.core\/Cons","cljs.core\/LazySeq","m","len","n-shown","contents","cljs.core\/concat","cljs.core\/pr-str","var_args","G__21000","cljs.tools.reader.impl.inspect\/inspect","js\/Error"]}

docs/js/compiled/out/cljs/tools/reader/impl/utils.cljs

@@ -1,103 +0,0 @@
-;;   Copyright (c) Nicola Mometto, Rich Hickey & contributors.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns cljs.tools.reader.impl.utils
-  (:refer-clojure :exclude [char])
-  (:require
-   [clojure.string :as string]
-   [goog.string :as gstring]))
-
-(defn char [x]
-  (when-not (nil? x)
-    (cljs.core/char x)))
-
-(defn ^boolean ex-info? [ex]
-  (instance? cljs.core.ExceptionInfo ex))
-
-(defrecord ReaderConditional [splicing? form])
-
-(defn ^boolean reader-conditional?
-  "Return true if the value is the data representation of a reader conditional"
-  [value]
-  (instance? ReaderConditional value))
-
-(defn reader-conditional
-  "Construct a data representation of a reader conditional.
-  If true, splicing? indicates read-cond-splicing."
-  [form splicing?]
-  (ReaderConditional. splicing? form))
-
-(extend-protocol IPrintWithWriter
-  ReaderConditional
-  (-pr-writer [coll writer opts]
-    (-write writer (str "#?" (when (:splicing? coll) "@")))
-    (pr-writer (:form coll) writer opts)))
-
-(def ws-rx #"[\s]")
-
-(defn ^boolean whitespace?
-  "Checks whether a given character is whitespace"
-  [ch]
-  (when-not (nil? ch)
-    (if (identical? ch \,)
-      true
-      (.test ws-rx ch))))
-
-(defn ^boolean numeric?
-  "Checks whether a given character is numeric"
-  [ch]
-  (when-not (nil? ch)
-    (gstring/isNumeric ch)))
-
-(defn ^boolean newline?
-  "Checks whether the character is a newline"
-  [c]
-  (or (identical? \newline c)
-      (identical? "\n" c)
-      (nil? c)))
-
-(defn desugar-meta
-  "Resolves syntactical sugar in metadata" ;; could be combined with some other desugar?
-  [f]
-  (cond
-    (keyword? f) {f true}
-    (symbol? f)  {:tag f}
-    (string? f)  {:tag f}
-    :else        f))
-
-(def last-id (atom 0))
-
-(defn next-id
-  []
-  (swap! last-id inc))
-
-(defn namespace-keys [ns keys]
-  (for [key keys]
-    (if (or (symbol? key)
-            (keyword? key))
-      (let [[key-ns key-name] ((juxt namespace name) key)
-            ->key (if (symbol? key) symbol keyword)]
-        (cond
-          (nil? key-ns)
-          (->key ns key-name)
-
-          (= "_" key-ns)
-          (->key key-name)
-
-          :else
-          key))
-      key)))
-
-(defn second' [[a b]]
-  (when-not a b))
-
-(defn char-code [ch base]
-  (let [code (js/parseInt ch base)]
-    (if (js/isNaN code)
-      -1
-      code)))

docs/js/compiled/out/cljs/tools/reader/impl/utils.js

@@ -1,391 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.tools.reader.impl.utils');
-goog.require('cljs.core');
-goog.require('clojure.string');
-goog.require('goog.string');
-cljs.tools.reader.impl.utils.char$ = (function cljs$tools$reader$impl$utils$char(x){
-if((x == null)){
-return null;
-} else {
-return cljs.core.char$.call(null,x);
-}
-});
-cljs.tools.reader.impl.utils.ex_info_QMARK_ = (function cljs$tools$reader$impl$utils$ex_info_QMARK_(ex){
-return (ex instanceof cljs.core.ExceptionInfo);
-});
-
-/**
-* @constructor
- * @implements {cljs.core.IRecord}
- * @implements {cljs.core.IKVReduce}
- * @implements {cljs.core.IEquiv}
- * @implements {cljs.core.IHash}
- * @implements {cljs.core.ICollection}
- * @implements {cljs.core.ICounted}
- * @implements {cljs.core.ISeqable}
- * @implements {cljs.core.IMeta}
- * @implements {cljs.core.ICloneable}
- * @implements {cljs.core.IPrintWithWriter}
- * @implements {cljs.core.IIterable}
- * @implements {cljs.core.IWithMeta}
- * @implements {cljs.core.IAssociative}
- * @implements {cljs.core.IMap}
- * @implements {cljs.core.ILookup}
-*/
-cljs.tools.reader.impl.utils.ReaderConditional = (function (splicing_QMARK_,form,__meta,__extmap,__hash){
-this.splicing_QMARK_ = splicing_QMARK_;
-this.form = form;
-this.__meta = __meta;
-this.__extmap = __extmap;
-this.__hash = __hash;
-this.cljs$lang$protocol_mask$partition0$ = 2230716170;
-this.cljs$lang$protocol_mask$partition1$ = 139264;
-});
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$ILookup$_lookup$arity$2 = (function (this__4385__auto__,k__4386__auto__){
-var self__ = this;
-var this__4385__auto____$1 = this;
-return this__4385__auto____$1.cljs$core$ILookup$_lookup$arity$3(null,k__4386__auto__,null);
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$ILookup$_lookup$arity$3 = (function (this__4387__auto__,k20953,else__4388__auto__){
-var self__ = this;
-var this__4387__auto____$1 = this;
-var G__20957 = k20953;
-var G__20957__$1 = (((G__20957 instanceof cljs.core.Keyword))?G__20957.fqn:null);
-switch (G__20957__$1) {
-case "splicing?":
-return self__.splicing_QMARK_;
-
-break;
-case "form":
-return self__.form;
-
-break;
-default:
-return cljs.core.get.call(null,self__.__extmap,k20953,else__4388__auto__);
-
-}
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IKVReduce$_kv_reduce$arity$3 = (function (this__4404__auto__,f__4405__auto__,init__4406__auto__){
-var self__ = this;
-var this__4404__auto____$1 = this;
-return cljs.core.reduce.call(null,((function (this__4404__auto____$1){
-return (function (ret__4407__auto__,p__20958){
-var vec__20959 = p__20958;
-var k__4408__auto__ = cljs.core.nth.call(null,vec__20959,(0),null);
-var v__4409__auto__ = cljs.core.nth.call(null,vec__20959,(1),null);
-return f__4405__auto__.call(null,ret__4407__auto__,k__4408__auto__,v__4409__auto__);
-});})(this__4404__auto____$1))
-,init__4406__auto__,this__4404__auto____$1);
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IPrintWithWriter$_pr_writer$arity$3 = (function (this__4399__auto__,writer__4400__auto__,opts__4401__auto__){
-var self__ = this;
-var this__4399__auto____$1 = this;
-var pr_pair__4402__auto__ = ((function (this__4399__auto____$1){
-return (function (keyval__4403__auto__){
-return cljs.core.pr_sequential_writer.call(null,writer__4400__auto__,cljs.core.pr_writer,""," ","",opts__4401__auto__,keyval__4403__auto__);
-});})(this__4399__auto____$1))
-;
-return cljs.core.pr_sequential_writer.call(null,writer__4400__auto__,pr_pair__4402__auto__,"#cljs.tools.reader.impl.utils.ReaderConditional{",", ","}",opts__4401__auto__,cljs.core.concat.call(null,new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[new cljs.core.Keyword(null,"splicing?","splicing?",-428596366),self__.splicing_QMARK_],null)),(new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,[new cljs.core.Keyword(null,"form","form",-1624062471),self__.form],null))], null),self__.__extmap));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IIterable$_iterator$arity$1 = (function (G__20952){
-var self__ = this;
-var G__20952__$1 = this;
-return (new cljs.core.RecordIter((0),G__20952__$1,2,new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Keyword(null,"splicing?","splicing?",-428596366),new cljs.core.Keyword(null,"form","form",-1624062471)], null),(cljs.core.truth_(self__.__extmap)?cljs.core._iterator.call(null,self__.__extmap):cljs.core.nil_iter.call(null))));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IMeta$_meta$arity$1 = (function (this__4383__auto__){
-var self__ = this;
-var this__4383__auto____$1 = this;
-return self__.__meta;
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$ICloneable$_clone$arity$1 = (function (this__4380__auto__){
-var self__ = this;
-var this__4380__auto____$1 = this;
-return (new cljs.tools.reader.impl.utils.ReaderConditional(self__.splicing_QMARK_,self__.form,self__.__meta,self__.__extmap,self__.__hash));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$ICounted$_count$arity$1 = (function (this__4389__auto__){
-var self__ = this;
-var this__4389__auto____$1 = this;
-return (2 + cljs.core.count.call(null,self__.__extmap));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IHash$_hash$arity$1 = (function (this__4381__auto__){
-var self__ = this;
-var this__4381__auto____$1 = this;
-var h__4243__auto__ = self__.__hash;
-if((!((h__4243__auto__ == null)))){
-return h__4243__auto__;
-} else {
-var h__4243__auto____$1 = ((function (h__4243__auto__,this__4381__auto____$1){
-return (function (coll__4382__auto__){
-return (-209062840 ^ cljs.core.hash_unordered_coll.call(null,coll__4382__auto__));
-});})(h__4243__auto__,this__4381__auto____$1))
-.call(null,this__4381__auto____$1);
-self__.__hash = h__4243__auto____$1;
-
-return h__4243__auto____$1;
-}
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IEquiv$_equiv$arity$2 = (function (this20954,other20955){
-var self__ = this;
-var this20954__$1 = this;
-return (((!((other20955 == null)))) && ((this20954__$1.constructor === other20955.constructor)) && (cljs.core._EQ_.call(null,this20954__$1.splicing_QMARK_,other20955.splicing_QMARK_)) && (cljs.core._EQ_.call(null,this20954__$1.form,other20955.form)) && (cljs.core._EQ_.call(null,this20954__$1.__extmap,other20955.__extmap)));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IMap$_dissoc$arity$2 = (function (this__4394__auto__,k__4395__auto__){
-var self__ = this;
-var this__4394__auto____$1 = this;
-if(cljs.core.contains_QMARK_.call(null,new cljs.core.PersistentHashSet(null, new cljs.core.PersistentArrayMap(null, 2, [new cljs.core.Keyword(null,"splicing?","splicing?",-428596366),null,new cljs.core.Keyword(null,"form","form",-1624062471),null], null), null),k__4395__auto__)){
-return cljs.core.dissoc.call(null,cljs.core._with_meta.call(null,cljs.core.into.call(null,cljs.core.PersistentArrayMap.EMPTY,this__4394__auto____$1),self__.__meta),k__4395__auto__);
-} else {
-return (new cljs.tools.reader.impl.utils.ReaderConditional(self__.splicing_QMARK_,self__.form,self__.__meta,cljs.core.not_empty.call(null,cljs.core.dissoc.call(null,self__.__extmap,k__4395__auto__)),null));
-}
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IAssociative$_assoc$arity$3 = (function (this__4392__auto__,k__4393__auto__,G__20952){
-var self__ = this;
-var this__4392__auto____$1 = this;
-var pred__20962 = cljs.core.keyword_identical_QMARK_;
-var expr__20963 = k__4393__auto__;
-if(cljs.core.truth_(pred__20962.call(null,new cljs.core.Keyword(null,"splicing?","splicing?",-428596366),expr__20963))){
-return (new cljs.tools.reader.impl.utils.ReaderConditional(G__20952,self__.form,self__.__meta,self__.__extmap,null));
-} else {
-if(cljs.core.truth_(pred__20962.call(null,new cljs.core.Keyword(null,"form","form",-1624062471),expr__20963))){
-return (new cljs.tools.reader.impl.utils.ReaderConditional(self__.splicing_QMARK_,G__20952,self__.__meta,self__.__extmap,null));
-} else {
-return (new cljs.tools.reader.impl.utils.ReaderConditional(self__.splicing_QMARK_,self__.form,self__.__meta,cljs.core.assoc.call(null,self__.__extmap,k__4393__auto__,G__20952),null));
-}
-}
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$ISeqable$_seq$arity$1 = (function (this__4397__auto__){
-var self__ = this;
-var this__4397__auto____$1 = this;
-return cljs.core.seq.call(null,cljs.core.concat.call(null,new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [(new cljs.core.MapEntry(new cljs.core.Keyword(null,"splicing?","splicing?",-428596366),self__.splicing_QMARK_,null)),(new cljs.core.MapEntry(new cljs.core.Keyword(null,"form","form",-1624062471),self__.form,null))], null),self__.__extmap));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IWithMeta$_with_meta$arity$2 = (function (this__4384__auto__,G__20952){
-var self__ = this;
-var this__4384__auto____$1 = this;
-return (new cljs.tools.reader.impl.utils.ReaderConditional(self__.splicing_QMARK_,self__.form,G__20952,self__.__extmap,self__.__hash));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$ICollection$_conj$arity$2 = (function (this__4390__auto__,entry__4391__auto__){
-var self__ = this;
-var this__4390__auto____$1 = this;
-if(cljs.core.vector_QMARK_.call(null,entry__4391__auto__)){
-return this__4390__auto____$1.cljs$core$IAssociative$_assoc$arity$3(null,cljs.core._nth.call(null,entry__4391__auto__,(0)),cljs.core._nth.call(null,entry__4391__auto__,(1)));
-} else {
-return cljs.core.reduce.call(null,cljs.core._conj,this__4390__auto____$1,entry__4391__auto__);
-}
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"splicing?","splicing?",1211935161,null),new cljs.core.Symbol(null,"form","form",16469056,null)], null);
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.cljs$lang$type = true;
-
-cljs.tools.reader.impl.utils.ReaderConditional.cljs$lang$ctorPrSeq = (function (this__4428__auto__){
-return (new cljs.core.List(null,"cljs.tools.reader.impl.utils/ReaderConditional",null,(1),null));
-});
-
-cljs.tools.reader.impl.utils.ReaderConditional.cljs$lang$ctorPrWriter = (function (this__4428__auto__,writer__4429__auto__){
-return cljs.core._write.call(null,writer__4429__auto__,"cljs.tools.reader.impl.utils/ReaderConditional");
-});
-
-/**
- * Positional factory function for cljs.tools.reader.impl.utils/ReaderConditional.
- */
-cljs.tools.reader.impl.utils.__GT_ReaderConditional = (function cljs$tools$reader$impl$utils$__GT_ReaderConditional(splicing_QMARK_,form){
-return (new cljs.tools.reader.impl.utils.ReaderConditional(splicing_QMARK_,form,null,null,null));
-});
-
-/**
- * Factory function for cljs.tools.reader.impl.utils/ReaderConditional, taking a map of keywords to field values.
- */
-cljs.tools.reader.impl.utils.map__GT_ReaderConditional = (function cljs$tools$reader$impl$utils$map__GT_ReaderConditional(G__20956){
-var extmap__4424__auto__ = (function (){var G__20965 = cljs.core.dissoc.call(null,G__20956,new cljs.core.Keyword(null,"splicing?","splicing?",-428596366),new cljs.core.Keyword(null,"form","form",-1624062471));
-if(cljs.core.record_QMARK_.call(null,G__20956)){
-return cljs.core.into.call(null,cljs.core.PersistentArrayMap.EMPTY,G__20965);
-} else {
-return G__20965;
-}
-})();
-return (new cljs.tools.reader.impl.utils.ReaderConditional(new cljs.core.Keyword(null,"splicing?","splicing?",-428596366).cljs$core$IFn$_invoke$arity$1(G__20956),new cljs.core.Keyword(null,"form","form",-1624062471).cljs$core$IFn$_invoke$arity$1(G__20956),null,cljs.core.not_empty.call(null,extmap__4424__auto__),null));
-});
-
-/**
- * Return true if the value is the data representation of a reader conditional
- */
-cljs.tools.reader.impl.utils.reader_conditional_QMARK_ = (function cljs$tools$reader$impl$utils$reader_conditional_QMARK_(value){
-return (value instanceof cljs.tools.reader.impl.utils.ReaderConditional);
-});
-/**
- * Construct a data representation of a reader conditional.
- *   If true, splicing? indicates read-cond-splicing.
- */
-cljs.tools.reader.impl.utils.reader_conditional = (function cljs$tools$reader$impl$utils$reader_conditional(form,splicing_QMARK_){
-return (new cljs.tools.reader.impl.utils.ReaderConditional(splicing_QMARK_,form,null,null,null));
-});
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IPrintWithWriter$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.impl.utils.ReaderConditional.prototype.cljs$core$IPrintWithWriter$_pr_writer$arity$3 = (function (coll,writer,opts){
-var coll__$1 = this;
-cljs.core._write.call(null,writer,["#?",(cljs.core.truth_(new cljs.core.Keyword(null,"splicing?","splicing?",-428596366).cljs$core$IFn$_invoke$arity$1(coll__$1))?"@":null)].join(''));
-
-return cljs.core.pr_writer.call(null,new cljs.core.Keyword(null,"form","form",-1624062471).cljs$core$IFn$_invoke$arity$1(coll__$1),writer,opts);
-});
-cljs.tools.reader.impl.utils.ws_rx = /[\s]/;
-/**
- * Checks whether a given character is whitespace
- */
-cljs.tools.reader.impl.utils.whitespace_QMARK_ = (function cljs$tools$reader$impl$utils$whitespace_QMARK_(ch){
-if((ch == null)){
-return null;
-} else {
-if((ch === ",")){
-return true;
-} else {
-return cljs.tools.reader.impl.utils.ws_rx.test(ch);
-}
-}
-});
-/**
- * Checks whether a given character is numeric
- */
-cljs.tools.reader.impl.utils.numeric_QMARK_ = (function cljs$tools$reader$impl$utils$numeric_QMARK_(ch){
-if((ch == null)){
-return null;
-} else {
-return goog.string.isNumeric(ch);
-}
-});
-/**
- * Checks whether the character is a newline
- */
-cljs.tools.reader.impl.utils.newline_QMARK_ = (function cljs$tools$reader$impl$utils$newline_QMARK_(c){
-return ((("\n" === c)) || (("\n" === c)) || ((c == null)));
-});
-/**
- * Resolves syntactical sugar in metadata
- */
-cljs.tools.reader.impl.utils.desugar_meta = (function cljs$tools$reader$impl$utils$desugar_meta(f){
-if((f instanceof cljs.core.Keyword)){
-return cljs.core.PersistentArrayMap.createAsIfByAssoc([f,true]);
-} else {
-if((f instanceof cljs.core.Symbol)){
-return new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tag","tag",-1290361223),f], null);
-} else {
-if(typeof f === 'string'){
-return new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tag","tag",-1290361223),f], null);
-} else {
-return f;
-
-}
-}
-}
-});
-cljs.tools.reader.impl.utils.last_id = cljs.core.atom.call(null,(0));
-cljs.tools.reader.impl.utils.next_id = (function cljs$tools$reader$impl$utils$next_id(){
-return cljs.core.swap_BANG_.call(null,cljs.tools.reader.impl.utils.last_id,cljs.core.inc);
-});
-cljs.tools.reader.impl.utils.namespace_keys = (function cljs$tools$reader$impl$utils$namespace_keys(ns,keys){
-var iter__4523__auto__ = (function cljs$tools$reader$impl$utils$namespace_keys_$_iter__20967(s__20968){
-return (new cljs.core.LazySeq(null,(function (){
-var s__20968__$1 = s__20968;
-while(true){
-var temp__5720__auto__ = cljs.core.seq.call(null,s__20968__$1);
-if(temp__5720__auto__){
-var s__20968__$2 = temp__5720__auto__;
-if(cljs.core.chunked_seq_QMARK_.call(null,s__20968__$2)){
-var c__4521__auto__ = cljs.core.chunk_first.call(null,s__20968__$2);
-var size__4522__auto__ = cljs.core.count.call(null,c__4521__auto__);
-var b__20970 = cljs.core.chunk_buffer.call(null,size__4522__auto__);
-if((function (){var i__20969 = (0);
-while(true){
-if((i__20969 < size__4522__auto__)){
-var key = cljs.core._nth.call(null,c__4521__auto__,i__20969);
-cljs.core.chunk_append.call(null,b__20970,(((((key instanceof cljs.core.Symbol)) || ((key instanceof cljs.core.Keyword))))?(function (){var vec__20971 = cljs.core.juxt.call(null,cljs.core.namespace,cljs.core.name).call(null,key);
-var key_ns = cljs.core.nth.call(null,vec__20971,(0),null);
-var key_name = cljs.core.nth.call(null,vec__20971,(1),null);
-var __GT_key = (((key instanceof cljs.core.Symbol))?cljs.core.symbol:cljs.core.keyword);
-if((key_ns == null)){
-return __GT_key.call(null,ns,key_name);
-} else {
-if(cljs.core._EQ_.call(null,"_",key_ns)){
-return __GT_key.call(null,key_name);
-} else {
-return key;
-
-}
-}
-})():key));
-
-var G__20977 = (i__20969 + (1));
-i__20969 = G__20977;
-continue;
-} else {
-return true;
-}
-break;
-}
-})()){
-return cljs.core.chunk_cons.call(null,cljs.core.chunk.call(null,b__20970),cljs$tools$reader$impl$utils$namespace_keys_$_iter__20967.call(null,cljs.core.chunk_rest.call(null,s__20968__$2)));
-} else {
-return cljs.core.chunk_cons.call(null,cljs.core.chunk.call(null,b__20970),null);
-}
-} else {
-var key = cljs.core.first.call(null,s__20968__$2);
-return cljs.core.cons.call(null,(((((key instanceof cljs.core.Symbol)) || ((key instanceof cljs.core.Keyword))))?(function (){var vec__20974 = cljs.core.juxt.call(null,cljs.core.namespace,cljs.core.name).call(null,key);
-var key_ns = cljs.core.nth.call(null,vec__20974,(0),null);
-var key_name = cljs.core.nth.call(null,vec__20974,(1),null);
-var __GT_key = (((key instanceof cljs.core.Symbol))?cljs.core.symbol:cljs.core.keyword);
-if((key_ns == null)){
-return __GT_key.call(null,ns,key_name);
-} else {
-if(cljs.core._EQ_.call(null,"_",key_ns)){
-return __GT_key.call(null,key_name);
-} else {
-return key;
-
-}
-}
-})():key),cljs$tools$reader$impl$utils$namespace_keys_$_iter__20967.call(null,cljs.core.rest.call(null,s__20968__$2)));
-}
-} else {
-return null;
-}
-break;
-}
-}),null,null));
-});
-return iter__4523__auto__.call(null,keys);
-});
-cljs.tools.reader.impl.utils.second_SINGLEQUOTE_ = (function cljs$tools$reader$impl$utils$second_SINGLEQUOTE_(p__20978){
-var vec__20979 = p__20978;
-var a = cljs.core.nth.call(null,vec__20979,(0),null);
-var b = cljs.core.nth.call(null,vec__20979,(1),null);
-if(cljs.core.truth_(a)){
-return null;
-} else {
-return b;
-}
-});
-cljs.tools.reader.impl.utils.char_code = (function cljs$tools$reader$impl$utils$char_code(ch,base){
-var code = parseInt(ch,base);
-if(cljs.core.truth_(isNaN(code))){
-return (-1);
-} else {
-return code;
-}
-});
-
-//# sourceMappingURL=utils.js.map?rel=1582560146689

docs/js/compiled/out/cljs/tools/reader/reader_types.cljs

@@ -1,283 +0,0 @@
-;;   Copyright (c) Nicola Mometto, Rich Hickey & contributors.
-;;   The use and distribution terms for this software are covered by the
-;;   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
-;;   which can be found in the file epl-v10.html at the root of this distribution.
-;;   By using this software in any fashion, you are agreeing to be bound by
-;;   the terms of this license.
-;;   You must not remove this notice, or any other, from this software.
-
-(ns ^{:doc "Protocols and default Reader types implementation"
-      :author "Bronsa"}
-  cljs.tools.reader.reader-types
-  (:refer-clojure :exclude [char read-line])
-  (:require [cljs.tools.reader.impl.utils :refer [char whitespace? newline?]]
-            [goog.string])
-  (:import goog.string.StringBuffer))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; reader protocols
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(defprotocol Reader
-  (read-char [reader]
-    "Returns the next char from the Reader, nil if the end of stream has been reached")
-  (peek-char [reader]
-    "Returns the next char from the Reader without removing it from the reader stream"))
-
-(defprotocol IPushbackReader
-  (unread [reader ch]
-    "Pushes back a single character on to the stream"))
-
-(defprotocol IndexingReader
-  (get-line-number [reader]
-    "Returns the line number of the next character to be read from the stream")
-  (get-column-number [reader]
-    "Returns the column number of the next character to be read from the stream")
-  (get-file-name [reader]
-    "Returns the file name the reader is reading from, or nil"))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; reader deftypes
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(deftype StringReader
-    [s s-len ^:mutable s-pos]
-  Reader
-  (read-char [reader]
-    (when (> s-len s-pos)
-      (let [r (.charAt s s-pos)]
-        (set! s-pos (inc s-pos))
-        r)))
-  (peek-char [reader]
-    (when (> s-len s-pos)
-      (.charAt s s-pos))))
-
-(deftype NodeReadableReader [readable ^:mutable buf]
-  Reader
-  (read-char [reader]
-    (if buf
-      (let [c (aget buf 0)]
-        (set! buf nil)
-        (char c))
-      (let [c (str (.read readable 1))]
-        (when c
-          (char c)))))
-  (peek-char [reader]
-    (when-not buf
-      (set! buf (str (.read readable 1))))
-    (when buf
-      (char (aget buf 0)))))
-
-(deftype PushbackReader
-  [^not-native rdr buf buf-len ^:mutable buf-pos]
-  Reader
-  (read-char [reader]
-    (let [c (if (< buf-pos buf-len)
-              (aget buf buf-pos)
-              (read-char rdr))]
-      (when (< buf-pos buf-len)
-        (set! buf-pos (inc buf-pos)))
-      (char c)))
-  (peek-char [reader]
-    (let [c (if (< buf-pos buf-len)
-              (aget buf buf-pos)
-              (peek-char rdr))]
-      (char c)))
-  IPushbackReader
-  (unread [reader ch]
-    (when ch
-      (if (zero? buf-pos) (throw (js/Error. "Pushback buffer is full")))
-      (set! buf-pos (dec buf-pos))
-      (aset buf buf-pos ch))))
-
-(defn- normalize-newline [^not-native rdr ch]
-  (if (identical? \return ch)
-    (let [c (peek-char rdr)]
-      (when (or (identical? \formfeed c)
-                (identical? \newline c))
-        (read-char rdr))
-      \newline)
-    ch))
-
-(deftype IndexingPushbackReader
-    [^not-native rdr ^:mutable line ^:mutable column
-     ^:mutable line-start? ^:mutable prev
-     ^:mutable prev-column file-name]
-  Reader
-  (read-char [reader]
-    (when-let [ch (read-char rdr)]
-      (let [ch (normalize-newline rdr ch)]
-        (set! prev line-start?)
-        (set! line-start? (newline? ch))
-        (when line-start?
-          (set! prev-column column)
-          (set! column 0)
-          (set! line (inc line)))
-        (set! column (inc column))
-        ch)))
-
-  (peek-char [reader]
-    (peek-char rdr))
-
-  IPushbackReader
-  (unread [reader ch]
-    (if line-start?
-      (do (set! line (dec line))
-          (set! column prev-column))
-      (set! column (dec column)))
-    (set! line-start? prev)
-    (unread rdr ch))
-
-  IndexingReader
-  (get-line-number [reader] (int line))
-  (get-column-number [reader] (int column))
-  (get-file-name [reader] file-name))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Source Logging support
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(defn merge-meta
-  "Returns an object of the same type and value as `obj`, with its
-metadata merged over `m`."
-  [obj m]
-  (let [orig-meta (meta obj)]
-    (with-meta obj (merge m (dissoc orig-meta :source)))))
-
-(defn- peek-source-log
-  "Returns a string containing the contents of the top most source
-logging frame."
-  [frames]
-  (subs (str (:buffer frames)) (first (:offset frames))))
-
-(defn- log-source-char
-  "Logs `char` to all currently active source logging frames."
-  [frames char]
-  (when-let [buffer (:buffer frames)]
-    (.append buffer char)))
-
-(defn- drop-last-logged-char
-  "Removes the last logged character from all currently active source
-logging frames. Called when pushing a character back."
-  [frames]
-  (when-let [buffer (:buffer frames)]
-    (.set buffer (subs (str buffer) 0 (dec (.getLength buffer))))))
-
-(deftype SourceLoggingPushbackReader
-    [^not-native rdr ^:mutable line ^:mutable column
-     ^:mutable line-start? ^:mutable prev
-     ^:mutable prev-column file-name frames]
-  Reader
-  (read-char [reader]
-    (when-let [ch (read-char rdr)]
-      (let [ch (normalize-newline rdr ch)]
-        (set! prev line-start?)
-        (set! line-start? (newline? ch))
-        (when line-start?
-          (set! prev-column column)
-          (set! column 0)
-          (set! line (inc line)))
-        (set! column (inc column))
-        (log-source-char @frames ch)
-        ch)))
-
-  (peek-char [reader]
-    (peek-char rdr))
-
-  IPushbackReader
-  (unread [reader ch]
-    (if line-start?
-      (do (set! line (dec line))
-          (set! column prev-column))
-      (set! column (dec column)))
-    (set! line-start? prev)
-    (when ch
-      (drop-last-logged-char @frames))
-    (unread rdr ch))
-
-  IndexingReader
-  (get-line-number [reader] (int line))
-  (get-column-number [reader] (int column))
-  (get-file-name [reader] file-name))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Public API
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-;; fast check for provided implementations
-(defn indexing-reader?
-  "Returns true if the reader satisfies IndexingReader"
-  [rdr]
-  (implements? IndexingReader rdr))
-
-(defn string-reader
-  "Creates a StringReader from a given string"
-  ([s]
-     (StringReader. s (count s) 0)))
-
-(defn string-push-back-reader
-  "Creates a PushbackReader from a given string"
-  ([s]
-     (string-push-back-reader s 1))
-  ([s buf-len]
-     (PushbackReader. (string-reader s) (object-array buf-len) buf-len buf-len)))
-
-(defn node-readable-push-back-reader [readable]
-  (PushbackReader. (NodeReadableReader. readable nil) (object-array 1) 1 1))
-
-(defn indexing-push-back-reader
-  "Creates an IndexingPushbackReader from a given string or PushbackReader"
-  ([s-or-rdr]
-     (indexing-push-back-reader s-or-rdr 1))
-  ([s-or-rdr buf-len]
-     (indexing-push-back-reader s-or-rdr buf-len nil))
-  ([s-or-rdr buf-len file-name]
-     (IndexingPushbackReader.
-      (if (string? s-or-rdr) (string-push-back-reader s-or-rdr buf-len) s-or-rdr) 1 1 true nil 0 file-name)))
-
-(defn source-logging-push-back-reader
-  "Creates a SourceLoggingPushbackReader from a given string or PushbackReader"
-  ([s-or-rdr]
-     (source-logging-push-back-reader s-or-rdr 1))
-  ([s-or-rdr buf-len]
-     (source-logging-push-back-reader s-or-rdr buf-len nil))
-  ([s-or-rdr buf-len file-name]
-     (SourceLoggingPushbackReader.
-      (if (string? s-or-rdr) (string-push-back-reader s-or-rdr buf-len) s-or-rdr)
-      1
-      1
-      true
-      nil
-      0
-      file-name
-      (atom {:buffer (StringBuffer.) :offset '(0)}))))
-
-(defn read-line
-  "Reads a line from the reader or from *in* if no reader is specified"
-  ([^not-native rdr]
-     (loop [c (read-char rdr) s (StringBuffer.)]
-       (if (newline? c)
-         (str s)
-         (recur (read-char rdr) (.append s c))))))
-
-(defn ^boolean source-logging-reader?
-  [rdr]
-  (instance? SourceLoggingPushbackReader rdr))
-
-(defn ^boolean line-start?
-  "Returns true if rdr is an IndexingReader and the current char starts a new line"
-  [^not-native rdr]
-  (when (indexing-reader? rdr)
-    (== 1 (get-column-number rdr))))
-
-(defn log-source*
-  [reader f]
-  (let [buffer (:buffer @(.-frames reader))]
-    (try
-      (swap! (.-frames reader) update-in [:offset] conj (.getLength buffer))
-      (let [ret (f)]
-        (if (implements? IMeta ret)
-          (merge-meta ret {:source (peek-source-log @ (.-frames reader))})
-          ret))
-      (finally
-        (swap! (.-frames reader) update-in [:offset] rest)))))
-

docs/js/compiled/out/cljs/tools/reader/reader_types.js

@@ -1,798 +0,0 @@
-// Compiled by ClojureScript 1.10.520 {}
-goog.provide('cljs.tools.reader.reader_types');
-goog.require('cljs.core');
-goog.require('cljs.tools.reader.impl.utils');
-goog.require('goog.string');
-goog.require('goog.string.StringBuffer');
-
-/**
- * @interface
- */
-cljs.tools.reader.reader_types.Reader = function(){};
-
-/**
- * Returns the next char from the Reader, nil if the end of stream has been reached
- */
-cljs.tools.reader.reader_types.read_char = (function cljs$tools$reader$reader_types$read_char(reader){
-if((((!((reader == null)))) && ((!((reader.cljs$tools$reader$reader_types$Reader$read_char$arity$1 == null)))))){
-return reader.cljs$tools$reader$reader_types$Reader$read_char$arity$1(reader);
-} else {
-var x__4433__auto__ = (((reader == null))?null:reader);
-var m__4434__auto__ = (cljs.tools.reader.reader_types.read_char[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,reader);
-} else {
-var m__4431__auto__ = (cljs.tools.reader.reader_types.read_char["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,reader);
-} else {
-throw cljs.core.missing_protocol.call(null,"Reader.read-char",reader);
-}
-}
-}
-});
-
-/**
- * Returns the next char from the Reader without removing it from the reader stream
- */
-cljs.tools.reader.reader_types.peek_char = (function cljs$tools$reader$reader_types$peek_char(reader){
-if((((!((reader == null)))) && ((!((reader.cljs$tools$reader$reader_types$Reader$peek_char$arity$1 == null)))))){
-return reader.cljs$tools$reader$reader_types$Reader$peek_char$arity$1(reader);
-} else {
-var x__4433__auto__ = (((reader == null))?null:reader);
-var m__4434__auto__ = (cljs.tools.reader.reader_types.peek_char[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,reader);
-} else {
-var m__4431__auto__ = (cljs.tools.reader.reader_types.peek_char["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,reader);
-} else {
-throw cljs.core.missing_protocol.call(null,"Reader.peek-char",reader);
-}
-}
-}
-});
-
-
-/**
- * @interface
- */
-cljs.tools.reader.reader_types.IPushbackReader = function(){};
-
-/**
- * Pushes back a single character on to the stream
- */
-cljs.tools.reader.reader_types.unread = (function cljs$tools$reader$reader_types$unread(reader,ch){
-if((((!((reader == null)))) && ((!((reader.cljs$tools$reader$reader_types$IPushbackReader$unread$arity$2 == null)))))){
-return reader.cljs$tools$reader$reader_types$IPushbackReader$unread$arity$2(reader,ch);
-} else {
-var x__4433__auto__ = (((reader == null))?null:reader);
-var m__4434__auto__ = (cljs.tools.reader.reader_types.unread[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,reader,ch);
-} else {
-var m__4431__auto__ = (cljs.tools.reader.reader_types.unread["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,reader,ch);
-} else {
-throw cljs.core.missing_protocol.call(null,"IPushbackReader.unread",reader);
-}
-}
-}
-});
-
-
-/**
- * @interface
- */
-cljs.tools.reader.reader_types.IndexingReader = function(){};
-
-/**
- * Returns the line number of the next character to be read from the stream
- */
-cljs.tools.reader.reader_types.get_line_number = (function cljs$tools$reader$reader_types$get_line_number(reader){
-if((((!((reader == null)))) && ((!((reader.cljs$tools$reader$reader_types$IndexingReader$get_line_number$arity$1 == null)))))){
-return reader.cljs$tools$reader$reader_types$IndexingReader$get_line_number$arity$1(reader);
-} else {
-var x__4433__auto__ = (((reader == null))?null:reader);
-var m__4434__auto__ = (cljs.tools.reader.reader_types.get_line_number[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,reader);
-} else {
-var m__4431__auto__ = (cljs.tools.reader.reader_types.get_line_number["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,reader);
-} else {
-throw cljs.core.missing_protocol.call(null,"IndexingReader.get-line-number",reader);
-}
-}
-}
-});
-
-/**
- * Returns the column number of the next character to be read from the stream
- */
-cljs.tools.reader.reader_types.get_column_number = (function cljs$tools$reader$reader_types$get_column_number(reader){
-if((((!((reader == null)))) && ((!((reader.cljs$tools$reader$reader_types$IndexingReader$get_column_number$arity$1 == null)))))){
-return reader.cljs$tools$reader$reader_types$IndexingReader$get_column_number$arity$1(reader);
-} else {
-var x__4433__auto__ = (((reader == null))?null:reader);
-var m__4434__auto__ = (cljs.tools.reader.reader_types.get_column_number[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,reader);
-} else {
-var m__4431__auto__ = (cljs.tools.reader.reader_types.get_column_number["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,reader);
-} else {
-throw cljs.core.missing_protocol.call(null,"IndexingReader.get-column-number",reader);
-}
-}
-}
-});
-
-/**
- * Returns the file name the reader is reading from, or nil
- */
-cljs.tools.reader.reader_types.get_file_name = (function cljs$tools$reader$reader_types$get_file_name(reader){
-if((((!((reader == null)))) && ((!((reader.cljs$tools$reader$reader_types$IndexingReader$get_file_name$arity$1 == null)))))){
-return reader.cljs$tools$reader$reader_types$IndexingReader$get_file_name$arity$1(reader);
-} else {
-var x__4433__auto__ = (((reader == null))?null:reader);
-var m__4434__auto__ = (cljs.tools.reader.reader_types.get_file_name[goog.typeOf(x__4433__auto__)]);
-if((!((m__4434__auto__ == null)))){
-return m__4434__auto__.call(null,reader);
-} else {
-var m__4431__auto__ = (cljs.tools.reader.reader_types.get_file_name["_"]);
-if((!((m__4431__auto__ == null)))){
-return m__4431__auto__.call(null,reader);
-} else {
-throw cljs.core.missing_protocol.call(null,"IndexingReader.get-file-name",reader);
-}
-}
-}
-});
-
-
-/**
-* @constructor
- * @implements {cljs.tools.reader.reader_types.Reader}
-*/
-cljs.tools.reader.reader_types.StringReader = (function (s,s_len,s_pos){
-this.s = s;
-this.s_len = s_len;
-this.s_pos = s_pos;
-});
-cljs.tools.reader.reader_types.StringReader.prototype.cljs$tools$reader$reader_types$Reader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.StringReader.prototype.cljs$tools$reader$reader_types$Reader$read_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-if((self__.s_len > self__.s_pos)){
-var r = self__.s.charAt(self__.s_pos);
-self__.s_pos = (self__.s_pos + (1));
-
-return r;
-} else {
-return null;
-}
-});
-
-cljs.tools.reader.reader_types.StringReader.prototype.cljs$tools$reader$reader_types$Reader$peek_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-if((self__.s_len > self__.s_pos)){
-return self__.s.charAt(self__.s_pos);
-} else {
-return null;
-}
-});
-
-cljs.tools.reader.reader_types.StringReader.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 3, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"s","s",-948495851,null),new cljs.core.Symbol(null,"s-len","s-len",1869978331,null),cljs.core.with_meta(new cljs.core.Symbol(null,"s-pos","s-pos",-540562492,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null))], null);
-});
-
-cljs.tools.reader.reader_types.StringReader.cljs$lang$type = true;
-
-cljs.tools.reader.reader_types.StringReader.cljs$lang$ctorStr = "cljs.tools.reader.reader-types/StringReader";
-
-cljs.tools.reader.reader_types.StringReader.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.tools.reader.reader-types/StringReader");
-});
-
-/**
- * Positional factory function for cljs.tools.reader.reader-types/StringReader.
- */
-cljs.tools.reader.reader_types.__GT_StringReader = (function cljs$tools$reader$reader_types$__GT_StringReader(s,s_len,s_pos){
-return (new cljs.tools.reader.reader_types.StringReader(s,s_len,s_pos));
-});
-
-
-/**
-* @constructor
- * @implements {cljs.tools.reader.reader_types.Reader}
-*/
-cljs.tools.reader.reader_types.NodeReadableReader = (function (readable,buf){
-this.readable = readable;
-this.buf = buf;
-});
-cljs.tools.reader.reader_types.NodeReadableReader.prototype.cljs$tools$reader$reader_types$Reader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.NodeReadableReader.prototype.cljs$tools$reader$reader_types$Reader$read_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-if(cljs.core.truth_(self__.buf)){
-var c = (self__.buf[(0)]);
-self__.buf = null;
-
-return cljs.tools.reader.impl.utils.char$.call(null,c);
-} else {
-var c = cljs.core.str.cljs$core$IFn$_invoke$arity$1(self__.readable.read((1)));
-if(cljs.core.truth_(c)){
-return cljs.tools.reader.impl.utils.char$.call(null,c);
-} else {
-return null;
-}
-}
-});
-
-cljs.tools.reader.reader_types.NodeReadableReader.prototype.cljs$tools$reader$reader_types$Reader$peek_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-if(cljs.core.truth_(self__.buf)){
-} else {
-self__.buf = cljs.core.str.cljs$core$IFn$_invoke$arity$1(self__.readable.read((1)));
-}
-
-if(cljs.core.truth_(self__.buf)){
-return cljs.tools.reader.impl.utils.char$.call(null,(self__.buf[(0)]));
-} else {
-return null;
-}
-});
-
-cljs.tools.reader.reader_types.NodeReadableReader.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Symbol(null,"readable","readable",2113054478,null),cljs.core.with_meta(new cljs.core.Symbol(null,"buf","buf",1426618187,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null))], null);
-});
-
-cljs.tools.reader.reader_types.NodeReadableReader.cljs$lang$type = true;
-
-cljs.tools.reader.reader_types.NodeReadableReader.cljs$lang$ctorStr = "cljs.tools.reader.reader-types/NodeReadableReader";
-
-cljs.tools.reader.reader_types.NodeReadableReader.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.tools.reader.reader-types/NodeReadableReader");
-});
-
-/**
- * Positional factory function for cljs.tools.reader.reader-types/NodeReadableReader.
- */
-cljs.tools.reader.reader_types.__GT_NodeReadableReader = (function cljs$tools$reader$reader_types$__GT_NodeReadableReader(readable,buf){
-return (new cljs.tools.reader.reader_types.NodeReadableReader(readable,buf));
-});
-
-
-/**
-* @constructor
- * @implements {cljs.tools.reader.reader_types.Reader}
- * @implements {cljs.tools.reader.reader_types.IPushbackReader}
-*/
-cljs.tools.reader.reader_types.PushbackReader = (function (rdr,buf,buf_len,buf_pos){
-this.rdr = rdr;
-this.buf = buf;
-this.buf_len = buf_len;
-this.buf_pos = buf_pos;
-});
-cljs.tools.reader.reader_types.PushbackReader.prototype.cljs$tools$reader$reader_types$Reader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.PushbackReader.prototype.cljs$tools$reader$reader_types$Reader$read_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-var c = (((self__.buf_pos < self__.buf_len))?(self__.buf[self__.buf_pos]):cljs.tools.reader.reader_types.read_char.call(null,self__.rdr));
-if((self__.buf_pos < self__.buf_len)){
-self__.buf_pos = (self__.buf_pos + (1));
-} else {
-}
-
-return cljs.tools.reader.impl.utils.char$.call(null,c);
-});
-
-cljs.tools.reader.reader_types.PushbackReader.prototype.cljs$tools$reader$reader_types$Reader$peek_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-var c = (((self__.buf_pos < self__.buf_len))?(self__.buf[self__.buf_pos]):cljs.tools.reader.reader_types.peek_char.call(null,self__.rdr));
-return cljs.tools.reader.impl.utils.char$.call(null,c);
-});
-
-cljs.tools.reader.reader_types.PushbackReader.prototype.cljs$tools$reader$reader_types$IPushbackReader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.PushbackReader.prototype.cljs$tools$reader$reader_types$IPushbackReader$unread$arity$2 = (function (reader,ch){
-var self__ = this;
-var reader__$1 = this;
-if(cljs.core.truth_(ch)){
-if((self__.buf_pos === (0))){
-throw (new Error("Pushback buffer is full"));
-} else {
-}
-
-self__.buf_pos = (self__.buf_pos - (1));
-
-return (self__.buf[self__.buf_pos] = ch);
-} else {
-return null;
-}
-});
-
-cljs.tools.reader.reader_types.PushbackReader.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 4, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.with_meta(new cljs.core.Symbol(null,"rdr","rdr",190007785,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tag","tag",-1290361223),new cljs.core.Symbol(null,"not-native","not-native",-236392494,null)], null)),new cljs.core.Symbol(null,"buf","buf",1426618187,null),new cljs.core.Symbol(null,"buf-len","buf-len",404510846,null),cljs.core.with_meta(new cljs.core.Symbol(null,"buf-pos","buf-pos",-807229033,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null))], null);
-});
-
-cljs.tools.reader.reader_types.PushbackReader.cljs$lang$type = true;
-
-cljs.tools.reader.reader_types.PushbackReader.cljs$lang$ctorStr = "cljs.tools.reader.reader-types/PushbackReader";
-
-cljs.tools.reader.reader_types.PushbackReader.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.tools.reader.reader-types/PushbackReader");
-});
-
-/**
- * Positional factory function for cljs.tools.reader.reader-types/PushbackReader.
- */
-cljs.tools.reader.reader_types.__GT_PushbackReader = (function cljs$tools$reader$reader_types$__GT_PushbackReader(rdr,buf,buf_len,buf_pos){
-return (new cljs.tools.reader.reader_types.PushbackReader(rdr,buf,buf_len,buf_pos));
-});
-
-cljs.tools.reader.reader_types.normalize_newline = (function cljs$tools$reader$reader_types$normalize_newline(rdr,ch){
-if(("\r" === ch)){
-var c = cljs.tools.reader.reader_types.peek_char.call(null,rdr);
-if(((("\f" === c)) || (("\n" === c)))){
-cljs.tools.reader.reader_types.read_char.call(null,rdr);
-} else {
-}
-
-return "\n";
-} else {
-return ch;
-}
-});
-
-/**
-* @constructor
- * @implements {cljs.tools.reader.reader_types.IndexingReader}
- * @implements {cljs.tools.reader.reader_types.Reader}
- * @implements {cljs.tools.reader.reader_types.IPushbackReader}
-*/
-cljs.tools.reader.reader_types.IndexingPushbackReader = (function (rdr,line,column,line_start_QMARK_,prev,prev_column,file_name){
-this.rdr = rdr;
-this.line = line;
-this.column = column;
-this.line_start_QMARK_ = line_start_QMARK_;
-this.prev = prev;
-this.prev_column = prev_column;
-this.file_name = file_name;
-});
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$Reader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$Reader$read_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-var temp__5720__auto__ = cljs.tools.reader.reader_types.read_char.call(null,self__.rdr);
-if(cljs.core.truth_(temp__5720__auto__)){
-var ch = temp__5720__auto__;
-var ch__$1 = cljs.tools.reader.reader_types.normalize_newline.call(null,self__.rdr,ch);
-self__.prev = self__.line_start_QMARK_;
-
-self__.line_start_QMARK_ = cljs.tools.reader.impl.utils.newline_QMARK_.call(null,ch__$1);
-
-if(cljs.core.truth_(self__.line_start_QMARK_)){
-self__.prev_column = self__.column;
-
-self__.column = (0);
-
-self__.line = (self__.line + (1));
-} else {
-}
-
-self__.column = (self__.column + (1));
-
-return ch__$1;
-} else {
-return null;
-}
-});
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$Reader$peek_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return cljs.tools.reader.reader_types.peek_char.call(null,self__.rdr);
-});
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$IPushbackReader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$IPushbackReader$unread$arity$2 = (function (reader,ch){
-var self__ = this;
-var reader__$1 = this;
-if(cljs.core.truth_(self__.line_start_QMARK_)){
-self__.line = (self__.line - (1));
-
-self__.column = self__.prev_column;
-} else {
-self__.column = (self__.column - (1));
-}
-
-self__.line_start_QMARK_ = self__.prev;
-
-return cljs.tools.reader.reader_types.unread.call(null,self__.rdr,ch);
-});
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$get_line_number$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return (self__.line | (0));
-});
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$get_column_number$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return (self__.column | (0));
-});
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$get_file_name$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return self__.file_name;
-});
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 7, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.with_meta(new cljs.core.Symbol(null,"rdr","rdr",190007785,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tag","tag",-1290361223),new cljs.core.Symbol(null,"not-native","not-native",-236392494,null)], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"line","line",1852876762,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"column","column",-576213674,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"line-start?","line-start?",1357012474,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"prev","prev",43462301,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"prev-column","prev-column",324083974,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),new cljs.core.Symbol(null,"file-name","file-name",-13685732,null)], null);
-});
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.cljs$lang$type = true;
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.cljs$lang$ctorStr = "cljs.tools.reader.reader-types/IndexingPushbackReader";
-
-cljs.tools.reader.reader_types.IndexingPushbackReader.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.tools.reader.reader-types/IndexingPushbackReader");
-});
-
-/**
- * Positional factory function for cljs.tools.reader.reader-types/IndexingPushbackReader.
- */
-cljs.tools.reader.reader_types.__GT_IndexingPushbackReader = (function cljs$tools$reader$reader_types$__GT_IndexingPushbackReader(rdr,line,column,line_start_QMARK_,prev,prev_column,file_name){
-return (new cljs.tools.reader.reader_types.IndexingPushbackReader(rdr,line,column,line_start_QMARK_,prev,prev_column,file_name));
-});
-
-/**
- * Returns an object of the same type and value as `obj`, with its
- * metadata merged over `m`.
- */
-cljs.tools.reader.reader_types.merge_meta = (function cljs$tools$reader$reader_types$merge_meta(obj,m){
-var orig_meta = cljs.core.meta.call(null,obj);
-return cljs.core.with_meta.call(null,obj,cljs.core.merge.call(null,m,cljs.core.dissoc.call(null,orig_meta,new cljs.core.Keyword(null,"source","source",-433931539))));
-});
-/**
- * Returns a string containing the contents of the top most source
- * logging frame.
- */
-cljs.tools.reader.reader_types.peek_source_log = (function cljs$tools$reader$reader_types$peek_source_log(frames){
-return cljs.core.subs.call(null,cljs.core.str.cljs$core$IFn$_invoke$arity$1(new cljs.core.Keyword(null,"buffer","buffer",617295198).cljs$core$IFn$_invoke$arity$1(frames)),cljs.core.first.call(null,new cljs.core.Keyword(null,"offset","offset",296498311).cljs$core$IFn$_invoke$arity$1(frames)));
-});
-/**
- * Logs `char` to all currently active source logging frames.
- */
-cljs.tools.reader.reader_types.log_source_char = (function cljs$tools$reader$reader_types$log_source_char(frames,char$){
-var temp__5720__auto__ = new cljs.core.Keyword(null,"buffer","buffer",617295198).cljs$core$IFn$_invoke$arity$1(frames);
-if(cljs.core.truth_(temp__5720__auto__)){
-var buffer = temp__5720__auto__;
-return buffer.append(char$);
-} else {
-return null;
-}
-});
-/**
- * Removes the last logged character from all currently active source
- * logging frames. Called when pushing a character back.
- */
-cljs.tools.reader.reader_types.drop_last_logged_char = (function cljs$tools$reader$reader_types$drop_last_logged_char(frames){
-var temp__5720__auto__ = new cljs.core.Keyword(null,"buffer","buffer",617295198).cljs$core$IFn$_invoke$arity$1(frames);
-if(cljs.core.truth_(temp__5720__auto__)){
-var buffer = temp__5720__auto__;
-return buffer.set(cljs.core.subs.call(null,cljs.core.str.cljs$core$IFn$_invoke$arity$1(buffer),(0),(buffer.getLength() - (1))));
-} else {
-return null;
-}
-});
-
-/**
-* @constructor
- * @implements {cljs.tools.reader.reader_types.IndexingReader}
- * @implements {cljs.tools.reader.reader_types.Reader}
- * @implements {cljs.tools.reader.reader_types.IPushbackReader}
-*/
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader = (function (rdr,line,column,line_start_QMARK_,prev,prev_column,file_name,frames){
-this.rdr = rdr;
-this.line = line;
-this.column = column;
-this.line_start_QMARK_ = line_start_QMARK_;
-this.prev = prev;
-this.prev_column = prev_column;
-this.file_name = file_name;
-this.frames = frames;
-});
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$Reader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$Reader$read_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-var temp__5720__auto__ = cljs.tools.reader.reader_types.read_char.call(null,self__.rdr);
-if(cljs.core.truth_(temp__5720__auto__)){
-var ch = temp__5720__auto__;
-var ch__$1 = cljs.tools.reader.reader_types.normalize_newline.call(null,self__.rdr,ch);
-self__.prev = self__.line_start_QMARK_;
-
-self__.line_start_QMARK_ = cljs.tools.reader.impl.utils.newline_QMARK_.call(null,ch__$1);
-
-if(cljs.core.truth_(self__.line_start_QMARK_)){
-self__.prev_column = self__.column;
-
-self__.column = (0);
-
-self__.line = (self__.line + (1));
-} else {
-}
-
-self__.column = (self__.column + (1));
-
-cljs.tools.reader.reader_types.log_source_char.call(null,cljs.core.deref.call(null,self__.frames),ch__$1);
-
-return ch__$1;
-} else {
-return null;
-}
-});
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$Reader$peek_char$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return cljs.tools.reader.reader_types.peek_char.call(null,self__.rdr);
-});
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$IPushbackReader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$IPushbackReader$unread$arity$2 = (function (reader,ch){
-var self__ = this;
-var reader__$1 = this;
-if(cljs.core.truth_(self__.line_start_QMARK_)){
-self__.line = (self__.line - (1));
-
-self__.column = self__.prev_column;
-} else {
-self__.column = (self__.column - (1));
-}
-
-self__.line_start_QMARK_ = self__.prev;
-
-if(cljs.core.truth_(ch)){
-cljs.tools.reader.reader_types.drop_last_logged_char.call(null,cljs.core.deref.call(null,self__.frames));
-} else {
-}
-
-return cljs.tools.reader.reader_types.unread.call(null,self__.rdr,ch);
-});
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$ = cljs.core.PROTOCOL_SENTINEL;
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$get_line_number$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return (self__.line | (0));
-});
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$get_column_number$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return (self__.column | (0));
-});
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.prototype.cljs$tools$reader$reader_types$IndexingReader$get_file_name$arity$1 = (function (reader){
-var self__ = this;
-var reader__$1 = this;
-return self__.file_name;
-});
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.getBasis = (function (){
-return new cljs.core.PersistentVector(null, 8, 5, cljs.core.PersistentVector.EMPTY_NODE, [cljs.core.with_meta(new cljs.core.Symbol(null,"rdr","rdr",190007785,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tag","tag",-1290361223),new cljs.core.Symbol(null,"not-native","not-native",-236392494,null)], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"line","line",1852876762,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"column","column",-576213674,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"line-start?","line-start?",1357012474,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"prev","prev",43462301,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),cljs.core.with_meta(new cljs.core.Symbol(null,"prev-column","prev-column",324083974,null),new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"mutable","mutable",875778266),true], null)),new cljs.core.Symbol(null,"file-name","file-name",-13685732,null),new cljs.core.Symbol(null,"frames","frames",-888748272,null)], null);
-});
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.cljs$lang$type = true;
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.cljs$lang$ctorStr = "cljs.tools.reader.reader-types/SourceLoggingPushbackReader";
-
-cljs.tools.reader.reader_types.SourceLoggingPushbackReader.cljs$lang$ctorPrWriter = (function (this__4374__auto__,writer__4375__auto__,opt__4376__auto__){
-return cljs.core._write.call(null,writer__4375__auto__,"cljs.tools.reader.reader-types/SourceLoggingPushbackReader");
-});
-
-/**
- * Positional factory function for cljs.tools.reader.reader-types/SourceLoggingPushbackReader.
- */
-cljs.tools.reader.reader_types.__GT_SourceLoggingPushbackReader = (function cljs$tools$reader$reader_types$__GT_SourceLoggingPushbackReader(rdr,line,column,line_start_QMARK_,prev,prev_column,file_name,frames){
-return (new cljs.tools.reader.reader_types.SourceLoggingPushbackReader(rdr,line,column,line_start_QMARK_,prev,prev_column,file_name,frames));
-});
-
-/**
- * Returns true if the reader satisfies IndexingReader
- */
-cljs.tools.reader.reader_types.indexing_reader_QMARK_ = (function cljs$tools$reader$reader_types$indexing_reader_QMARK_(rdr){
-if((!((rdr == null)))){
-if(((false) || ((cljs.core.PROTOCOL_SENTINEL === rdr.cljs$tools$reader$reader_types$IndexingReader$)))){
-return true;
-} else {
-return false;
-}
-} else {
-return false;
-}
-});
-/**
- * Creates a StringReader from a given string
- */
-cljs.tools.reader.reader_types.string_reader = (function cljs$tools$reader$reader_types$string_reader(s){
-return (new cljs.tools.reader.reader_types.StringReader(s,cljs.core.count.call(null,s),(0)));
-});
-/**
- * Creates a PushbackReader from a given string
- */
-cljs.tools.reader.reader_types.string_push_back_reader = (function cljs$tools$reader$reader_types$string_push_back_reader(var_args){
-var G__20986 = arguments.length;
-switch (G__20986) {
-case 1:
-return cljs.tools.reader.reader_types.string_push_back_reader.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.tools.reader.reader_types.string_push_back_reader.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.reader_types.string_push_back_reader.cljs$core$IFn$_invoke$arity$1 = (function (s){
-return cljs.tools.reader.reader_types.string_push_back_reader.call(null,s,(1));
-});
-
-cljs.tools.reader.reader_types.string_push_back_reader.cljs$core$IFn$_invoke$arity$2 = (function (s,buf_len){
-return (new cljs.tools.reader.reader_types.PushbackReader(cljs.tools.reader.reader_types.string_reader.call(null,s),cljs.core.object_array.call(null,buf_len),buf_len,buf_len));
-});
-
-cljs.tools.reader.reader_types.string_push_back_reader.cljs$lang$maxFixedArity = 2;
-
-cljs.tools.reader.reader_types.node_readable_push_back_reader = (function cljs$tools$reader$reader_types$node_readable_push_back_reader(readable){
-return (new cljs.tools.reader.reader_types.PushbackReader((new cljs.tools.reader.reader_types.NodeReadableReader(readable,null)),cljs.core.object_array.call(null,(1)),(1),(1)));
-});
-/**
- * Creates an IndexingPushbackReader from a given string or PushbackReader
- */
-cljs.tools.reader.reader_types.indexing_push_back_reader = (function cljs$tools$reader$reader_types$indexing_push_back_reader(var_args){
-var G__20989 = arguments.length;
-switch (G__20989) {
-case 1:
-return cljs.tools.reader.reader_types.indexing_push_back_reader.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.tools.reader.reader_types.indexing_push_back_reader.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-case 3:
-return cljs.tools.reader.reader_types.indexing_push_back_reader.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.reader_types.indexing_push_back_reader.cljs$core$IFn$_invoke$arity$1 = (function (s_or_rdr){
-return cljs.tools.reader.reader_types.indexing_push_back_reader.call(null,s_or_rdr,(1));
-});
-
-cljs.tools.reader.reader_types.indexing_push_back_reader.cljs$core$IFn$_invoke$arity$2 = (function (s_or_rdr,buf_len){
-return cljs.tools.reader.reader_types.indexing_push_back_reader.call(null,s_or_rdr,buf_len,null);
-});
-
-cljs.tools.reader.reader_types.indexing_push_back_reader.cljs$core$IFn$_invoke$arity$3 = (function (s_or_rdr,buf_len,file_name){
-return (new cljs.tools.reader.reader_types.IndexingPushbackReader(((typeof s_or_rdr === 'string')?cljs.tools.reader.reader_types.string_push_back_reader.call(null,s_or_rdr,buf_len):s_or_rdr),(1),(1),true,null,(0),file_name));
-});
-
-cljs.tools.reader.reader_types.indexing_push_back_reader.cljs$lang$maxFixedArity = 3;
-
-/**
- * Creates a SourceLoggingPushbackReader from a given string or PushbackReader
- */
-cljs.tools.reader.reader_types.source_logging_push_back_reader = (function cljs$tools$reader$reader_types$source_logging_push_back_reader(var_args){
-var G__20992 = arguments.length;
-switch (G__20992) {
-case 1:
-return cljs.tools.reader.reader_types.source_logging_push_back_reader.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
-
-break;
-case 2:
-return cljs.tools.reader.reader_types.source_logging_push_back_reader.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
-
-break;
-case 3:
-return cljs.tools.reader.reader_types.source_logging_push_back_reader.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
-
-break;
-default:
-throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
-
-}
-});
-
-cljs.tools.reader.reader_types.source_logging_push_back_reader.cljs$core$IFn$_invoke$arity$1 = (function (s_or_rdr){
-return cljs.tools.reader.reader_types.source_logging_push_back_reader.call(null,s_or_rdr,(1));
-});
-
-cljs.tools.reader.reader_types.source_logging_push_back_reader.cljs$core$IFn$_invoke$arity$2 = (function (s_or_rdr,buf_len){
-return cljs.tools.reader.reader_types.source_logging_push_back_reader.call(null,s_or_rdr,buf_len,null);
-});
-
-cljs.tools.reader.reader_types.source_logging_push_back_reader.cljs$core$IFn$_invoke$arity$3 = (function (s_or_rdr,buf_len,file_name){
-return (new cljs.tools.reader.reader_types.SourceLoggingPushbackReader(((typeof s_or_rdr === 'string')?cljs.tools.reader.reader_types.string_push_back_reader.call(null,s_or_rdr,buf_len):s_or_rdr),(1),(1),true,null,(0),file_name,cljs.core.atom.call(null,new cljs.core.PersistentArrayMap(null, 2, [new cljs.core.Keyword(null,"buffer","buffer",617295198),(new goog.string.StringBuffer()),new cljs.core.Keyword(null,"offset","offset",296498311),cljs.core.list((0))], null))));
-});
-
-cljs.tools.reader.reader_types.source_logging_push_back_reader.cljs$lang$maxFixedArity = 3;
-
-/**
- * Reads a line from the reader or from *in* if no reader is specified
- */
-cljs.tools.reader.reader_types.read_line = (function cljs$tools$reader$reader_types$read_line(rdr){
-var c = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-var s = (new goog.string.StringBuffer());
-while(true){
-if(cljs.tools.reader.impl.utils.newline_QMARK_.call(null,c)){
-return cljs.core.str.cljs$core$IFn$_invoke$arity$1(s);
-} else {
-var G__20994 = cljs.tools.reader.reader_types.read_char.call(null,rdr);
-var G__20995 = s.append(c);
-c = G__20994;
-s = G__20995;
-continue;
-}
-break;
-}
-});
-cljs.tools.reader.reader_types.source_logging_reader_QMARK_ = (function cljs$tools$reader$reader_types$source_logging_reader_QMARK_(rdr){
-return (rdr instanceof cljs.tools.reader.reader_types.SourceLoggingPushbackReader);
-});
-/**
- * Returns true if rdr is an IndexingReader and the current char starts a new line
- */
-cljs.tools.reader.reader_types.line_start_QMARK_ = (function cljs$tools$reader$reader_types$line_start_QMARK_(rdr){
-if(cljs.tools.reader.reader_types.indexing_reader_QMARK_.call(null,rdr)){
-return ((1) === cljs.tools.reader.reader_types.get_column_number.call(null,rdr));
-} else {
-return null;
-}
-});
-cljs.tools.reader.reader_types.log_source_STAR_ = (function cljs$tools$reader$reader_types$log_source_STAR_(reader,f){
-var buffer = new cljs.core.Keyword(null,"buffer","buffer",617295198).cljs$core$IFn$_invoke$arity$1(cljs.core.deref.call(null,reader.frames));
-try{cljs.core.swap_BANG_.call(null,reader.frames,cljs.core.update_in,new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Keyword(null,"offset","offset",296498311)], null),cljs.core.conj,buffer.getLength());
-
-var ret = f.call(null);
-if((((!((ret == null))))?(((((ret.cljs$lang$protocol_mask$partition0$ & (131072))) || ((cljs.core.PROTOCOL_SENTINEL === ret.cljs$core$IMeta$))))?true:false):false)){
-return cljs.tools.reader.reader_types.merge_meta.call(null,ret,new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"source","source",-433931539),cljs.tools.reader.reader_types.peek_source_log.call(null,cljs.core.deref.call(null,reader.frames))], null));
-} else {
-return ret;
-}
-}finally {cljs.core.swap_BANG_.call(null,reader.frames,cljs.core.update_in,new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.Keyword(null,"offset","offset",296498311)], null),cljs.core.rest);
-}});
-
-//# sourceMappingURL=reader_types.js.map?rel=1582560146760