diff options
Diffstat (limited to 'tests/test/cpp/util.scm')
-rw-r--r-- | tests/test/cpp/util.scm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/test/cpp/util.scm b/tests/test/cpp/util.scm new file mode 100644 index 00000000..8329294a --- /dev/null +++ b/tests/test/cpp/util.scm @@ -0,0 +1,14 @@ +(define-module (test cpp util) + :use-module (srfi srfi-64) + :use-module (srfi srfi-88) + :use-module (c cpp-util) + :use-module ((c lex2) :select (lex lexeme))) + +(test-group "Merge string literals" + (test-equal "To simple strings" + (list (lexeme type: 'preprocessing-token + body: '(string-literal (encoding-prefix) "Hello" "World"))) + (merge-string-literals (lex "\"Hello\"\"World\""))) + + ;; TODO tests with prefixes + ) |