From 1ea145d58ec94029d4f6e30a6f854f728154ad8c Mon Sep 17 00:00:00 2001 From: dos-reis Date: Sat, 26 Sep 2009 18:43:36 +0000 Subject: More cleanup --- src/interp/interop.boot | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/interp/interop.boot') diff --git a/src/interp/interop.boot b/src/interp/interop.boot index f54eff7e..42f1db42 100644 --- a/src/interp/interop.boot +++ b/src/interp/interop.boot @@ -268,7 +268,7 @@ orderedDefaults(conform,domform) == ancestors := ancestorsOf(conform,domform) for x in conList repeat for y in ancestors | x = CAAR y repeat acc := [y,:acc] - NREVERSE acc + nreverse acc instantiate domenv == -- following is a patch for a bug in runtime.as -- cgit v1.2.3