Compare commits

..

No commits in common. "8eed4145db8330e6662a1a6f5507f9758358a771" and "ef4a345da6482c1e0b98679142817a75e4f736ab" have entirely different histories.

6 changed files with 5 additions and 6 deletions

Binary file not shown.

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'] = 1826680;
var ___emscripten_embedded_file_data = Module['___emscripten_embedded_file_data'] = 1827268;
function invoke_i(index) {
var sp = stackSave();
try {

Binary file not shown.

View File

@ -28,4 +28,3 @@ build:
rm build/ludus.jimage
janet -c src/ludus.janet build/ludus.jimage
cd build && just build
git commit -am "build"

View File

@ -377,9 +377,9 @@ fn words {
let no_punct = strip (str)
let strs = split (no_punct, " ")
fn worder (list, str) -> if empty? (str)
then list
else append (list, str)
fold (worder, strs, [])
then do list > report!
else do append (list, str) > report!
do fold (worder, strs, []) > report!
}
}

View File

@ -52,7 +52,7 @@
(comment
# (do
(def source `
words ("foo bar ba,;;;!!!z")
fold (add, [1, 2, 3])
`)
(def out (-> source
ludus