Call orc_init() from orc_program_new()

diff --git a/orc/orcprogram.c b/orc/orcprogram.c
index 677418d..4ac62a5 100644 (file)
--- a/orc/orcprogram.c
+++ b/orc/orcprogram.c
@@ -29,6 +29,8 @@ orc_program_new (void)
 {
   OrcProgram *p;
 
+  orc_init ();
+
   p = malloc(sizeof(OrcProgram));
   memset (p, 0, sizeof(OrcProgram));