~ chicken-core (chicken-5) cb9b4ab41067063af1d49be4f23801246c0acffb
commit cb9b4ab41067063af1d49be4f23801246c0acffb
Author: Peter Bex <peter@more-magic.net>
AuthorDate: Sat Aug 22 18:14:14 2015 +0200
Commit: Peter Bex <peter@more-magic.net>
CommitDate: Sat Aug 22 19:37:26 2015 +0200
dropped obsolete stack-modification macros
diff --git a/chicken.h b/chicken.h
index 1399d5ec..33fd4a6d 100644
--- a/chicken.h
+++ b/chicken.h
@@ -1045,11 +1045,9 @@ typedef void (C_ccall *C_proc)(C_word, C_word *) C_noret;
#define C_make_header(type, size) ((C_header)(((type) & C_HEADER_BITS_MASK) | ((size) & C_HEADER_SIZE_MASK)))
#define C_symbol_value(x) (C_block_item(x, 0))
#define C_save(x) (*(--C_temporary_stack) = (C_word)(x))
-#define C_adjust_stack(n) (C_temporary_stack -= (n))
#define C_rescue(x, i) (C_temporary_stack[ i ] = (x))
#define C_restore (*(C_temporary_stack++))
#define C_heaptop ((C_word **)(&C_fromspace_top))
-#define C_pick(n) (C_temporary_stack[ n ])
#define C_drop(n) (C_temporary_stack += (n))
#define C_alloc(n) ((C_word *)C_alloca((n) * sizeof(C_word)))
#if defined (__llvm__) && defined (__GNUC__)
Trap