Unified · Split
| @@ -3,6 +3,7 @@ · 2 unmodified lines | ||
| 3 | 3 | int sk_node_biscale(sk_core *core); |
| 4 | 4 | int sk_node_scale(sk_core *core); |
| 5 | 5 | int sk_node_wavout(sk_core *core, const char *filename); |
| 6 | +int sk_node_wavin(sk_core *core, const char *filename); | |
| 6 | 7 | int sk_node_sine(sk_core *core); |
| 7 | 8 | int sk_node_dcblocker(sk_core *core); |
| 8 | 9 | int sk_node_rephasor(sk_core *core); |
| @@ -0,0 +1,24 @@ | ||
| 1 | +#include <stdlib.h> | |
| 2 | +#include <stdio.h> | |
| 3 | +#include <string.h> | |
| 4 | +#include "lil/lil.h" | |
| 5 | +#include "patchwerk/patchwerk.h" | |
| 6 | +#include "core.h" | |
| 7 | +#include "sklil.h" | |
| 8 | +#include "wavin.h" | |
| 9 | + | |
| 10 | +static lil_value_t wavin(lil_t lil, size_t argc, lil_value_t *argv) | |
| 11 | +{ | |
| 12 | + sk_core *core; | |
| 13 | + core = lil_get_data(lil); | |
| 14 | + | |
| 15 | + SKLIL_ARITY_CHECK(lil, "wavin", argc, 1); | |
| 16 | + | |
| 17 | + sk_node_wavin(core, lil_to_string(argv[0])); | |
| 18 | + return NULL; | |
| 19 | +} | |
| 20 | + | |
| 21 | +void sklil_load_wavin(lil_t lil) | |
| 22 | +{ | |
| 23 | + lil_register(lil, "wavin", wavin); | |
| 24 | +} | |