#include "api/vm.h"
#include "api/nil.h"
#include "api/str.h"
+#include "api/util.h"
UwUVMValue uwu_linear(UwUVMArgs *args)
{
- if (args->num < 1)
- error("error: nolambda:flow:linear requires at least one argument\n");
+ uwuutil_require_min("nolambda:flow:linear", args, 1);
size_t return_arg = args->num - 1;
UwUVMValue uwu_error(UwUVMArgs *args)
{
- if (args->num != 1)
- error("error: nolambda:flow:error requires exactly one argument\n");
+ uwuutil_require_exact("nolambda:flow:error", args, 1);
char *err = uwustr_get(uwuvm_get_arg(args, 0));
fprintf(stderr, "%s\n", err);
#include "common/err.h"
#include "api/vm.h"
#include "api/str.h"
+#include "api/util.h"
UwUVMValue uwu_print(UwUVMArgs *args)
{
- if (args->num != 1)
- error("error: nolambda:io:print requires exactly one argument\n");
+ uwuutil_require_exact("nolambda:io:print", args, 1);
UwUVMValue value = uwuvm_get_arg(args, 0);
UwUVMValue uwu_scan(UwUVMArgs *args)
{
+ uwuutil_require_max("nolambda:io:scan", args, 1);
+
char *prompt = NULL;
if (args->num == 0)
prompt = strdup("");
- else if (args->num == 1)
- prompt = uwustr_get(uwuvm_get_arg(args, 0));
else
- error("error: nolambda:io:scan requires exactly one or zero arguments\n");
+ prompt = uwustr_get(uwuvm_get_arg(args, 0));
char *return_string = linenoise(prompt);