aboutsummaryrefslogtreecommitdiff
path: root/src/interp/functor.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/functor.boot')
-rw-r--r--src/interp/functor.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/functor.boot b/src/interp/functor.boot
index ae7073a2..06eac21d 100644
--- a/src/interp/functor.boot
+++ b/src/interp/functor.boot
@@ -1,6 +1,6 @@
-- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd.
-- All rights reserved.
--- Copyright (C) 2007-2011, Gabriel Dos Reis.
+-- Copyright (C) 2007-2012, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -80,7 +80,7 @@ DomainPrint(D,brief) ==
s:= $WhereList
$WhereList:= nil
for u in s repeat
- TERPRI()
+ finishLine $OutputStream
SAY ['"Where ",first u,'" is:"]
DomainPrint1(rest u,brief,env)
SAY '"-----------------------------------------------------------------------"