From cb86080b39af49ecff9a60ed47e8ae72993c34cd Mon Sep 17 00:00:00 2001
From: Jan Breuer <jan.breuer@jaybee.cz>
Date: 摹曛, 26 11月 2015 03:26:06 +0800
Subject: [PATCH] Fix unit test

---
 libscpi/test/test_parser.c |  744 ++++++++++++++++++++++++++++++++++++++++++++++++++++++--
 1 files changed, 706 insertions(+), 38 deletions(-)

diff --git a/libscpi/test/test_parser.c b/libscpi/test/test_parser.c
index 4b3111d..5f37cba 100644
--- a/libscpi/test/test_parser.c
+++ b/libscpi/test/test_parser.c
@@ -32,14 +32,14 @@
 
 static scpi_result_t test_treeA(scpi_t* context) {
 
-    SCPI_ResultInt(context, 10);
+    SCPI_ResultInt32(context, 10);
 
     return SCPI_RES_OK;
 }
 
 static scpi_result_t test_treeB(scpi_t* context) {
 
-    SCPI_ResultInt(context, 20);
+    SCPI_ResultInt32(context, 20);
 
     return SCPI_RES_OK;
 }
@@ -70,11 +70,14 @@
     { .pattern = "STATus:QUEStionable:ENABle?", .callback = SCPI_StatusQuestionableEnableQ,},
 
     { .pattern = "STATus:PRESet", .callback = SCPI_StatusPreset,},
-    
+
     { .pattern = "TEXTfunction?", .callback = text_function,},
 
     { .pattern = "TEST:TREEA?", .callback = test_treeA,},
     { .pattern = "TEST:TREEB?", .callback = test_treeB,},
+
+    { .pattern = "STUB", .callback = SCPI_Stub,},
+    { .pattern = "STUB?", .callback = SCPI_StubQ,},
 
     SCPI_CMD_LIST_END
 };
@@ -95,9 +98,11 @@
     memcpy(output_buffer + output_buffer_pos, data, len);
     output_buffer_pos += len;
     output_buffer[output_buffer_pos] = '\0';
+    return len;
 }
 
 scpi_t scpi_context;
+
 static void error_buffer_clear(void) {
     err_buffer[0] = 0;
     err_buffer_pos = 0;
@@ -112,7 +117,6 @@
     err_buffer_pos++;
 }
 
-
 static size_t SCPI_Write(scpi_t * context, const char * data, size_t len) {
     (void) context;
 
@@ -120,6 +124,8 @@
 }
 
 static scpi_result_t SCPI_Flush(scpi_t * context) {
+    (void) context;
+
     return SCPI_RES_OK;
 }
 
@@ -132,7 +138,10 @@
 }
 
 scpi_reg_val_t srq_val = 0;
+
 static scpi_result_t SCPI_Control(scpi_t * context, scpi_ctrl_name_t ctrl, scpi_reg_val_t val) {
+    (void) context;
+
     if (SCPI_CTRL_SRQ == ctrl) {
         srq_val = val;
     } else {
@@ -144,6 +153,8 @@
 scpi_bool_t RST_executed = FALSE;
 
 static scpi_result_t SCPI_Reset(scpi_t * context) {
+    (void) context;
+
     RST_executed = TRUE;
     return SCPI_RES_OK;
 }
@@ -164,16 +175,17 @@
 
 scpi_t scpi_context = {
     .cmdlist = scpi_commands,
-    .buffer = {
+    .buffer =
+    {
         .length = SCPI_INPUT_BUFFER_LENGTH,
         .data = scpi_input_buffer,
     },
     .interface = &scpi_interface,
     .registers = scpi_regs,
     .units = scpi_units_def,
-    .idn = {"MA", "IN", NULL, "VER"},
+    .idn =
+    {"MA", "IN", NULL, "VER"},
 };
-
 
 static int init_suite(void) {
     SCPI_Init(&scpi_context);
@@ -216,12 +228,16 @@
     TEST_INPUT("*IDN?", "");
     TEST_INPUT("", "MA,IN,0,VER\r\n");
     output_buffer_clear();
-    
+
     /* Test ctree traversal */
     TEST_INPUT("TEST:TREEA?;TREEB?\r\n", "10;20\r\n");
     output_buffer_clear();
 
     TEST_INPUT("TEST:TREEA?;:TEXT? \"PARAM1\", \"PARAM2\"\r\n", "10;\"PARAM2\"\r\n");
+    output_buffer_clear();
+
+    /* Test special characters in parameters */
+    TEST_INPUT("TEXT? \"\", \"test\r\n\"\r\n", "\"test\r\n\"\r\n");
     output_buffer_clear();
 
     CU_ASSERT_EQUAL(err_buffer_pos, 0);
@@ -232,19 +248,24 @@
     output_buffer_clear();
     error_buffer_clear();
 
-#define TEST_ERROR(data, output, err_num) {                     \
+#define TEST_ERROR(data, output, expected_result, err_num) {    \
     output_buffer_clear();                                      \
     error_buffer_clear();                                       \
-    SCPI_Input(&scpi_context, data, strlen(data));              \
+    scpi_bool_t result = SCPI_Input(&scpi_context, data, strlen(data)); \
     CU_ASSERT_STRING_EQUAL(output, output_buffer);              \
-    CU_ASSERT_EQUAL(err_buffer[0], err_num)                     \
+    CU_ASSERT_EQUAL(err_buffer[0], err_num);                    \
+    CU_ASSERT_EQUAL(result, expected_result);                   \
 }
 
-    TEST_ERROR("*IDN?\r\n", "MA,IN,0,VER\r\n", 0);
-    TEST_ERROR("IDN?\r\n", "", SCPI_ERROR_UNDEFINED_HEADER);
-    TEST_ERROR("*ESE\r\n", "", SCPI_ERROR_MISSING_PARAMETER);
-    TEST_ERROR("*IDN? 12\r\n", "MA,IN,0,VER\r\n", SCPI_ERROR_PARAMETER_NOT_ALLOWED);
-    TEST_ERROR("TEXT? \"PARAM1\", \"PARAM2\"\r\n", "\"PARAM2\"\r\n", 0);
+    TEST_ERROR("*IDN?\r\n", "MA,IN,0,VER\r\n", TRUE, 0);
+    TEST_ERROR("IDN?\r\n", "", FALSE, SCPI_ERROR_UNDEFINED_HEADER);
+    TEST_ERROR("*ESE\r\n", "", FALSE, SCPI_ERROR_MISSING_PARAMETER);
+    TEST_ERROR("*IDN? 12\r\n", "MA,IN,0,VER\r\n", FALSE, SCPI_ERROR_PARAMETER_NOT_ALLOWED);
+    TEST_ERROR("TEXT? \"PARAM1\", \"PARAM2\"\r\n", "\"PARAM2\"\r\n", TRUE, 0);
+    TEST_ERROR("ABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJ"
+            "ABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJ"
+            "ABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJABCDEFGHIJ",
+            "", FALSE, SCPI_ERROR_INPUT_BUFFER_OVERRUN);
 
     // TODO: SCPI_ERROR_INVALID_SEPARATOR
     // TODO: SCPI_ERROR_INVALID_SUFFIX
@@ -263,6 +284,15 @@
     output_buffer_clear();                                      \
 }
 
+#define TEST_IEEE4882_REG(reg, expected) {                                     \
+    CU_ASSERT_EQUAL(SCPI_RegGet(&scpi_context, reg), expected);                \
+}
+
+
+#define TEST_IEEE4882_REG_SET(reg, val) {                                      \
+    SCPI_RegSet(&scpi_context, reg, val);                                      \
+}
+
     output_buffer_clear();
     error_buffer_clear();
 
