Vasilij Schneidermann 7d5d9e3b87 Fix Cons representation пре 7 година
..
legacy 5395a2c794 directory cleanup пре 8 година
os 567d5c69e4 sdl back in x86; simplify repl/editor spawn funcs пре 8 година
tests 1ad00c42cf fix (let) bugs in compiler; restructured task system; cleaned up OS modules; primitive windowing пре 8 година
README.md 906ac43063 cleanup stage 1 for standalone sledge build пре 8 година
alloc.c d17b52de7c refactored signature/type system; support nested structs; refactor gfx lib to use surface and font structures; various fixes пре 8 година
alloc.h dcd180bc0f first working struct implementation пре 8 година
build_rpi.sh 3a1fa2124e raw tty keyboard device пре 8 година
build_win32.sh 129d568e4d first completely working x86 jit and working win32 compile target пре 8 година
build_x64.sh 02809f1beb build with -Wall without warnings; fix SDL scaling; finalize struct syntax; fix (let) related crash пре 8 година
build_x86.sh 567d5c69e4 sdl back in x86; simplify repl/editor spawn funcs пре 8 година
compiler_arm_hosted.c 70f90f9cde some refactoring; fix amiga file ops and basic amiga keyboard пре 8 година
compiler_m68k.c 7a8db6744d working amiga demo пре 8 година
compiler_new.c 1793a45d17 repl fixed for release пре 8 година
compiler_new.h d17b52de7c refactored signature/type system; support nested structs; refactor gfx lib to use surface and font structures; various fixes пре 8 година
compiler_x64_hosted.c b1fa2aa5be Merge branch 'master' of https://github.com/mntmn/interim пре 8 година
compiler_x86.c 31e9af59d1 fixed x86 instructions; improved wm with clipping and focus follows mouse пре 8 година
jit_arm_raw.c 8d5c8de190 fix arm/rpi2 build пре 8 година
jit_m68k.c fe0907c1f7 fix x64 hosted stack alignment пре 8 година
jit_x64.c d17b52de7c refactored signature/type system; support nested structs; refactor gfx lib to use surface and font structures; various fixes пре 8 година
jit_x86.c 31e9af59d1 fixed x86 instructions; improved wm with clipping and focus follows mouse пре 8 година
minilisp.h dcd180bc0f first working struct implementation пре 8 година
reader.c 02809f1beb build with -Wall without warnings; fix SDL scaling; finalize struct syntax; fix (let) related crash пре 8 година
reader.h 18b31b47a7 move stack; cleanup; new mmu init; performance boost; stable on-screen REPL :3 пре 8 година
sledge.c 093ea1f0d8 Print final newline before exit пре 7 година
stream.c d17b52de7c refactored signature/type system; support nested structs; refactor gfx lib to use surface and font structures; various fixes пре 8 година
stream.h 3601120260 i386 tests пре 8 година
strmap.c 2eef008a16 merge and finalize mac os x fixes пре 8 година
strmap.h 906ac43063 cleanup stage 1 for standalone sledge build пре 8 година
unifont.bin 32524f7b0f fix string writer bug; fix editor exit crash; more compact font file; various fixes пре 8 година
unifont.png 5395a2c794 directory cleanup пре 8 година
utf8.c 906ac43063 cleanup stage 1 for standalone sledge build пре 8 година
utf8.h 906ac43063 cleanup stage 1 for standalone sledge build пре 8 година
writer.c 7d5d9e3b87 Fix Cons representation пре 7 година
writer.h 906ac43063 cleanup stage 1 for standalone sledge build пре 8 година

README.md

mnt sledge

sledge JIT-compiles a minimal subset of LISP to a minimal subset of x64 or armv5 machine code.

dependencies

  • gcc (for building and for x64 JIT. not required for ARM JIT.)
  • optionally SDL or SDL2 for windowed framebuffer.

building (x64)

  1. Build using ./build.sh

building (rpi/ARM)

  1. Build using ./build_rpi.sh

usage

./sledge

sledge> (def my-function (fn a b (* a (+ a b))))

JIT ---------------------
push %rdi
jmp f1_0x7f6a0144ca98
f0_0x7f6a0144ca98:
push %rdi
movq %r12, %rdi
mov (%rdi), %rdi
movq %r13, %rsi
mov (%rsi), %rsi
addq %rsi, %rdi
movq %rdi, %rsi
pop %rdi
movq %r12, %rdi
mov (%rdi), %rdi
imulq %rsi, %rdi
mov $0x406f02, %rax
callq *%rax # alloc_int
ret
f1_0x7f6a0144ca98:
mov $0x7f6a0144ca98, %rax
movq %rax, %rsi
pop %rdi
movq %rax, %rsi
mov $0x7f6a0144c750, %rdi
mov $0x401b21, %rax
callq *%rax # insert_global_symbol
ret
-------------------------

sledge> (my-function 35 36)

JIT ---------------------
mov $0x7f6a0144cb28, %r12
mov $0x7f6a0144cb58, %r13
mov $0x7f6a16a8b003, %rax
callq *%rax # lambda
ret
-------------------------

2485