vm: allow vm description to be callable as function.

* lib.c (generic_funall): Handle vm-desc objects via
vm_execute_toplevel.

* vm.h (vm_desc_s, vm_closure_s): Declared.

1 files changed, 2 insertions, 0 deletions

diff --git a/vm.h b/vm.h
index 1a8a1c8e..da2fab08 100644
--- a/vm.h
+++ b/vm.h
@@ -25,6 +25,8 @@
  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  */
 
+extern val vm_desc_s, vm_closure_s;
+
 val vm_make_desc(val nlevels, val nregs, val bytecode,
                  val datavec, val funvec);
 val vm_execute_toplevel(val desc);