on master help sign in
Get rid of `Graphics` module prefix.
e52ece9evancz
core-js/Automaton.js+2−7
@@ -1,10 +1,7 @@
1−
1+(function() {
2−try{
3
2
4for(var i in Elm) { this[i] = Elm[i]; }
3for(var i in Elm) { this[i] = Elm[i]; }
5−if (Elm.Automaton) throw "Module name collision, 'Automaton' is already defined.";
6Elm.Automaton=function(){
4Elm.Automaton=function(){
7− try{if (!(Elm.Prelude instanceof Object)) throw 'module not found'; } catch(e) {throw "Module 'Prelude' is missing. Compile with --make flag or load missing module in a separate JavaScript file.";}
8 var hiddenVars=[];
5 var hiddenVars=[];
9 for(var i in Elm.Prelude){
6 for(var i in Elm.Prelude){
10 if (hiddenVars.indexOf(i) >= 0) continue;
7 if (hiddenVars.indexOf(i) >= 0) continue;
@@ -184,6 +181,4 @@ Elm.Automaton=function(){
184 function draggable_14(form_93){
181 function draggable_14(form_93){
185 return init__7(["Tuple2",Listen_9,form_93])(stepDrag_13);};
182 return init__7(["Tuple2",Listen_9,form_93])(stepDrag_13);};
186 return {Automaton:Automaton_0,run:run_1,step:step_2,composeAuto:composeAuto_3,combine:combine_4,pure:pure_5,init:init_6,init_:init__7,count:count_8,Listen:Listen_9,Ignore:Ignore_10,DragFrom:DragFrom_11,vecSub:vecSub_12,stepDrag:stepDrag_13,draggable:draggable_14};}();
183 return {Automaton:Automaton_0,run:run_1,step:step_2,composeAuto:composeAuto_3,combine:combine_4,pure:pure_5,init:init_6,init_:init__7,count:count_8,Listen:Listen_9,Ignore:Ignore_10,DragFrom:DragFrom_11,vecSub:vecSub_12,stepDrag:stepDrag_13,draggable:draggable_14};}();
187−Elm.main=function(){
184+}());
188− return Elm.Automaton.main;};
189−} catch (e) {Elm.main=function() {var msg = ('<br/><h2>Your browser may not be supported. Are you using a modern browser?</h2>' + '<br/><span style="color:grey">Runtime Error in Automaton module:<br/>' + e + '</span>');document.body.innerHTML = Text.monospace(msg);throw e;};}
core-js/Dict.js+2−6
@@ -1,15 +1,13 @@
1
1
2−try{
2+(function() {
3
3
4for(var i in Elm) { this[i] = Elm[i]; }
4for(var i in Elm) { this[i] = Elm[i]; }
5if (Elm.Dict) throw "Module name collision, 'Dict' is already defined.";
5if (Elm.Dict) throw "Module name collision, 'Dict' is already defined.";
6Elm.Dict=function(){
6Elm.Dict=function(){
7− try{if (!(Elm.Prelude instanceof Object)) throw 'module not found'; } catch(e) {throw "Module 'Prelude' is missing. Compile with --make flag or load missing module in a separate JavaScript file.";}
8 var hiddenVars=[];
7 var hiddenVars=[];
9 for(var i in Elm.Prelude){
8 for(var i in Elm.Prelude){
10 if (hiddenVars.indexOf(i) >= 0) continue;
9 if (hiddenVars.indexOf(i) >= 0) continue;
11 this[i]=Elm.Prelude[i];}
10 this[i]=Elm.Prelude[i];}
12− try{if (!(Elm.Maybe instanceof Object)) throw 'module not found'; } catch(e) {throw "Module 'Maybe' is missing. Compile with --make flag or load missing module in a separate JavaScript file.";}
13 var isJust=Elm.Maybe.isJust;
11 var isJust=Elm.Maybe.isJust;
14 var Red_0=["Red"];
12 var Red_0=["Red"];
15 var Black_1=["Black"];
13 var Black_1=["Black"];
@@ -478,6 +476,4 @@ Elm.Dict=function(){
478 function fromList_42(assocs_235){
476 function fromList_42(assocs_235){
479 return List.foldl(uncurry(insert_20))(empty_4)(assocs_235);};
477 return List.foldl(uncurry(insert_20))(empty_4)(assocs_235);};
480 return {empty:empty_4,lookup:lookup_7,findWithDefault:findWithDefault_8,member:member_10,insert:insert_20,singleton:singleton_21,remove:remove_32,map:map_33,foldl:foldl_34,foldr:foldr_35,union:union_36,intersect:intersect_37,diff:diff_38,keys:keys_39,values:values_40,toList:toList_41,fromList:fromList_42};}();
478 return {empty:empty_4,lookup:lookup_7,findWithDefault:findWithDefault_8,member:member_10,insert:insert_20,singleton:singleton_21,remove:remove_32,map:map_33,foldl:foldl_34,foldr:foldr_35,union:union_36,intersect:intersect_37,diff:diff_38,keys:keys_39,values:values_40,toList:toList_41,fromList:fromList_42};}();
481−Elm.main=function(){
479+}());
482− return Elm.Dict.main;};
483−} catch (e) {Elm.main=function() {var msg = ('<br/><h2>Your browser may not be supported. Are you using a modern browser?</h2>' + '<br/><span style="color:grey">Runtime Error in Dict module:<br/>' + e + '</span>');document.body.innerHTML = Text.monospace(msg);throw e;};}
core-js/Graphics/Collage.js+3−3
@@ -12,13 +12,13 @@ function tracePoints(ctx,points) {
12
12
13function solid(ctx,color,points) {
13function solid(ctx,color,points) {
14 tracePoints(ctx,points);
14 tracePoints(ctx,points);
15− ctx.strokeStyle = Elm.Graphics.Color.extract(color);
15+ ctx.strokeStyle = Elm.Color.extract(color);
16 ctx.stroke();
16 ctx.stroke();
17};
17};
18
18
19function filled(ctx,color,points) {
19function filled(ctx,color,points) {
20 tracePoints(ctx,points);
20 tracePoints(ctx,points);
21− ctx.fillStyle = Elm.Graphics.Color.extract(color);
21+ ctx.fillStyle = Elm.Color.extract(color);
22 ctx.fill();
22 ctx.fill();
23}
23}
24
24
@@ -35,7 +35,7 @@ function textured(redo,ctx,src,points) {
35function customLine(pattern,ctx,color,points) {
35function customLine(pattern,ctx,color,points) {
36 if (pattern.length === 0) { pattern = [8,4]; }
36 if (pattern.length === 0) { pattern = [8,4]; }
37 customLineHelp(ctx, pattern, points);
37 customLineHelp(ctx, pattern, points);
38− ctx.strokeStyle = Elm.Graphics.Color.extract(color);
38+ ctx.strokeStyle = Elm.Color.extract(color);
39 ctx.stroke();
39 ctx.stroke();
40};
40};
41
41
core-js/Graphics/Color.js+1−2
@@ -1,6 +1,5 @@
1var Elm = Elm || {};
1var Elm = Elm || {};
2−Elm.Graphics = Elm.Graphics || {};
3−Elm.Graphics.Color = function() {
2+Elm.Color = function() {
4 function Color_0(a1) {
3 function Color_0(a1) {
5 return function(a2) {
4 return function(a2) {
6 return function(a3) {
5 return function(a3) {
core-js/Graphics/Element.js+1−2
@@ -1,6 +1,5 @@
1var Elm = Elm || {};
1var Elm = Elm || {};
2−Elm.Graphics = Elm.Graphics || {};
2+Elm.Graphics = function() {
3−Elm.Graphics.Element = function() {
4 var JS = Elm.JavaScript;
3 var JS = Elm.JavaScript;
5 var DLeft_0 = ["DLeft"];
4 var DLeft_0 = ["DLeft"];
6 var DRight_1 = ["DRight"];
5 var DRight_1 = ["DRight"];
core-js/Graphics/Render.js+2−2
@@ -177,7 +177,7 @@ function render(elem) {
177 e.style.height = (~~elem[4]) + 'px';
177 e.style.height = (~~elem[4]) + 'px';
178 if (elem[5] !== 1) { e.style.opacity = elem[5]; }
178 if (elem[5] !== 1) { e.style.opacity = elem[5]; }
179 if (elem[6][0] === "Just") {
179 if (elem[6][0] === "Just") {
180− e.style.backgroundColor = Elm.Graphics.Color.extract(elem[6][1]);
180+ e.style.backgroundColor = Elm.Color.extract(elem[6][1]);
181 }
181 }
182 if (elem[7][0] === "Just") {
182 if (elem[7][0] === "Just") {
183 var a = newElement('a');
183 var a = newElement('a');
@@ -263,7 +263,7 @@ function update(node,curr,next) {
263 if (next[4] !== curr[4]) node.style.height = (~~next[4]) + 'px';
263 if (next[4] !== curr[4]) node.style.height = (~~next[4]) + 'px';
264 if (next[5] !== curr[5]) node.style.opacity = next[5];
264 if (next[5] !== curr[5]) node.style.opacity = next[5];
265 if (next[6].length === 2) {
265 if (next[6].length === 2) {
266− var clr = Elm.Graphics.Color.extract(next[6][1]);
266+ var clr = Elm.Color.extract(next[6][1]);
267 if (clr !== node.style.backgroundColor) node.style.backgroundColor = clr;
267 if (clr !== node.style.backgroundColor) node.style.backgroundColor = clr;
268 }
268 }
269 if (next[7].length === 2) {
269 if (next[7].length === 2) {
core-js/Prelude.js+3−3
@@ -163,9 +163,9 @@ Elm.Prelude = function() {
163 Elm.Prelude[i] = library[i];
163 Elm.Prelude[i] = library[i];
164 }
164 }
165 };
165 };
166− include (Elm.Graphics.Color);
166+ include (Elm.Color);
167− include (Elm.Graphics.Text);
167+ include (Elm.Text);
168− include (Elm.Graphics.Element);
168+ include (Elm.Graphics);
169
169
170 show = Value.show;
170 show = Value.show;
171
171
core-js/Set.js+2−6
@@ -1,10 +1,8 @@
1
1
2−try{
2+(function() {
3
3
4for(var i in Elm) { this[i] = Elm[i]; }
4for(var i in Elm) { this[i] = Elm[i]; }
5−if (Elm.Set) throw "Module name collision, 'Set' is already defined.";
6Elm.Set=function(){
5Elm.Set=function(){
7− try{if (!(Elm.Prelude instanceof Object)) throw 'module not found'; } catch(e) {throw "Module 'Prelude' is missing. Compile with --make flag or load missing module in a separate JavaScript file.";}
8 var hiddenVars=[];
6 var hiddenVars=[];
9 for(var i in Elm.Prelude){
7 for(var i in Elm.Prelude){
10 if (hiddenVars.indexOf(i) >= 0) continue;
8 if (hiddenVars.indexOf(i) >= 0) continue;
@@ -38,6 +36,4 @@ Elm.Set=function(){
38 return function(x){
36 return function(x){
39 return fromList_9(List.map(f_25)(x));}(toList_8(t_26));};};
37 return fromList_9(List.map(f_25)(x));}(toList_8(t_26));};};
40 return {empty:empty_0,singleton:singleton_1,insert:insert_2,remove:remove_3,member:member_4,union:union_5,intersect:intersect_6,diff:diff_7,toList:toList_8,fromList:fromList_9,foldl:foldl_10,foldr:foldr_11,map:map_12};}();
38 return {empty:empty_0,singleton:singleton_1,insert:insert_2,remove:remove_3,member:member_4,union:union_5,intersect:intersect_6,diff:diff_7,toList:toList_8,fromList:fromList_9,foldl:foldl_10,foldr:foldr_11,map:map_12};}();
41−Elm.main=function(){
39+}());
42− return Elm.Set.main;};
43−} catch (e) {Elm.main=function() {var msg = ('<br/><h2>Your browser may not be supported. Are you using a modern browser?</h2>' + '<br/><span style="color:grey">Runtime Error in Set module:<br/>' + e + '</span>');document.body.innerHTML = Text.monospace(msg);throw e;};}
core-js/Signal/Input.js+1−1
@@ -50,7 +50,7 @@ Elm.Input = function() {
50 var opts = [];
50 var opts = [];
51 while (options[0] === "Cons") {
51 while (options[0] === "Cons") {
52 var opt = newElement('option');
52 var opt = newElement('option');
53− var str = Text.toText(options[1][1]);
53+ var str = Value.toText(options[1][1]);
54 opt.value = str;
54 opt.value = str;
55 opt.innerHTML = str;
55 opt.innerHTML = str;
56 slct.appendChild(opt);
56 slct.appendChild(opt);
core-js/Text.js+3−5
@@ -1,5 +1,6 @@
1
1
2+var Elm = Elm || {};
2−var Text = function() {
3+Elm.Text = function() {
3 function fromString(s) { return Value.toText(s); }
4 function fromString(s) { return Value.toText(s); }
4
5
5 var addTag = function(tag) { return function(text) {
6 var addTag = function(tag) { return function(text) {
@@ -23,7 +24,7 @@ var Text = function() {
23 var italic = addStyle('font-style', 'italic');
24 var italic = addStyle('font-style', 'italic');
24 var bold = addTag('b');
25 var bold = addTag('b');
25 var color = function(c) {
26 var color = function(c) {
26− return addStyle('color', Elm.Graphics.Color.extract(c));
27+ return addStyle('color', Elm.Color.extract(c));
27 };
28 };
28 var underline = addStyle('text-decoration', 'underline');
29 var underline = addStyle('text-decoration', 'underline');
29 var overline = addStyle('text-decoration', 'overline');
30 var overline = addStyle('text-decoration', 'overline');
@@ -47,6 +48,3 @@ var Text = function() {
47 color : color,
48 color : color,
48 link : link };
49 link : link };
49}();
50}();
50−
51−var Elm = Elm || {};
52−Elm.Graphics.Text = Text;
core-js/cat.bat+1−1
@@ -1,4 +1,4 @@
1−copy /B Guid.js+foreign\JavaScript.js+foreign\JSON.js+Value.js+List.js+Dict.js+Set.js+Char.js+Maybe.js+String.js+Graphics\Color.js+Graphics\Collage.js+Graphics\Element.js+Text.js+Graphics\Render.js+runtime\Signal.js+runtime\Dispatcher.js+Signal\HTTP.js+Signal\Input.js+Signal\Keyboard.js+Signal\Mouse.js+Signal\Random.js+Signal\Time.js+Signal\Window.js+Prelude.js+Automaton.js ..\elm-mini.js
1+copy /B Guid.js+foreign\JavaScript.js+foreign\JSON.js+Value.js+List.js+Maybe.js+Dict.js+Set.js+Char.js+String.js+Graphics\Color.js+Graphics\Collage.js+Graphics\Element.js+Text.js+Graphics\Render.js+runtime\Signal.js+runtime\Dispatcher.js+Signal\HTTP.js+Signal\Input.js+Signal\Keyboard.js+Signal\Mouse.js+Signal\Random.js+Signal\Time.js+Signal\Window.js+Prelude.js+Automaton.js ..\elm-mini.js
2
2
3cd ..\elm
3cd ..\elm
4
4