From 3e326898dae226b97b4234ae45bf0eb2620176ec Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Wed, 29 May 2013 05:35:32 +0000
Subject: Add DB parameter to middle end functions.

---
 src/interp/slam.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/interp/slam.boot')

diff --git a/src/interp/slam.boot b/src/interp/slam.boot
index d854a76d..7ee0d05d 100644
--- a/src/interp/slam.boot
+++ b/src/interp/slam.boot
@@ -407,7 +407,7 @@ compQuietly fn ==
   $backend: local :=
     $compileDontDefineFunctions => "COMPILE-DEFUN"
     "EVAL-DEFUN"
-  quietlyIfInteractive backendCompile fn
+  quietlyIfInteractive backendCompile(nil,fn)
 
 clearAllSlams x ==
   fn(x,nil) where
-- 
cgit v1.2.3