Function patch_seq_list_fold 

#[unsafe(no_mangle)]
pub unsafe extern "C" fn patch_seq_list_fold(stack: Stack) -> Stack

Fold a list with an accumulator and quotation

Stack effect: ( Variant init Quotation – result )

The quotation should have effect ( acc elem – acc’ ) Starts with init as accumulator, folds left through the list.

Safety

Stack must have Quotation on top, init below, and Variant below that