summaryrefslogtreecommitdiff
path: root/MLKFloat.m
diff options
context:
space:
mode:
Diffstat (limited to 'MLKFloat.m')
-rw-r--r--MLKFloat.m2
1 files changed, 1 insertions, 1 deletions
diff --git a/MLKFloat.m b/MLKFloat.m
index 77e824a..898ef2f 100644
--- a/MLKFloat.m
+++ b/MLKFloat.m
@@ -38,7 +38,7 @@
cl = [MLKPackage findPackage:@"COMMON-LISP"];
defaultFormat = [[MLKDynamicContext currentContext]
- valueForBinding:[cl intern:@"*READ-DEFAULT-FLOAT-FORMAT*"]];
+ valueForSymbol:[cl intern:@"*READ-DEFAULT-FLOAT-FORMAT*"]];
// FIXME: Shouldn't the readtable decide which exponent markers do what?
if (exponentMarker == 'd' || exponentMarker == 'D'