summaryrefslogtreecommitdiff
path: root/test/ragel.d/atoi1.rl
diff options
context:
space:
mode:
Diffstat (limited to 'test/ragel.d/atoi1.rl')
-rw-r--r--test/ragel.d/atoi1.rl67
1 files changed, 0 insertions, 67 deletions
diff --git a/test/ragel.d/atoi1.rl b/test/ragel.d/atoi1.rl
deleted file mode 100644
index 40217d91..00000000
--- a/test/ragel.d/atoi1.rl
+++ /dev/null
@@ -1,67 +0,0 @@
-/*
- * @LANG: indep
- */
-bool neg;
-int value;
-
-value = 0;
-neg = false;
-%%{
- machine atoi;
-
- action begin {
- neg = false;
- value = 0;
- }
-
- action see_neg {
- neg = true;
- }
-
- action add_digit {
- value = value * 10 + <int>(fc - 48);
- }
-
- action finish {
- if ( neg ) {
- value = -1 * value;
- }
- }
- action print {
- print_int value;
- print_str "\n";
- }
-
- atoi = (
- ('-'@see_neg | '+')? (digit @add_digit)+
- ) >begin %finish;
-
- main := atoi '\n' @print;
-}%%
-
-##### INPUT #####
-"1\n"
-"12\n"
-"222222\n"
-"+2123\n"
-"213 3213\n"
-"-12321\n"
-"--123\n"
-"-99\n"
-" -3000\n"
-##### OUTPUT #####
-1
-ACCEPT
-12
-ACCEPT
-222222
-ACCEPT
-2123
-ACCEPT
-FAIL
--12321
-ACCEPT
-FAIL
--99
-ACCEPT
-FAIL