diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -4,7 +4,7 @@
 Usage
 -----
 
-Cgrep 6.4.19 Usage: cgrep [OPTION] [PATTERN] files...
+Cgrep 6.4.20 Usage: cgrep [OPTION] [PATTERN] files...
 
 cgrep [OPTIONS] [ITEM]
 
diff --git a/cgrep.cabal b/cgrep.cabal
--- a/cgrep.cabal
+++ b/cgrep.cabal
@@ -1,6 +1,6 @@
 Name:                cgrep
 Description:         Cgrep: a context-aware grep for source codes
-Version:             6.4.19
+Version:             6.4.20
 Synopsis:            Command line tool
 Homepage:            http://awgn.github.io/cgrep/
 License:             GPL-2
diff --git a/src/CGrep/Strategy/Cpp/Semantic.hs b/src/CGrep/Strategy/Cpp/Semantic.hs
--- a/src/CGrep/Strategy/Cpp/Semantic.hs
+++ b/src/CGrep/Strategy/Cpp/Semantic.hs
@@ -57,14 +57,14 @@
 
     -- quick Search...
 
-        ps' = map C.pack $ (mapMaybe (\x -> case x of
-                                            TokenCard (Cpp.TokenChar   xs _) -> Just (unquotes $ trim xs)
-                                            TokenCard (Cpp.TokenString xs _) -> Just (unquotes $ trim xs)
-                                            TokenCard t                      -> Just (Cpp.toString t)
-                                            _                                -> Nothing
-                                     ) . concat) patterns'
+        ps' = filter (/= "OR") $ (mapMaybe (\x -> case x of
+                                                    TokenCard (Cpp.TokenChar   xs _) -> Just (unquotes $ trim xs)
+                                                    TokenCard (Cpp.TokenString xs _) -> Just (unquotes $ trim xs)
+                                                    TokenCard t                      -> Just (Cpp.toString t)
+                                                    _                                -> Nothing
+                                            ) . concat) patterns'
 
-        found = quickSearch opt ps' text'
+        found = quickSearch opt (map C.pack ps') text'
 
     -- put banners...
 
diff --git a/src/CGrep/Strategy/Generic/Semantic.hs b/src/CGrep/Strategy/Generic/Semantic.hs
--- a/src/CGrep/Strategy/Generic/Semantic.hs
+++ b/src/CGrep/Strategy/Generic/Semantic.hs
@@ -58,13 +58,13 @@
 
     -- quickSearch ...
 
-        ps' = map C.pack $ (mapMaybe (\x -> case x of
-                                            TokenCard (Generic.TokenLiteral xs _) -> Just (unquotes $ trim xs)
-                                            TokenCard t                           -> Just (tkToString t)
-                                            _                                     -> Nothing
-                                     ) . concat) patterns'
+        ps' = filter (/= "OR") $ (mapMaybe (\x -> case x of
+                                                    TokenCard (Generic.TokenLiteral xs _) -> Just (unquotes $ trim xs)
+                                                    TokenCard t                           -> Just (tkToString t)
+                                                    _                                     -> Nothing
+                                            ) . concat) patterns'
 
-        found = quickSearch opt ps' text'
+        found = quickSearch opt (map C.pack ps') text'
 
     -- put banners...
 
diff --git a/src/Config.hs b/src/Config.hs
--- a/src/Config.hs
+++ b/src/Config.hs
@@ -31,7 +31,7 @@
 cgreprc = "cgreprc"
 
 version :: String
-version = "6.4.18"
+version = "6.4.20"
 
 
 data Config = Config