@@ -278,7 +308,7 @@
     TEST_IEEE4882("*SRE?\r\n", "255\r\n");
     TEST_IEEE4882("*STB?\r\n", "0\r\n");
     TEST_IEEE4882("*ESR?\r\n", "1\r\n");
-    
+
     srq_val = 0;
     TEST_IEEE4882("ABCD\r\n", ""); /* "Undefined header" cause command error */
     CU_ASSERT_EQUAL(srq_val, (STB_ESR | STB_SRQ | STB_QMA)); /* value of STB as service request */
@@ -287,24 +317,45 @@
 
     TEST_IEEE4882("*STB?\r\n", "68\r\n"); /* Error queue is still not empty */
     TEST_IEEE4882("*ESR?\r\n", "0\r\n");
-    
+
+    TEST_IEEE4882("SYST:ERR:COUNT?\r\n", "1\r\n");
     TEST_IEEE4882("SYST:ERR:NEXT?\r\n", "-113,\"Undefined header\"\r\n");
     TEST_IEEE4882("SYST:ERR:NEXT?\r\n", "0,\"No error\"\r\n");
 
     TEST_IEEE4882("*STB?\r\n", "0\r\n"); /* Error queue is now empty */
-    
+
     RST_executed = FALSE;
     TEST_IEEE4882("*RST\r\n", "");
     CU_ASSERT_EQUAL(RST_executed, TRUE);
 
     TEST_IEEE4882("*TST?\r\n", "0\r\n");
-    
+
     TEST_IEEE4882("*WAI\r\n", "");
 
     TEST_IEEE4882("SYSTem:VERSion?\r\n", "1999.0\r\n");
+
+    TEST_IEEE4882_REG_SET(SCPI_REG_QUES, 1);
+    TEST_IEEE4882_REG(SCPI_REG_QUES, 1);
+    TEST_IEEE4882("STATus:PRESet\r\n", "");
+    TEST_IEEE4882_REG(SCPI_REG_QUES, 0);
+
+    TEST_IEEE4882_REG_SET(SCPI_REG_QUESE, 1);
+    TEST_IEEE4882("STATus:QUEStionable:ENABle?\r\n", "1\r\n");
+    TEST_IEEE4882_REG(SCPI_REG_QUESE, 1);
+    TEST_IEEE4882("STATus:QUEStionable:ENABle 2\r\n", "");
+    TEST_IEEE4882_REG(SCPI_REG_QUESE, 2);
+
+    TEST_IEEE4882("STATus:QUEStionable:EVENt?\r\n", "0\r\n");
+    TEST_IEEE4882_REG_SET(SCPI_REG_QUES, 1);
+    TEST_IEEE4882("STATus:QUEStionable:EVENt?\r\n", "1\r\n");
+    TEST_IEEE4882_REG(SCPI_REG_QUES, 0);
+    TEST_IEEE4882("STATus:QUEStionable:EVENt?\r\n", "0\r\n");
+
+    TEST_IEEE4882("STUB\r\n", "");
+    TEST_IEEE4882("STUB?\r\n", "0\r\n");
 }
 
-#define TEST_ParamInt(data, mandatory, expected_value, expected_result, expected_error_code) \
+#define TEST_ParamInt32(data, mandatory, expected_value, expected_result, expected_error_code) \
 {                                                                                       \
     int32_t value;                                                                      \
     scpi_bool_t result;                                                                 \
@@ -315,7 +366,7 @@
     scpi_context.param_list.lex_state.buffer = data;                                    \
     scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
     scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
-    result = SCPI_ParamInt(&scpi_context, &value, mandatory);                           \
+    result = SCPI_ParamInt32(&scpi_context, &value, mandatory);                         \
                                                                                         \
     errCode = SCPI_ErrorPop(&scpi_context);                                             \
     CU_ASSERT_EQUAL(result, expected_result);                                           \
@@ -325,18 +376,180 @@
     CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
 }
 
