added support for macros inside macros
This commit is contained in:
5
include/compat.mcl
Normal file
5
include/compat.mcl
Normal file
@@ -0,0 +1,5 @@
|
||||
macro __compat__
|
||||
macro !8 load8 end
|
||||
macro @8 store8 end
|
||||
|
||||
end
|
||||
@@ -1,27 +0,0 @@
|
||||
|
||||
macro load8 @8 end
|
||||
macro store8 !8 end
|
||||
|
||||
macro load64
|
||||
7 + 0
|
||||
8 shl over !8 + swap 1 - swap
|
||||
8 shl over !8 + swap 1 - swap
|
||||
8 shl over !8 + swap 1 - swap
|
||||
8 shl over !8 + swap 1 - swap
|
||||
8 shl over !8 + swap 1 - swap
|
||||
8 shl over !8 + swap 1 - swap
|
||||
8 shl over !8 + swap 1 - swap
|
||||
8 shl over !8 + swap drop
|
||||
end
|
||||
|
||||
macro store64
|
||||
2dup 255 band @8 shr swap 1 + swap
|
||||
2dup 255 band @8 shr swap 1 + swap
|
||||
2dup 255 band @8 shr swap 1 + swap
|
||||
2dup 255 band @8 shr swap 1 + swap
|
||||
2dup 255 band @8 shr swap 1 + swap
|
||||
2dup 255 band @8 shr swap 1 + swap
|
||||
2dup 255 band @8 shr swap 1 + swap
|
||||
2dup 255 band @8 shr swap 2drop
|
||||
end
|
||||
|
||||
|
||||
@@ -2,4 +2,5 @@ include "linux.mcl"
|
||||
include "io.mcl"
|
||||
include "util.mcl"
|
||||
include "int.mcl"
|
||||
include "fs.mcl"
|
||||
include "fs.mcl"
|
||||
include "compat.mcl"
|
||||
Reference in New Issue
Block a user