diff --git a/compiler/htypechk.pas b/compiler/htypechk.pas
index 4ce2a90764..0cb01aeb4e 100644
--- a/compiler/htypechk.pas
+++ b/compiler/htypechk.pas
@@ -1117,7 +1117,7 @@ implementation
                       (hp.resulttype.def.deftype=stringdef) then
                      result:=true
                  else
-                   if valid_const in opts then
+                   if ([valid_const,valid_addr] * opts = [valid_const]) then
                      result:=true
                  else
                   CGMessagePos(hp.fileinfo,errmsg);