-static void testSCPI_ParamInt(void) {
-    TEST_ParamInt("10", TRUE, 10, TRUE, 0);
-    TEST_ParamInt("", FALSE, 0, FALSE, 0);
-    TEST_ParamInt("10.5", TRUE, 10, TRUE, 0); // TODO: should be FALSE, -104
-    TEST_ParamInt("#B101010", TRUE, 42, TRUE, 0);
-    TEST_ParamInt("#H101010", TRUE, 1052688, TRUE, 0);
-    TEST_ParamInt("#Q10", TRUE, 8, TRUE, 0);
+static void testSCPI_ParamInt32(void) {
+    TEST_ParamInt32("10", TRUE, 10, TRUE, 0);
+    TEST_ParamInt32("", FALSE, 0, FALSE, 0);
+    TEST_ParamInt32("10.5", TRUE, 10, TRUE, 0); // TODO: should be FALSE, -104
+    TEST_ParamInt32("#B101010", TRUE, 42, TRUE, 0);
+    TEST_ParamInt32("#H101010", TRUE, 1052688, TRUE, 0);
+    TEST_ParamInt32("#Q10", TRUE, 8, TRUE, 0);
 
-    TEST_ParamInt("", TRUE, 0, FALSE, -109); // missing parameter
-    TEST_ParamInt("abcd", TRUE, 0, FALSE, -104); // Data type error
-    TEST_ParamInt("10.5V", TRUE, 0, FALSE, -138);
-    TEST_ParamInt("10V", TRUE, 0, FALSE, -138);
+    TEST_ParamInt32("", TRUE, 0, FALSE, -109); // missing parameter
+    TEST_ParamInt32("abcd", TRUE, 0, FALSE, -104); // Data type error
+    TEST_ParamInt32("10.5V", TRUE, 0, FALSE, -138);
+    TEST_ParamInt32("10V", TRUE, 0, FALSE, -138);
+
+    // test range
+    TEST_ParamInt32("2147483647", TRUE, 2147483647, TRUE, 0);
+    TEST_ParamInt32("-2147483647", TRUE, -2147483647, TRUE, 0);
+}
+
+#define TEST_ParamUInt32(data, mandatory, expected_value, expected_result, expected_error_code) \
+{                                                                                       \
+    uint32_t value;                                                                     \
+    scpi_bool_t result;                                                                 \
+    int16_t errCode;                                                                    \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_ParamUInt32(&scpi_context, &value, mandatory);                        \
+                                                                                        \
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result, expected_result);                                           \
+    if (expected_result) {                                                              \
+        CU_ASSERT_EQUAL(value, expected_value);                                         \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testSCPI_ParamUInt32(void) {
+    TEST_ParamUInt32("10", TRUE, 10, TRUE, 0);
+    TEST_ParamUInt32("", FALSE, 0, FALSE, 0);
+    TEST_ParamUInt32("10.5", TRUE, 10, TRUE, 0); // TODO: should be FALSE, -104
+    TEST_ParamUInt32("#B101010", TRUE, 42, TRUE, 0);
+    TEST_ParamUInt32("#H101010", TRUE, 1052688, TRUE, 0);
+    TEST_ParamUInt32("#Q10", TRUE, 8, TRUE, 0);
+
+    TEST_ParamUInt32("", TRUE, 0, FALSE, -109); // missing parameter
+    TEST_ParamUInt32("abcd", TRUE, 0, FALSE, -104); // Data type error
+    TEST_ParamUInt32("10.5V", TRUE, 0, FALSE, -138);
+    TEST_ParamUInt32("10V", TRUE, 0, FALSE, -138);
+
+    // test range
+    TEST_ParamUInt32("2147483647", TRUE, 2147483647ULL, TRUE, 0);
+    TEST_ParamUInt32("4294967295", TRUE, 4294967295ULL, TRUE, 0);
+}
+
+#define TEST_ParamInt64(data, mandatory, expected_value, expected_result, expected_error_code) \
+{                                                                                       \
+    int64_t value;                                                                      \
+    scpi_bool_t result;                                                                 \
+    int16_t errCode;                                                                    \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_ParamInt64(&scpi_context, &value, mandatory);                         \
+                                                                                        \
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result, expected_result);                                           \
+    if (expected_result) {                                                              \
+        CU_ASSERT_EQUAL(value, expected_value);                                         \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testSCPI_ParamInt64(void) {
+    TEST_ParamInt64("10", TRUE, 10, TRUE, 0);
+    TEST_ParamInt64("", FALSE, 0, FALSE, 0);
+    TEST_ParamInt64("10.5", TRUE, 10, TRUE, 0); // TODO: should be FALSE, -104
+    TEST_ParamInt64("#B101010", TRUE, 42, TRUE, 0);
+    TEST_ParamInt64("#H101010", TRUE, 1052688, TRUE, 0);
+    TEST_ParamInt64("#Q10", TRUE, 8, TRUE, 0);
+
+    TEST_ParamInt64("", TRUE, 0, FALSE, -109); // missing parameter
+    TEST_ParamInt64("abcd", TRUE, 0, FALSE, -104); // Data type error
+    TEST_ParamInt64("10.5V", TRUE, 0, FALSE, -138);
+    TEST_ParamInt64("10V", TRUE, 0, FALSE, -138);
+
+    // test range
+    TEST_ParamInt64("2147483647", TRUE, 2147483647LL, TRUE, 0);
+    TEST_ParamInt64("-2147483647", TRUE, -2147483647LL, TRUE, 0);
+    TEST_ParamInt64("9223372036854775807", TRUE, 9223372036854775807LL, TRUE, 0);
+    TEST_ParamInt64("-9223372036854775807", TRUE, -9223372036854775807LL, TRUE, 0);
+}
+
+#define TEST_ParamUInt64(data, mandatory, expected_value, expected_result, expected_error_code) \
+{                                                                                       \
+    uint64_t value;                                                                     \
+    scpi_bool_t result;                                                                 \
+    int16_t errCode;                                                                    \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_ParamUInt64(&scpi_context, &value, mandatory);                        \
+                                                                                        \
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result, expected_result);                                           \
+    if (expected_result) {                                                              \
+        CU_ASSERT_EQUAL(value, expected_value);                                         \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testSCPI_ParamUInt64(void) {
+    TEST_ParamUInt64("10", TRUE, 10, TRUE, 0);
+    TEST_ParamUInt64("", FALSE, 0, FALSE, 0);
+    TEST_ParamUInt64("10.5", TRUE, 10, TRUE, 0); // TODO: should be FALSE, -104
+    TEST_ParamUInt64("#B101010", TRUE, 42, TRUE, 0);
+    TEST_ParamUInt64("#H101010", TRUE, 1052688, TRUE, 0);
+    TEST_ParamUInt64("#Q10", TRUE, 8, TRUE, 0);
+
+    TEST_ParamUInt64("", TRUE, 0, FALSE, -109); // missing parameter
+    TEST_ParamUInt64("abcd", TRUE, 0, FALSE, -104); // Data type error
+    TEST_ParamUInt64("10.5V", TRUE, 0, FALSE, -138);
+    TEST_ParamUInt64("10V", TRUE, 0, FALSE, -138);
+
+    // test range
+    TEST_ParamUInt64("2147483647", TRUE, 2147483647ULL, TRUE, 0);
+    TEST_ParamUInt64("4294967295", TRUE, 4294967295ULL, TRUE, 0);
+    TEST_ParamUInt64("9223372036854775807", TRUE, 9223372036854775807ULL, TRUE, 0);
+    TEST_ParamUInt64("18446744073709551615", TRUE, 18446744073709551615ULL, TRUE, 0);
+}
+
+
+#define TEST_ParamFloat(data, mandatory, expected_value, expected_result, expected_error_code) \
+{                                                                                       \
+    float value;                                                                        \
+    scpi_bool_t result;                                                                 \
+    int16_t errCode;                                                                    \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_ParamFloat(&scpi_context, &value, mandatory);                         \
+                                                                                        \
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result, expected_result);                                           \
+    if (expected_result) {                                                              \
+        CU_ASSERT_DOUBLE_EQUAL(value, expected_value, 0.000001);                        \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testSCPI_ParamFloat(void) {
+    TEST_ParamFloat("10", TRUE, 10, TRUE, 0);
+    TEST_ParamFloat("", FALSE, 0, FALSE, 0);
+    TEST_ParamFloat("10.5", TRUE, 10.5, TRUE, 0);
+    TEST_ParamFloat("#B101010", TRUE, 42, TRUE, 0);
+    TEST_ParamFloat("#H101010", TRUE, 1052688, TRUE, 0);
+    TEST_ParamFloat("#Q10", TRUE, 8, TRUE, 0);
+    TEST_ParamFloat("#HFFFFFF", TRUE, 0xFFFFFFu, TRUE, 0);
+
+    TEST_ParamFloat("", TRUE, 0, FALSE, -109); // missing parameter
+    TEST_ParamFloat("abcd", TRUE, 0, FALSE, -104); // Data type error
+    TEST_ParamFloat("10.5V", TRUE, 0, FALSE, -138);
+    TEST_ParamFloat("10V", TRUE, 0, FALSE, -138);
 }
 
 #define TEST_ParamDouble(data, mandatory, expected_value, expected_result, expected_error_code) \
@@ -407,7 +620,439 @@
 }
 
 
+#define TEST_ParamCopyText(data, mandatory, expected_value, expected_len, expected_result, expected_error_code) \
+{                                                                                       \
+    char value[100];                                                                    \
+    size_t value_len;                                                                   \
+    scpi_bool_t result;                                                                 \
+    int16_t errCode;                                                                    \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_ParamCopyText(&scpi_context, value, sizeof(value), &value_len, mandatory);\
+    /*printf("%.*s\r\n",  (int)value_len, value);*/                                     \
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result, expected_result);                                           \
+    if (expected_result) {                                                              \
+        CU_ASSERT_STRING_EQUAL(value, expected_value);                                  \
+        CU_ASSERT_EQUAL(value_len, expected_len);                                       \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testSCPI_ParamCopyText(void) {
+    TEST_ParamCopyText("\'abc\'", TRUE, "abc", 3, TRUE, 0);
+    TEST_ParamCopyText("\"abc\"", TRUE, "abc", 3, TRUE, 0);
+    TEST_ParamCopyText("\'a\'", TRUE, "a", 1, TRUE, 0);
+    TEST_ParamCopyText("\'a\'\'c\'", TRUE, "a\'c", 3, TRUE, 0);
+    TEST_ParamCopyText("\'a\"c\'", TRUE, "a\"c", 3, TRUE, 0);
+    TEST_ParamCopyText("\"a\"\"c\"", TRUE, "a\"c", 3, TRUE, 0);
+    TEST_ParamCopyText("\"a\'c\"", TRUE, "a\'c", 3, TRUE, 0);
+    TEST_ParamCopyText("\"\"", TRUE, "", 0, TRUE, 0);
+    TEST_ParamCopyText("", FALSE, "", 0, FALSE, 0);
+    TEST_ParamCopyText("\"\"", FALSE, "", 0, TRUE, 0);
+}
+
+
+#define TEST_NumericListInt(data, index, expected_range, expected_from, expected_to, expected_result, expected_error_code) \
+{                                                                                       \
+    scpi_bool_t result;                                                                 \
+    scpi_expr_result_t result2;                                                         \
+    int16_t errCode;                                                                    \
+    scpi_parameter_t param;                                                             \
+    int32_t val_from, val_to;                                                           \
+    scpi_bool_t val_range;                                                              \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_Parameter(&scpi_context, &param, TRUE);                               \
+    result2 = SCPI_ExprNumericListEntryInt(&scpi_context, &param, index, &val_range, &val_from, &val_to);\
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result2, expected_result);                                          \
+    if (expected_result == SCPI_EXPR_OK) {                                              \
+        CU_ASSERT_EQUAL(val_range, expected_range);                                     \
+        CU_ASSERT_EQUAL(val_from, expected_from);                                       \
+        if (expected_range) {                                                           \
+            CU_ASSERT_EQUAL(val_to, expected_to);                                       \
+        }                                                                               \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+#define TEST_NumericListDouble(data, index, expected_range, expected_from, expected_to, expected_result, expected_error_code) \
+{                                                                                       \
+    scpi_bool_t result;                                                                 \
+    scpi_expr_result_t result2;                                                         \
+    int16_t errCode;                                                                    \
+    scpi_parameter_t param;                                                             \
+    double val_from, val_to;                                                            \
+    scpi_bool_t val_range;                                                              \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_Parameter(&scpi_context, &param, TRUE);                               \
+    result2 = SCPI_ExprNumericListEntryDouble(&scpi_context, &param, index, &val_range, &val_from, &val_to);\
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result2, expected_result);                                          \
+    if (expected_result == SCPI_EXPR_OK) {                                              \
+        CU_ASSERT_EQUAL(val_range, expected_range);                                     \
+        CU_ASSERT_DOUBLE_EQUAL(val_from, expected_from, 0.0001);                        \
+        if (expected_range) {                                                           \
+            CU_ASSERT_DOUBLE_EQUAL(val_to, expected_to, 0.0001);                        \
+        }                                                                               \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testNumericList(void) {
+    TEST_NumericListInt("(1:2,5:6)", 0, TRUE, 1, 2, SCPI_EXPR_OK, 0);
+    TEST_NumericListInt("(1:2,5:6)", 1, TRUE, 5, 6, SCPI_EXPR_OK, 0);
+    TEST_NumericListInt("(1:2,5:6)", 2, FALSE, 0, 0, SCPI_EXPR_NO_MORE, 0);
+
+    TEST_NumericListInt("(12,5:6)", 0, FALSE, 12, 0, SCPI_EXPR_OK, 0);
+    TEST_NumericListInt("(12,5:6)", 1, TRUE, 5, 6, SCPI_EXPR_OK, 0);
+    TEST_NumericListInt("(12,5:6)", 2, FALSE, 0, 0, SCPI_EXPR_NO_MORE, 0);
+
+    TEST_NumericListInt("(12,5:6:3)", 0, FALSE, 12, 0, SCPI_EXPR_OK, 0);
+    TEST_NumericListInt("(12,5:6:3)", 1, TRUE, 5, 6, SCPI_EXPR_OK, 0);
+    TEST_NumericListInt("(12,5:6:3)", 2, FALSE, 0, 0, SCPI_EXPR_ERROR, SCPI_ERROR_EXPRESSION_PARSING_ERROR);
+
+    TEST_NumericListDouble("(1:2,5:6)", 0, TRUE, 1, 2, SCPI_EXPR_OK, 0);
+    TEST_NumericListDouble("(1:2,5:6)", 1, TRUE, 5, 6, SCPI_EXPR_OK, 0);
+    TEST_NumericListDouble("(1:2,5:6)", 2, FALSE, 0, 0, SCPI_EXPR_NO_MORE, 0);
+
+    TEST_NumericListDouble("(12,5:6)", 0, FALSE, 12, 0, SCPI_EXPR_OK, 0);
+    TEST_NumericListDouble("(12,5:6)", 1, TRUE, 5, 6, SCPI_EXPR_OK, 0);
+    TEST_NumericListDouble("(12,5:6)", 2, FALSE, 0, 0, SCPI_EXPR_NO_MORE, 0);
+
+    TEST_NumericListDouble("(12,5:6:3)", 0, FALSE, 12, 0, SCPI_EXPR_OK, 0);
+    TEST_NumericListDouble("(12,5:6:3)", 1, TRUE, 5, 6, SCPI_EXPR_OK, 0);
+    TEST_NumericListDouble("(12,5:6:3)", 2, FALSE, 0, 0, SCPI_EXPR_ERROR, SCPI_ERROR_EXPRESSION_PARSING_ERROR);
+}
+
+#define NOPAREN(...) __VA_ARGS__
+
+#define TEST_ChannelList(data, index, val_len, expected_range, expected_dimensions, _expected_from, _expected_to, expected_result, expected_error_code) \
+{                                                                                       \
+    scpi_bool_t result;                                                                 \
+    scpi_expr_result_t result2;                                                         \
+    int16_t errCode;                                                                    \
+    scpi_parameter_t param;                                                             \
+    int32_t val_from[val_len], val_to[val_len];                                         \
+    scpi_bool_t val_range;                                                              \
+    int32_t expected_from[] = {NOPAREN _expected_from};                                 \
+    int32_t expected_to[] = {NOPAREN _expected_to};                                     \
+    size_t val_dimensions;                                                              \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_Parameter(&scpi_context, &param, TRUE);                               \
+    result2 = SCPI_ExprChannelListEntry(&scpi_context, &param, index, &val_range, val_from, val_to, val_len, &val_dimensions);\
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result2, expected_result);                                          \
+    if (expected_result == SCPI_EXPR_OK) {                                              \
+        CU_ASSERT_EQUAL(val_dimensions, expected_dimensions);                           \
+        CU_ASSERT_EQUAL(val_range, expected_range);                                     \
+        { size_t i; for(i = 0; (i < val_len) && (i < val_dimensions); i++) {            \
+            CU_ASSERT_EQUAL(val_from[i], expected_from[i]);                             \
+        }}                                                                              \
+        if (expected_range) {                                                           \
+            { size_t i; for(i = 0; (i < val_len) && (i < val_dimensions); i++) {        \
+                CU_ASSERT_EQUAL(val_to[i], expected_to[i]);                             \
+            }}                                                                          \
+        }                                                                               \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testChannelList(void) {
+    TEST_ChannelList("(1)", 0, 1, FALSE, 0, (0), (0), SCPI_EXPR_ERROR, SCPI_ERROR_EXPRESSION_PARSING_ERROR);
+
+    TEST_ChannelList("(@1)", 0, 1, FALSE, 1, (1), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1)", 1, 1, FALSE, 0, (0), (0), SCPI_EXPR_NO_MORE, 0);
+
+    TEST_ChannelList("(@1,2)", 0, 1, FALSE, 1, (1), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2)", 1, 1, FALSE, 1, (2), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2)", 2, 1, FALSE, 0, (0), (0), SCPI_EXPR_NO_MORE, 0);
+
+    TEST_ChannelList("(@1,2:3)", 0, 1, FALSE, 1, (1), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2:3)", 1, 1, TRUE, 1, (2), (3), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2:3)", 2, 1, FALSE, 0, (0), (0), SCPI_EXPR_NO_MORE, 0);
+
+    TEST_ChannelList("(@1,2!5:3!6)", 0, 2, FALSE, 1, (1), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2!5:3!6)", 1, 2, TRUE, 2, (2, 5), (3, 6), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2!5:3!6)", 2, 2, FALSE, 0, (0), (0), SCPI_EXPR_NO_MORE, 0);
+
+    TEST_ChannelList("(@1,2!5:3!6)", 0, 1, FALSE, 1, (1), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2!5:3!6)", 1, 1, TRUE, 2, (2), (3), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2!5:3!6)", 2, 1, FALSE, 0, (0), (0), SCPI_EXPR_NO_MORE, 0);
+
+    TEST_ChannelList("(@1,2!5:3!6!7)", 0, 2, FALSE, 1, (1), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1,2!5:3!6!7)", 1, 2, FALSE, 0, (0), (0), SCPI_EXPR_ERROR, SCPI_ERROR_EXPRESSION_PARSING_ERROR);
+    TEST_ChannelList("(@1,2!5:3!6!7)", 2, 2, FALSE, 0, (0), (0), SCPI_EXPR_ERROR, SCPI_ERROR_EXPRESSION_PARSING_ERROR);
+
+    TEST_ChannelList("(@1, 2)", 0, 1, FALSE, 1, (1), (0), SCPI_EXPR_OK, 0);
+    TEST_ChannelList("(@1, 2)", 1, 1, FALSE, 0, (0), (0), SCPI_EXPR_ERROR, SCPI_ERROR_EXPRESSION_PARSING_ERROR);
+}
+
+
+#define TEST_ParamNumber(data, mandatory, expected_special, expected_tag, expected_value, expected_unit, expected_base, expected_result, expected_error_code) \
+{                                                                                       \
+    scpi_number_t value;                                                                \
+    scpi_bool_t result;                                                                 \
+    int16_t errCode;                                                                    \
+                                                                                        \
+    SCPI_CoreCls(&scpi_context);                                                        \
+    scpi_context.input_count = 0;                                                       \
+    scpi_context.param_list.lex_state.buffer = data;                                    \
+    scpi_context.param_list.lex_state.len = strlen(scpi_context.param_list.lex_state.buffer);\
+    scpi_context.param_list.lex_state.pos = scpi_context.param_list.lex_state.buffer;   \
+    result = SCPI_ParamNumber(&scpi_context, scpi_special_numbers_def, &value, mandatory);\
+                                                                                        \
+    errCode = SCPI_ErrorPop(&scpi_context);                                             \
+    CU_ASSERT_EQUAL(result, expected_result);                                           \
+    if (expected_result) {                                                              \
+        CU_ASSERT_EQUAL(value.special, expected_special);                               \
+        if (value.special) CU_ASSERT_EQUAL(value.tag, expected_tag);                    \
+        if (!value.special) CU_ASSERT_DOUBLE_EQUAL(value.value, expected_value, 0.000001);\
+        CU_ASSERT_EQUAL(value.unit, expected_unit);                                     \
+        CU_ASSERT_EQUAL(value.base, expected_base);                                     \
+    }                                                                                   \
+    CU_ASSERT_EQUAL(errCode, expected_error_code);                                      \
+}
+
+static void testParamNumber(void) {
+    TEST_ParamNumber("1", TRUE, FALSE, SCPI_NUM_NUMBER, 1, SCPI_UNIT_NONE, 10, TRUE, 0);
+    TEST_ParamNumber("#Q20", TRUE, FALSE, SCPI_NUM_NUMBER, 16, SCPI_UNIT_NONE, 8, TRUE, 0);
+    TEST_ParamNumber("#H20", TRUE, FALSE, SCPI_NUM_NUMBER, 32, SCPI_UNIT_NONE, 16, TRUE, 0);
+    TEST_ParamNumber("#B11", TRUE, FALSE, SCPI_NUM_NUMBER, 3, SCPI_UNIT_NONE, 2, TRUE, 0);
+    TEST_ParamNumber("1.2", TRUE, FALSE, SCPI_NUM_NUMBER, 1.2, SCPI_UNIT_NONE, 10, TRUE, 0);
+    TEST_ParamNumber("1.2e-1", TRUE, FALSE, SCPI_NUM_NUMBER, 0.12, SCPI_UNIT_NONE, 10, TRUE, 0);
+    TEST_ParamNumber("1.2e-1V", TRUE, FALSE, SCPI_NUM_NUMBER, 0.12, SCPI_UNIT_VOLT, 10, TRUE, 0);
+    TEST_ParamNumber("1.2mV", TRUE, FALSE, SCPI_NUM_NUMBER, 0.0012, SCPI_UNIT_VOLT, 10, TRUE, 0);
+    TEST_ParamNumber("100 OHM", TRUE, FALSE, SCPI_NUM_NUMBER, 100, SCPI_UNIT_OHM, 10, TRUE, 0);
+    TEST_ParamNumber("min", TRUE, TRUE, SCPI_NUM_MIN, 0, SCPI_UNIT_NONE, 10, TRUE, 0);
+    TEST_ParamNumber("infinity", TRUE, TRUE, SCPI_NUM_INF, 0, SCPI_UNIT_NONE, 10, TRUE, 0);
+    TEST_ParamNumber("minc", TRUE, TRUE, SCPI_NUM_NUMBER, 0, SCPI_UNIT_NONE, 10, FALSE, SCPI_ERROR_ILLEGAL_PARAMETER_VALUE);
+}
+
+#define TEST_Result(func, value, expected_result) \
+{\
+    output_buffer_clear();\
+    scpi_context.output_count = 0;\
+    size_t expected_len = strlen(expected_result);\
+    size_t len = SCPI_Result##func(&scpi_context, (value));\
+    CU_ASSERT_EQUAL(len, expected_len);\
+    CU_ASSERT_EQUAL(output_buffer_pos, expected_len);\
+    CU_ASSERT_EQUAL(memcmp(output_buffer, expected_result, expected_len), 0);\
+}
+
+#define TEST_ResultBase(func, value, base, expected_result) \
+{\
+    output_buffer_clear();\
+    scpi_context.output_count = 0;\
+    size_t expected_len = strlen(expected_result);\
+    size_t len = SCPI_Result##func##Base(&scpi_context, (value), (base));\
+    CU_ASSERT_EQUAL(len, expected_len);\
+    CU_ASSERT_EQUAL(output_buffer_pos, expected_len);\
+    CU_ASSERT_EQUAL(memcmp(output_buffer, expected_result, expected_len), 0);\
+}
+
+static void testResultInt8(void) {
+    TEST_Result(Int8, 10, "10");
+    TEST_Result(Int8, -10, "-10");
+    TEST_Result(Int8, 100, "100");
+    TEST_Result(Int8, -100, "-100");
+    TEST_Result(Int8, 256, "0");
+    TEST_Result(Int8, 1111, "87");
+    TEST_Result(Int8, 127, "127");
+    TEST_Result(Int8, -128, "-128");
+}
+
+static void testResultUInt8(void) {
+    TEST_Result(UInt8, 10, "10");
+    TEST_Result(UInt8, -10, "246");
+    TEST_Result(UInt8, 100, "100");
+    TEST_Result(UInt8, -100, "156");
+    TEST_Result(UInt8, 256, "0");
+    TEST_Result(UInt8, 1111, "87");
+    TEST_Result(UInt8, 127, "127");
+    TEST_Result(UInt8, -128, "128");
+    TEST_Result(UInt8, 0, "0");
+    TEST_Result(UInt8, 255, "255");
+
+    TEST_ResultBase(UInt8, 0xff, 16, "#HFF");
+    TEST_ResultBase(UInt8, 0xff, 8, "#Q377");
+    TEST_ResultBase(UInt8, 0xff, 2, "#B11111111");
+}
+
+static void testResultInt16(void) {
+    TEST_Result(Int16, 10, "10");
+    TEST_Result(Int16, -10, "-10");
+    TEST_Result(Int16, 100, "100");
+    TEST_Result(Int16, -100, "-100");
+    TEST_Result(Int16, 256, "256");
+    TEST_Result(Int16, 1111, "1111");
+    TEST_Result(Int16, 127, "127");
+    TEST_Result(Int16, -128, "-128");
+    TEST_Result(Int16, 111111, "-19961");
+    TEST_Result(Int16, 32767, "32767");
+    TEST_Result(Int16, -32768, "-32768");
+}
+
+static void testResultUInt16(void) {
+    TEST_Result(UInt16, 10, "10");
+    TEST_Result(UInt16, -10, "65526");
+    TEST_Result(UInt16, 100, "100");
+    TEST_Result(UInt16, -100, "65436");
+    TEST_Result(UInt16, 256, "256");
+    TEST_Result(UInt16, 1111, "1111");
+    TEST_Result(UInt16, 127, "127");
+    TEST_Result(UInt16, -128, "65408");
+    TEST_Result(UInt16, 111111, "45575");
+    TEST_Result(UInt16, 32767, "32767");
+    TEST_Result(UInt16, -32768, "32768");
+    TEST_Result(UInt16, 65535, "65535");
+
+    TEST_ResultBase(UInt16, 0xffff, 16, "#HFFFF");
+    TEST_ResultBase(UInt16, 0xffff, 8, "#Q177777");
+    TEST_ResultBase(UInt16, 0xffff, 2, "#B1111111111111111");
+}
+
+static void testResultInt32(void) {
+    TEST_Result(Int32, 10, "10");
+    TEST_Result(Int32, -10, "-10");
+    TEST_Result(Int32, 2147483647L, "2147483647");
+    //TEST_Result(Int32, -2147483648L, "-2147483648"); // bug in GCC
+    TEST_Result(Int32, -2147483647L, "-2147483647");
+}
+
+static void testResultUInt32(void) {
+    TEST_Result(UInt32, 10, "10");
+    TEST_Result(UInt32, -10, "4294967286");
+    TEST_Result(UInt32, 2147483647L, "2147483647");
+    //TEST_Result(UInt32, -2147483648L, "2147483648"); // bug in GCC
+    TEST_Result(UInt32, -2147483647L, "2147483649");
+    TEST_Result(UInt32, 4294967295UL, "4294967295");
+
+    TEST_ResultBase(UInt32, 0xffffffff, 16, "#HFFFFFFFF");
+    TEST_ResultBase(UInt32, 0xffffffff, 8, "#Q37777777777");
+    TEST_ResultBase(UInt32, 0xffffffff, 2, "#B11111111111111111111111111111111");
+}
+
+static void testResultInt64(void) {
+    TEST_Result(Int64, 10, "10");
+    TEST_Result(Int64, -10, "-10");
+    TEST_Result(Int64, 127, "127");
+    TEST_Result(Int64, -128, "-128");
+    TEST_Result(Int64, 32767, "32767");
+    TEST_Result(Int64, -32768, "-32768");
+    TEST_Result(Int64, 2147483647L, "2147483647");
+    //TEST_Result(Int64, -2147483648, "-2147483648"); // bug in gcc
+    TEST_Result(Int64, -2147483647L, "-2147483647");
+    TEST_Result(Int64, 9223372036854775807LL, "9223372036854775807");
+    //TEST_Result(Int64, -9223372036854775808LL, "-9223372036854775808"); bug in GCC
+    TEST_Result(Int64, -9223372036854775807LL, "-9223372036854775807");
+}
+
+static void testResultUInt64(void) {
+    TEST_Result(UInt64, 10, "10");
+    TEST_Result(UInt64, -10, "18446744073709551606");
+    TEST_Result(UInt64, 127, "127");
+    TEST_Result(UInt64, -128, "18446744073709551488");
+    TEST_Result(UInt64, 32767, "32767");
+    TEST_Result(UInt64, -32768, "18446744073709518848");
+    TEST_Result(UInt64, 2147483647L, "2147483647");
+    //TEST_Result(UInt64, -2147483648L, "18446744071562067968"); // bug in GCC
+    TEST_Result(UInt64, -2147483647L, "18446744071562067969");
+    TEST_Result(UInt64, 9223372036854775807LL, "9223372036854775807");
+    //TEST_Result(Int64, -9223372036854775808LL, "9223372036854775808"); bug in GCC
+    TEST_Result(UInt64, -9223372036854775807LL, "9223372036854775809");
+    TEST_Result(UInt64, 18446744073709551615ULL, "18446744073709551615");
+
+    TEST_ResultBase(UInt64, 0xffffffffffffffffULL, 16, "#HFFFFFFFFFFFFFFFF");
+    TEST_ResultBase(UInt64, 0xffffffffffffffffULL, 8, "#Q1777777777777777777777");
+    TEST_ResultBase(UInt64, 0xffffffffffffffffULL, 2, "#B1111111111111111111111111111111111111111111111111111111111111111");
+}
+
+static void testResultFloat(void) {
+    TEST_Result(Float, 10, "10");
+    TEST_Result(Float, -10, "-10");
+    TEST_Result(Float, 127, "127");
+    TEST_Result(Float, -128, "-128");
+    TEST_Result(Float, 32767, "32767");
+    TEST_Result(Float, -32768, "-32768");
+    TEST_Result(Float, 2147483647L, "2.14748e+09");
+    //TEST_Result(Float, -2147483648, "-2.14748e+09"); // bug in GCC
+    TEST_Result(Float, -2147483647L, "-2.14748e+09");
+    TEST_Result(Float, 9223372036854775807LL, "9.22337e+18");
+    TEST_Result(Float, -9223372036854775807LL, "-9.22337e+18");
+
+    TEST_Result(Float, 1.256e-17, "1.256e-17");
+    TEST_Result(Float, -1.256e-17, "-1.256e-17");
+}
+
+static void testResultDouble(void) {
+    TEST_Result(Double, 10, "10");
+    TEST_Result(Double, -10, "-10");
+    TEST_Result(Double, 127, "127");
+    TEST_Result(Double, -128, "-128");
+    TEST_Result(Double, 32767, "32767");
+    TEST_Result(Double, -32768, "-32768");
+    TEST_Result(Double, 2147483647, "2147483647");
+    //TEST_Result(Double, -2147483648, "-2147483648"); // bug in GCC
+    TEST_Result(Double, -2147483647, "-2147483647");
+    TEST_Result(Double, 9223372036854775807LL, "9.22337203685478e+18");
+    TEST_Result(Double, -9223372036854775807LL, "-9.22337203685478e+18");
+
+    TEST_Result(Double, 1.256e-17, "1.256e-17");
+    TEST_Result(Double, -1.256e-17, "-1.256e-17");
+}
+
+static void testResultBool(void) {
+    TEST_Result(Bool, TRUE, "1");
+    TEST_Result(Bool, FALSE, "0");
+    TEST_Result(Bool, 1000, "1");
+}
+
+static void testResultMnemonic(void) {
+    TEST_Result(Mnemonic, "a", "a");
+    TEST_Result(Mnemonic, "abcd", "abcd");
+    TEST_Result(Mnemonic, "abcd123", "abcd123");
+}
+
+static void testResultText(void) {
+    TEST_Result(Text, "a", "\"a\"");
+    TEST_Result(Text, "abcd", "\"abcd\"");
+    TEST_Result(Text, "abcd123", "\"abcd123\"");
+    TEST_Result(Text, "abcd\"123", "\"abcd\"\"123\"");
+    TEST_Result(Text, "abcd\"", "\"abcd\"\"\"");
+}
+
+static void testResultArbitraryBlock(void) {
+#define SCPI_ResultArbitraryBlockString(c, s) SCPI_ResultArbitraryBlock((c), (s), strlen(s))
+
+    TEST_Result(ArbitraryBlockString, "a", "#11a");
+    TEST_Result(ArbitraryBlockString, "a\"", "#12a\"");
+    TEST_Result(ArbitraryBlockString, "a\r\n", "#13a\r\n");
+    TEST_Result(ArbitraryBlockString, "X1234567890", "#211X1234567890");
+    TEST_Result(ArbitraryBlockString, "X1234567890\x80x", "#213X1234567890\x80x");
+}
+
 int main() {
+    unsigned int result;
     CU_pSuite pSuite = NULL;
 
     /* Initialize the CUnit test registry */
@@ -422,12 +1067,34 @@
     }
 
     /* Add the tests to the suite */
-    if ((NULL == CU_add_test(pSuite, "SCPI_ParamInt", testSCPI_ParamInt))
+    if ((NULL == CU_add_test(pSuite, "SCPI_ParamInt32", testSCPI_ParamInt32))
+            || (NULL == CU_add_test(pSuite, "SCPI_ParamUInt32", testSCPI_ParamUInt32))
+            || (NULL == CU_add_test(pSuite, "SCPI_ParamInt64", testSCPI_ParamInt64))
+            || (NULL == CU_add_test(pSuite, "SCPI_ParamUInt64", testSCPI_ParamUInt64))
+            || (NULL == CU_add_test(pSuite, "SCPI_ParamFloat", testSCPI_ParamFloat))
             || (NULL == CU_add_test(pSuite, "SCPI_ParamDouble", testSCPI_ParamDouble))
             || (NULL == CU_add_test(pSuite, "SCPI_ParamCharacters", testSCPI_ParamCharacters))
-	    || (NULL == CU_add_test(pSuite, "Commands handling", testCommandsHandling))
-	    || (NULL == CU_add_test(pSuite, "Error handling", testErrorHandling))
-	    || (NULL == CU_add_test(pSuite, "IEEE 488.2 Mandatory commands", testIEEE4882))
+            || (NULL == CU_add_test(pSuite, "SCPI_ParamCopyText", testSCPI_ParamCopyText))
+            || (NULL == CU_add_test(pSuite, "Commands handling", testCommandsHandling))
+            || (NULL == CU_add_test(pSuite, "Error handling", testErrorHandling))
+            || (NULL == CU_add_test(pSuite, "IEEE 488.2 Mandatory commands", testIEEE4882))
+            || (NULL == CU_add_test(pSuite, "Numeric list", testNumericList))
+            || (NULL == CU_add_test(pSuite, "Channel list", testChannelList))
+            || (NULL == CU_add_test(pSuite, "SCPI_ParamNumber", testParamNumber))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultInt8", testResultInt8))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultUInt8", testResultUInt8))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultInt16", testResultInt16))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultUInt16", testResultUInt16))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultInt32", testResultInt32))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultUInt32", testResultUInt32))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultInt64", testResultInt64))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultUInt64", testResultUInt64))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultFloat", testResultFloat))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultDouble", testResultDouble))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultBool", testResultBool))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultMnemonic", testResultMnemonic))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultText", testResultText))
+            || (NULL == CU_add_test(pSuite, "SCPI_ResultArbitraryBlock", testResultArbitraryBlock))
             ) {
         CU_cleanup_registry();
         return CU_get_error();
@@ -436,7 +1103,8 @@
     /* Run all tests using the CUnit Basic interface */
     CU_basic_set_mode(CU_BRM_VERBOSE);
     CU_basic_run_tests();
+    result = CU_get_number_of_tests_failed();
     CU_cleanup_registry();
-    return CU_get_error();
+    return result ? result : CU_get_error();
 }
 

--
Gitblit v1.9.1