158 lines
2.9 KiB
Plaintext
158 lines
2.9 KiB
Plaintext
$?a ##ERROR: syntax error - '?' prohibited as first character after '$'
|
|
|
|
---
|
|
|
|
$include ##ERROR: syntax error - $include target not specified
|
|
|
|
---
|
|
|
|
$include 10 ##ERROR: syntax error - $include target expected in place of '10'
|
|
|
|
---
|
|
|
|
0x12.34 ##ERROR: syntax error - invalid use of decimal point after radixed number '0x12'
|
|
|
|
---
|
|
|
|
##
|
|
|
|
x := (+ 10 20) "aaaa"; ##ERROR: syntax error - too many rvalues
|
|
|
|
---
|
|
|
|
##
|
|
|
|
x := (10 +); ##ERROR: syntax error - no operand after binary selector
|
|
|
|
|
|
---
|
|
|
|
10 + ##ERROR: syntax error - no operand after binary selector '+'
|
|
|
|
---
|
|
|
|
## you can't have another colon before the method..
|
|
(obj: :method) ##ERROR: syntax error - : disallowed
|
|
|
|
---
|
|
|
|
## while EOL is ignored in explicitly parenthesized XLIST, a semicolon must not be.
|
|
(printf
|
|
"hello, world\n"
|
|
)
|
|
|
|
(printf; ##ERROR: syntax error - unexpected semicolon
|
|
"hello, world\n"
|
|
)
|
|
|
|
---
|
|
|
|
## semicolon inside #{} must raise a syntax error
|
|
|
|
a := #{
|
|
"k1":
|
|
"hello k1\n",
|
|
"k2":
|
|
"hello k2\n"; ##ERROR: syntax error - unexpected semicolon
|
|
};
|
|
|
|
---
|
|
|
|
{
|
|
;;;
|
|
|
|
(do
|
|
(printf "hello\n")
|
|
(printf "hello\n")
|
|
);;
|
|
|
|
k := #[10 ; 20 ]; ##ERROR: syntax error - unexpected semicolon
|
|
|
|
}
|
|
|
|
---
|
|
|
|
## a code point greater than 255 is illegal in the character literal prefix fixed with b.
|
|
|
|
printf "[%c] [#x%x] [%d]\n" '★' '★' #x2605;
|
|
printf "[%c]\n" b'★'; ##ERROR: syntax error - wrong character literal
|
|
|
|
---
|
|
|
|
## #b can be followed by [ or binary digits.
|
|
|
|
printf "%O\n" #b[ 10 20 30 ];
|
|
printf "%010b\n" #b0101;
|
|
printf "%O\n" #bxy; ##ERROR: syntax error - neither valid radixed number nor valid directive '#bxy'
|
|
|
|
---
|
|
|
|
printf :*; ##ERROR: syntax error - prohibited in this context
|
|
|
|
---
|
|
|
|
defun :: fun1() { ##ERROR: syntax error - function name not symbol in defun
|
|
return 10;
|
|
};
|
|
|
|
---
|
|
|
|
defun :* fun1() { ##ERROR: syntax error - function name not symbol in defun
|
|
return 10;
|
|
};
|
|
|
|
---
|
|
|
|
(10 + 20 30) ##ERROR: syntax error - redundant operand '30'
|
|
|
|
---
|
|
|
|
#**a ##ERROR: syntax error - invalid binary selector character 'a' after #**
|
|
|
|
---
|
|
|
|
abc- := 20 ##ERROR: syntax error - '-' prohibited as last character of identifier or identifier segment
|
|
|
|
---
|
|
|
|
self.g- := 20 ##ERROR: syntax error - '-' prohibited as last character of identifier or identifier segment
|
|
|
|
---
|
|
|
|
self.-g := 20 ##ERROR: syntax error - '-' prohibited as first character of identifier or identifier segment
|
|
|
|
---
|
|
|
|
if.abc := 20 ##ERROR: syntax error - wrong multi-segment identifier
|
|
|
|
---
|
|
|
|
abc. := 20 ##ERROR: syntax error - blank segment after 'abc.'
|
|
|
|
---
|
|
|
|
abc.? := 20 ##ERROR: syntax error - '?' prohibited as first character of identifier or identifier segment after 'abc.'
|
|
|
|
|
|
---
|
|
- := 20 ##ERROR: syntax error - bad lvalue - invalid element - -
|
|
|
|
---
|
|
|
|
+++ := 20 ##ERROR: syntax error - bad lvalue - invalid element - +++
|
|
|
|
---
|
|
|
|
1 + + + ##ERROR: syntax error - prohibited binary selector '+'
|
|
|
|
---
|
|
|
|
1 * 2 3 - 4 ##ERROR: syntax error - prohibited binary selector '-'
|
|
|
|
---
|
|
1 * 2 3 4 ##ERROR: syntax error - redundant operand '4'
|
|
|
|
---
|
|
|
|
1 \ 2 ##ERROR: syntax error - stray backslash
|