summaryrefslogtreecommitdiff
path: root/libguile/eval.c
diff options
context:
space:
mode:
authorGary Houston <ghouston@arglist.com>1996-10-12 21:59:40 +0000
committerGary Houston <ghouston@arglist.com>1996-10-12 21:59:40 +0000
commit01f61221f4341a877ac648aaa6c0d9f5bb6a488c (patch)
tree4e8468560a65396ac4339bcf1783b3163852bd25 /libguile/eval.c
parent9518bec3de83ce1e3986fa28ee05373d29d9716f (diff)
downloadguile-01f61221f4341a877ac648aaa6c0d9f5bb6a488c.tar.gz
* error.c, eval.c, load.c, stackchk.c: use scm_error not lgh_error.
* __scm.h (lgh_error): removed, lgh shouldn't be in libguile. * stime.c, stime.h: use SCM_P method.
Diffstat (limited to 'libguile/eval.c')
-rw-r--r--libguile/eval.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/eval.c b/libguile/eval.c
index 1570a4592..531a949ff 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -243,7 +243,7 @@ scm_lookupcar (vloc, genv)
var = SCM_CAR (var);
errout:
/* scm_everr (vloc, genv,...) */
- lgh_error (scm_misc_error_key,
+ scm_error (scm_misc_error_key,
NULL,
SCM_NULLP (env)
? "Unbound variable: %S"
@@ -436,7 +436,7 @@ scm_m_vref (xorig, env)
if (SCM_NIMP(x) && UDSCM_VARIABLEP (SCM_CAR (x)))
{
/* scm_everr (SCM_UNDEFINED, env,..., "global variable reference") */
- lgh_error (scm_misc_error_key,
+ scm_error (scm_misc_error_key,
NULL,
"Bad variable: %S",
scm_listify (SCM_CAR (SCM_CDR (x)), SCM_UNDEFINED),
@@ -1858,7 +1858,7 @@ dispatch:
proc = x;
badfun:
/* scm_everr (x, env,...) */
- lgh_error (scm_misc_error_key,
+ scm_error (scm_misc_error_key,
NULL,
"Wrong type to apply: %S",
scm_listify (proc, SCM_UNDEFINED),