aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-saturn.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-01-17 18:03:58 +0000
committerdos-reis <gdr@axiomatics.org>2009-01-17 18:03:58 +0000
commitae24ace4c0535a261375e21af707befac3060ad9 (patch)
tree6ea4a32df4fbb9b0c548cf4eb9e112279768ae07 /src/interp/br-saturn.boot
parent7b3a06b249e272857c858c6ab7ab37c8f1e128e1 (diff)
downloadopen-axiom-ae24ace4c0535a261375e21af707befac3060ad9.tar.gz
* interp/br-saturn.boot (htpMakeEmptyPage): Use deprecated GENTEMP
instead of GENSYM. * interp/ht-util.boot (htpName): Likewise. (mkCurryFun): Likewise. (htRadioButtons): Likewise. (htBcRadioButtons): Likewise * interp/br-con.boot (kisValidType): Use $LangSupportTypes.
Diffstat (limited to 'src/interp/br-saturn.boot')
-rw-r--r--src/interp/br-saturn.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot
index 9c49cfad..e439d1ca 100644
--- a/src/interp/br-saturn.boot
+++ b/src/interp/br-saturn.boot
@@ -1,6 +1,6 @@
-- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd.
-- All rights reserved.
--- Copyright (C) 2007-2008, Gabriel Dos Reis.
+-- Copyright (C) 2007-2009, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -605,7 +605,7 @@ htInitPageNoHeading(propList) ==
--------------------> NEW DEFINITION <--------------------------
htpMakeEmptyPage(propList,:options) ==
- name := IFCAR options or GENSYM()
+ name := IFCAR options or GENTEMP()
if not $saturn then
$activePageList := [name, :$activePageList]
setDynamicBinding(name, val := VECTOR(name, nil, nil, nil, nil, nil, propList, nil))