diff options
Diffstat (limited to 'testsuite/compilable/pointer_cast.elna')
| -rw-r--r-- | testsuite/compilable/pointer_cast.elna | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/testsuite/compilable/pointer_cast.elna b/testsuite/compilable/pointer_cast.elna index 2b986c0..08f9fe7 100644 --- a/testsuite/compilable/pointer_cast.elna +++ b/testsuite/compilable/pointer_cast.elna @@ -1,9 +1,9 @@ program() var - c: ^Char := nil - p: Pointer := nil + c: ^Char + b: ^Word8 begin - p := c; - c := p + b := cast(c: ^Word8); + c := cast(b: ^Char) end. |