earlgrey
Version:
Programming language compiling to JavaScript, featuring macros, dynamic typing annotations and pattern matching.
4 lines (2 loc) • 2.45 kB
JavaScript
require('earlgrey-runtime/5');var $24$0=void 0;var $26$0=void 0;var $28$0=void 0;var $30$0=void 0;var $32$0=void 0;var $34$0=void 0;var $36$0=void 0;var $38$0=void 0;var $40$0=void 0;var $42$0=void 0;var $44$0=void 0;var $targ$0=void 0;var $targ$1=void 0;var mt$0=void 0;var Env$0=void 0;var Expander$0=void 0;var topscope$0=void 0;var stdenv$0=void 0;var mac$0=void 0;var bind$0=void 0;var make_expander$0=void 0;mt$0=require("./expand");Env$0=getProperty(mt$0,"Env","mt");Expander$0=getProperty(mt$0,"Expander","mt");topscope$0=getProperty(mt$0,"topscope","mt");stdenv$0=Env$0();mac$0=function mac(name$0){return function(m$0){var m2$0=void 0;m2$0=function m2(ctx$0,info$0,form$0,temp$0$0){var t0$0=void 0;var t0$1=void 0;var expr$0=void 0;var ph$0$0=void 0;t0$0=temp$0$0;expr$0=t0$0;ph$0$0=t0$0;t0$1=ph$0$0;if(___hasprop(t0$1,"brackets")&&t0$1.brackets==="()"){throw ErrorFactory(["syntax","no_parens"]).create("Parentheses cannot be used here.\n Use [] or {} depending on your intent.\n []s are usually equivalent to an absence\n of brackets.\n ".replace(RegExp("\\n *","g")," "),{"expr":expr$0});}else{return m$0.call(this,ctx$0,info$0,form$0,expr$0);}};stdenv$0.bind(topscope$0,name$0,["macro",m2$0]);return m2$0;};};bind$0=function bind(name$1,value$0){return stdenv$0.bind(topscope$0,name$1,value$0);};($24$0=require("./macros/consts"),$24$0)(mac$0,bind$0);($26$0=require("./macros/core"),$26$0)(mac$0,bind$0);($28$0=require("./macros/operators"),$28$0)(mac$0,bind$0);($30$0=require("./macros/loop"),$30$0)(mac$0,bind$0);($32$0=require("./macros/quote"),$32$0)(mac$0,bind$0);($34$0=require("./macros/regexp"),$34$0)(mac$0,bind$0);($36$0=require("./macros/modularity"),$36$0)(mac$0,bind$0);($38$0=require("./macros/misc"),$38$0)(mac$0,bind$0);($40$0=require("./macros/macrodef"),$40$0)(mac$0,bind$0);($42$0=require("./macros/async"),$42$0)(mac$0,bind$0);($44$0=require("./macros/logic"),$44$0)(mac$0,bind$0);make_expander$0=function make_expander(pipeline$0){var generic_nodes$0=void 0;generic_nodes$0=["if","js_while","js_for","js_for_in","js_for_of","js_label","js_break","js_continue","js_return","js_delete","js_throw","js_try","js_new","js_yield","js_class","js_super"];return Expander$0(stdenv$0.fork(),generic_nodes$0,pipeline$0);};$targ$0=stdenv$0;exports["stdenv"]=$targ$0;$targ$1=make_expander$0;exports["make_expander"]=$targ$1;void 0;
//# sourceMappingURL=stdenv.js.map
;