Michael Schimmel
4dfdc75545
- Add `rtl/system.myc` as the system library, containing core utilities like `while` and `cache`. - Remove the duplicate `prelude.myc` from `src/ast/rtl/`. - Modify `Environment::collect_dependencies` to implicitly add `#use system` when necessary. - Update `Environment::with_cwd` to also add the `rtl` subdirectory to search paths. - Add `target/` to `.geminiignore` to exclude build artifacts. - Adjust example `sma.myc` to use the new `cache` macro and reduce sample data size. - Update `rtl/sma.myc` to correctly initialize the `history` series with its `length`. - Add `preload_dependencies` calls to `dump_ast` and `run_script` for proper module loading.
21 lines
456 B
Plaintext
21 lines
456 B
Plaintext
(do
|
|
(def SMA
|
|
(fn [length]
|
|
(do
|
|
(def history (series length :float))
|
|
(def sum 0.0)
|
|
|
|
(fn [val]
|
|
(do
|
|
(def hist_len (len history))
|
|
(if (>= hist_len length)
|
|
(assign sum (- sum (history (- length 1)))))
|
|
|
|
(push history val)
|
|
(assign sum (+ sum val))
|
|
|
|
(if (>= hist_len length)
|
|
(/ sum length))
|
|
)))))
|
|
)
|