From c3eee8e333866d92e5fd94ae83cef618758c11bb Mon Sep 17 00:00:00 2001 From: Markus Uhlin Date: Mon, 15 Sep 2025 18:50:32 +0200 Subject: FICS RPBLC v1.4.6 --- FICS/iset.cpp | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 FICS/iset.cpp (limited to 'FICS/iset.cpp') diff --git a/FICS/iset.cpp b/FICS/iset.cpp new file mode 100644 index 0000000..afe084c --- /dev/null +++ b/FICS/iset.cpp @@ -0,0 +1,23 @@ +// SPDX-FileCopyrightText: 2024 Markus Uhlin +// SPDX-License-Identifier: ISC + +#include "stdinclude.h" +#include "common.h" + +#include "iset.h" +#include "utils.h" + +PUBLIC int +com_iset(int p, param_list param) +{ + if (param[0].type != TYPE_WORD || + param[1].type != TYPE_WORD) { + pprintf(p, "%s: bad parameters\n", __func__); + return COM_BADPARAMETERS; + } + + pprintf(p, "%s: %s %s\n", __func__, + param[0].val.word, + param[1].val.word); + return COM_OK; +} -- cgit v1.2.3