diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-09-02 13:31:04 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-09-07 10:53:02 +0200 |
| commit | 47521ad6d85f9bd6caee39696ce40dff82cfa50d (patch) | |
| tree | cf5813033a440c6ac374948894d5dd70e0712cdb /testsuite/runnable/procedure_cast.elna | |
| parent | 0fada11e99da430e9a056e46da9f0e110df6c45c (diff) | |
| download | elna-47521ad6d85f9bd6caee39696ce40dff82cfa50d.tar.gz | |
Implement program entry point
Diffstat (limited to 'testsuite/runnable/procedure_cast.elna')
| -rw-r--r-- | testsuite/runnable/procedure_cast.elna | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/testsuite/runnable/procedure_cast.elna b/testsuite/runnable/procedure_cast.elna index ee97a6b..11e0e72 100644 --- a/testsuite/runnable/procedure_cast.elna +++ b/testsuite/runnable/procedure_cast.elna @@ -3,6 +3,7 @@ var cb: proc(x: ^Char) -> Int proc probe_int(x: ^Int) -> Int return 42 +program() begin cb := cast(probe_int: proc(x: ^Char) -> Int); assert(cb(nil) = 42) |