mirror of
https://github.com/compiler-explorer/compiler-explorer.git
synced 2025-12-27 09:23:52 -05:00
d1d0883a86
This adds support for the [Sail language](https://github.com/rems-project/sail) - a DSL for defining ISAs. It's not quite ready but I need some help. These are the main remaining issues: 1. When you "link to binary" it does disassemble the binary properly, but the syntax highlighting and line numbers are broken.  2. If you try to execute the code without a `function main() -> unit = ...` then it gives this error in the compiler output: ``` Internal Compiler Explorer error: Error: spawn /tmp/compiler-explorer-compiler2025025-31052-c8gern.pf8t/model.c EACCES at ChildProcess._handle.onexit (node:internal/child_process:285:19) at onErrorNT (node:internal/child_process:483:16) at process.processTicksAndRejections (node:internal/process/task_queues:82:21) Compiler returned: -1 ``` This is weird - it should give a linker with an undefined reference to `zmain`. 3. Sail compiles to C, and then I added extra steps to compile that to binary (if you select `Execute the code`), but as you can see I had to move the binary back over the C file, so in this case `model.c` is actually an ELF file. It works but that seems very weird. There is a `getExecutableFilename()` method I could override, but doing that seems to make it even more confused. 4. I also had to have a fake flag for `binary` because the `filters` don't seem to get set correctly when passed to `runCompiler()`. E.g. `buildExecutable()` doesn't pass them at all. Not sure what is going on there. Seems to work though. Any help appreciated! PS: Sail is a cool language. It has lightweight dependent type for integers and bit vectors, which I haven't demonstrated in the examples yet, but they're neat. --------- Co-authored-by: Matt Godbolt <matt@godbolt.org>
36 lines
913 B
Plaintext
36 lines
913 B
Plaintext
default Order dec
|
|
|
|
$include <prelude.sail>
|
|
$include <vector.sail>
|
|
|
|
// Bitfields are useful for registers. You can take an underlying bitvector
|
|
// and allow naming bits in them.
|
|
|
|
bitfield Status : bits(32) = {
|
|
U : 31,
|
|
// Not all bits need to have a corresponding field, and fields can overlap.
|
|
A : 0,
|
|
lowest_byte : 7 .. 0,
|
|
upper_byte : 31 .. 24,
|
|
}
|
|
|
|
function main() -> unit = {
|
|
// To create a new bitfield, use Mk_<name>.
|
|
var status = Mk_Status(0x00000000);
|
|
|
|
// You can update mutable variables (including `register`s) imperatively:
|
|
status[lowest_byte] = status[upper_byte];
|
|
|
|
// You can access the underlying bitvector via the special field `bits`.
|
|
status.bits = 0x11223344;
|
|
|
|
// You can also do functional-style immutable updates.
|
|
let status = [
|
|
status with
|
|
U = 0b1,
|
|
lowest_byte = 0xFF,
|
|
];
|
|
|
|
print_endline(bits_str(status.bits));
|
|
}
|