27 lines
945 B
C++
27 lines
945 B
C++
/*
|
|
Copyright (c) 2019 Microsoft Corporation. All rights reserved.
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
|
|
|
Author: Leonardo de Moura
|
|
*/
|
|
#include "library/vm/vm.h"
|
|
namespace lean {
|
|
static vm_obj dummy_binary_op(vm_obj const &, vm_obj const &) {
|
|
throw exception("thunk support has not been implemented in the old VM");
|
|
}
|
|
|
|
static vm_obj dummy_quad_op(vm_obj const &, vm_obj const &, vm_obj const &, vm_obj const &) {
|
|
throw exception("thunk support has not been implemented in the old VM");
|
|
}
|
|
|
|
void initialize_vm_thunk() {
|
|
DECLARE_VM_BUILTIN(name({"thunk", "mk"}), dummy_binary_op);
|
|
DECLARE_VM_BUILTIN(name({"thunk", "get"}), dummy_binary_op);
|
|
DECLARE_VM_BUILTIN(name({"thunk", "pure"}), dummy_binary_op);
|
|
DECLARE_VM_BUILTIN(name({"thunk", "bind"}), dummy_quad_op);
|
|
DECLARE_VM_BUILTIN(name({"thunk", "map"}), dummy_quad_op);
|
|
}
|
|
|
|
void finalize_vm_thunk() {
|
|
}
|
|
}
|