john/cell
1
0
Fork 0
Code Issues 31 Pull Requests Actions Packages Projects Releases 2 Wiki Activity

idompent

Browse Source
This commit is contained in:
John Alanbrook
2026-02-15 14:58:46 -06:00
parent ebd624b772
commit 96bbb9e4c8
20 changed files with 25577 additions and 25530 deletions
Download Patch File Download Diff File Expand all files Collapse all files

696
boot/bootstrap.cm.mcode
View File

File diff suppressed because it is too large Load Diff

1568
boot/engine.cm.mcode
View File

File diff suppressed because it is too large Load Diff

112
boot/fd.cm.mcode
View File

@@ -533,7 +533,7 @@
[
"get",
5,
4,
3,
1,
24,
14
@@ -971,7 +971,7 @@
[
"get",
5,
4,
3,
1,
30,
14
@@ -1351,7 +1351,7 @@
[
"get",
5,
4,
3,
1,
36,
14
@@ -1865,7 +1865,7 @@
[
"get",
14,
3,
4,
3,
49,
67
@@ -1881,7 +1881,7 @@
[
"get",
17,
3,
4,
3,
49,
34
@@ -2327,7 +2327,7 @@
[
"get",
10,
3,
4,
3,
60,
59
@@ -2343,7 +2343,7 @@
[
"get",
13,
3,
4,
3,
60,
35
@@ -2913,7 +2913,7 @@
"tern_end_63",
[
"move",
2,
3,
6,
75,
61
@@ -2929,7 +2929,7 @@
[
"get",
17,
1,
2,
3,
77,
24
@@ -2981,7 +2981,7 @@
],
[
"move",
3,
2,
16,
77,
24
@@ -2989,7 +2989,7 @@
[
"get",
21,
2,
1,
3,
78,
16
@@ -3031,7 +3031,7 @@
[
"push",
25,
3,
2,
78,
16
],
@@ -3109,7 +3109,7 @@
"setarg",
28,
1,
3,
2,
78,
16
],
@@ -3146,7 +3146,7 @@
[
"get",
31,
7,
4,
2,
81,
14
@@ -3177,7 +3177,7 @@
"setarg",
32,
1,
2,
3,
81,
14
],
@@ -3199,7 +3199,7 @@
[
"get",
36,
3,
8,
2,
82,
11
@@ -3230,7 +3230,7 @@
"setarg",
37,
1,
3,
2,
82,
11
],
@@ -3238,7 +3238,7 @@
"setarg",
37,
2,
2,
3,
82,
11
],
@@ -3267,7 +3267,7 @@
[
"get",
40,
7,
4,
2,
85,
14
@@ -3298,7 +3298,7 @@
"setarg",
41,
1,
2,
3,
85,
14
],
@@ -3364,7 +3364,7 @@
"setarg",
47,
1,
2,
3,
85,
37
],
@@ -3415,7 +3415,7 @@
[
"push",
49,
2,
3,
86,
25
],
@@ -3480,7 +3480,7 @@
[
"get",
6,
7,
4,
1,
69,
23
@@ -3555,7 +3555,7 @@
[
"get",
11,
2,
1,
2,
71,
16
@@ -3859,7 +3859,7 @@
"instructions": [
[
"move",
4,
3,
2,
42,
14
@@ -3873,7 +3873,7 @@
[
"is_identical",
10,
4,
3,
9,
43,
15
@@ -3888,7 +3888,7 @@
[
"is_int",
11,
4,
3,
43,
15
],
@@ -3909,7 +3909,7 @@
[
"eq_int",
10,
4,
3,
9,
43,
15
@@ -3924,7 +3924,7 @@
[
"is_num",
11,
4,
3,
43,
15
],
@@ -3945,7 +3945,7 @@
[
"eq_float",
10,
4,
3,
9,
43,
15
@@ -3960,7 +3960,7 @@
[
"is_text",
11,
4,
3,
43,
15
],
@@ -3981,7 +3981,7 @@
[
"eq_text",
10,
4,
3,
9,
43,
15
@@ -3996,7 +3996,7 @@
[
"is_null",
11,
4,
3,
43,
15
],
@@ -4025,7 +4025,7 @@
[
"is_bool",
11,
4,
3,
43,
15
],
@@ -4046,7 +4046,7 @@
[
"eq_bool",
10,
4,
3,
9,
43,
15
@@ -4081,7 +4081,7 @@
],
[
"move",
4,
3,
13,
43,
28
@@ -4117,7 +4117,7 @@
],
[
"move",
7,
4,
15,
46,
3
@@ -4145,7 +4145,7 @@
],
[
"move",
3,
8,
17,
68,
3
@@ -4153,7 +4153,7 @@
[
"get",
19,
2,
1,
1,
92,
12
@@ -4195,7 +4195,7 @@
[
"push",
23,
4,
3,
92,
12
],
@@ -4273,7 +4273,7 @@
"setarg",
26,
1,
4,
3,
92,
12
],
@@ -4287,7 +4287,7 @@
"call_done_84",
[
"move",
8,
7,
18,
92,
12
@@ -4295,7 +4295,7 @@
[
"move",
27,
8,
7,
93,
7
],
@@ -4309,7 +4309,7 @@
[
"load_field",
28,
8,
7,
"isDirectory",
93,
13
@@ -4339,7 +4339,7 @@
[
"frame",
31,
3,
8,
2,
94,
5
@@ -4362,7 +4362,7 @@
"setarg",
31,
1,
4,
3,
94,
5
],
@@ -4416,7 +4416,7 @@
],
[
"move",
4,
3,
5,
0,
0
@@ -4430,7 +4430,7 @@
],
[
"move",
1,
2,
6,
0,
0
@@ -4492,7 +4492,7 @@
],
[
"move",
2,
1,
8,
1,
10
@@ -4554,15 +4554,15 @@
],
[
"move",
3,
4,
13,
2,
16
],
[
"store_field",
2,
1,
2,
"join_paths",
22,
1
@@ -4576,7 +4576,7 @@
],
[
"store_field",
2,
1,
17,
"basename",
23,
@@ -4591,7 +4591,7 @@
],
[
"store_field",
2,
1,
18,
"dirname",
29,
@@ -4606,7 +4606,7 @@
],
[
"store_field",
2,
1,
19,
"stem",
35,
@@ -4621,7 +4621,7 @@
],
[
"store_field",
2,
1,
20,
"globfs",
41,
@@ -4629,7 +4629,7 @@
],
[
"return",
2,
1,
100,
8
],

5634
boot/fold.cm.mcode
View File

File diff suppressed because it is too large Load Diff

3014
boot/internal_shop.cm.mcode
View File

File diff suppressed because it is too large Load Diff

426
boot/link.cm.mcode
View File

File diff suppressed because it is too large Load Diff

12768
boot/mcode.cm.mcode
View File

File diff suppressed because it is too large Load Diff

742
boot/package.cm.mcode
View File

File diff suppressed because it is too large Load Diff

7918
boot/parse.cm.mcode
View File

File diff suppressed because it is too large Load Diff

1188
boot/pronto.cm.mcode
View File

File diff suppressed because it is too large Load Diff

895
boot/qbe.cm.mcode
View File

File diff suppressed because it is too large Load Diff

6445
boot/qbe_emit.cm.mcode
View File

File diff suppressed because it is too large Load Diff

448
boot/seed_bootstrap.cm.mcode
View File

File diff suppressed because it is too large Load Diff

3756
boot/streamline.cm.mcode
View File

File diff suppressed because it is too large Load Diff

1000
boot/time.cm.mcode
View File

File diff suppressed because it is too large Load Diff

1794
boot/tokenize.cm.mcode
View File

File diff suppressed because it is too large Load Diff

1064
boot/toml.cm.mcode
View File

File diff suppressed because it is too large Load Diff

1632
boot/verify_ir.cm.mcode
View File

File diff suppressed because it is too large Load Diff

2
mcode.cm
View File

@@ -844,7 +844,7 @@ var mcode = function(ast) {
if (scope == null) {
return null
}
var keys = array(scope)
var keys = sort(array(scope))
var _i = 0
var name = null
var v = null

5
source/runtime.c
View File

@@ -8837,8 +8837,7 @@ static JSValue js_cell_array_sort (JSContext *ctx, JSValue this_val, int argc, J
arr = JS_VALUE_GET_ARRAY (arr_ref.val);
items[i] = arr->values[i];
}
} else if (JS_VALUE_GET_TAG (argv[1]) == JS_TAG_STRING
|| JS_VALUE_GET_TAG (argv[1]) == JS_TAG_STRING_IMM) {
} else if (JS_VALUE_IS_TEXT (argv[1])) {
JSValue prop_key = js_key_from_string (ctx, argv[1]);
/* Re-read items[i] (js_key_from_string no longer allocates, but re-read is harmless) */
arr = JS_VALUE_GET_ARRAY (arr_ref.val);
@@ -8870,7 +8869,7 @@ static JSValue js_cell_array_sort (JSContext *ctx, JSValue this_val, int argc, J
if (key_tag == JS_TAG_INT || key_tag == JS_TAG_FLOAT64 || key_tag == JS_TAG_SHORT_FLOAT) {
JS_ToFloat64 (ctx, &keys[i], key);
if (i == 0) is_string = 0;
} else if (key_tag == JS_TAG_STRING || key_tag == JS_TAG_STRING_IMM) {
} else if (JS_VALUE_IS_TEXT (key)) {
if (i == 0) {
is_string = 1;
str_keys = alloca (sizeof (char *) * len);