diff options
| author | Kathy Gray | 2015-12-17 16:48:54 +0000 |
|---|---|---|
| committer | Kathy Gray | 2015-12-17 16:48:54 +0000 |
| commit | f7a642bd3f8a5436873d0163114a30dad23ba9c2 (patch) | |
| tree | 64a4fda4cd0ddd6e8af9521aaeda9cadf8919828 /mips/mips.sail | |
| parent | 0b940fb7c599e2e47cc21a2708d4cae13cb1d934 (diff) | |
Remove external functions that the library provides, having added them to the type environment finally.
(Also small cleaning of the new makefile)
Diffstat (limited to 'mips/mips.sail')
| -rw-r--r-- | mips/mips.sail | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mips/mips.sail b/mips/mips.sail index 4f468354..16a607a9 100644 --- a/mips/mips.sail +++ b/mips/mips.sail @@ -1,10 +1,10 @@ (* bit vectors have indices decreasing from left i.e. msb is highest index *) default Order dec -(* external functions *) +(*(* external functions *) val extern forall Nat 'm, Nat 'n. (implicit<'m>,bit['n]) -> bit['m] effect pure EXTS (* Sign extend *) val extern forall Nat 'n, Nat 'm. (implicit<'m>,bit['n]) -> bit['m] effect pure EXTZ (* Zero extend *) - +*) register (bit[64]) PC (* CP0 Registers *) |