mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 12:38:29 +02:00
13 lines
314 B
Plaintext
13 lines
314 B
Plaintext
(module
|
|
(memory (export "memory") 2 3)
|
|
|
|
(func (export "size") (result i32) (memory.size))
|
|
(func (export "load") (param i32) (result i32)
|
|
(i32.load8_s (local.get 0))
|
|
)
|
|
(func (export "store") (param i32 i32)
|
|
(i32.store8 (local.get 0) (local.get 1))
|
|
)
|
|
|
|
(data (i32.const 0x1000) "\01\02\03\04")
|
|
) |