twc/ludus
4
0
Fork 0
Code Issues 32 Pull Requests Packages Projects 8 Releases Wiki Activity

delete print!s from prelude

Browse Source
This commit is contained in:
Scott Richmond 2024-06-07 15:44:35 -04:00
parent fd3b47fa15
commit 5e3ffb0e1e
5 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
build/ludus.jimage
View File

Binary file not shown.

2
build/out.mjs
View File

@ -6489,7 +6489,7 @@ var __emscripten_stack_alloc = (a0) => (__emscripten_stack_alloc = wasmExports['
var _emscripten_stack_get_current = () => (_emscripten_stack_get_current = wasmExports['emscripten_stack_get_current'])();
var ___cxa_is_pointer_type = createExportWrapper('__cxa_is_pointer_type', 1);
var dynCall_jiji = Module['dynCall_jiji'] = createExportWrapper('dynCall_jiji', 5);
var ___emscripten_embedded_file_data = Module['___emscripten_embedded_file_data'] = 1782340;
var ___emscripten_embedded_file_data = Module['___emscripten_embedded_file_data'] = 1781548;
function invoke_i(index) {
var sp = stackSave();
try {

BIN
build/out.wasm
View File

Binary file not shown.

1
justfile
View File

@ -18,7 +18,6 @@ doc:
# publish to npm (did you build things first?)
publish:
just build
npm version patch
npm publish

2
prelude.ld
View File

@ -189,7 +189,6 @@ fn fold {
"Folds a list."
(f as :fn, xs as :list) -> fold (f, xs, f ())
(f as :fn, xs as :list, root) -> {
base :print! (("folding ", xs, " with ", f))
loop (root, first (xs), rest (xs)) with {
(prev, curr, []) -> f (prev, curr)
(prev, curr, remaining) -> recur (
@ -1052,7 +1051,6 @@ box bgcolor = colors :black
fn add_call! (call) -> update! (p5_calls, append (_, call))
fn add_command! (command) -> {
print! ("adding command", command)
update! (turtle_commands, append (_, command))
let prev = do turtle_states > unbox > last
let curr = apply_command (prev, command)