Index: llvm/trunk/test/tools/llvm-objcopy/strip-all-gnu.test
===================================================================
--- llvm/trunk/test/tools/llvm-objcopy/strip-all-gnu.test
+++ llvm/trunk/test/tools/llvm-objcopy/strip-all-gnu.test
@@ -1,6 +1,9 @@
 # RUN: yaml2obj %s > %t
+# RUN: cp %t %t1
 # RUN: llvm-objcopy --strip-all-gnu %t %t2
 # RUN: llvm-readobj -file-headers -sections %t2 | FileCheck %s
+# RUN: llvm-objcopy -S %t1 %t3
+# RUN: cmp %t2 %t3
 
 !ELF
 FileHeader:
Index: llvm/trunk/tools/llvm-objcopy/ObjcopyOpts.td
===================================================================
--- llvm/trunk/tools/llvm-objcopy/ObjcopyOpts.td
+++ llvm/trunk/tools/llvm-objcopy/ObjcopyOpts.td
@@ -67,6 +67,8 @@
                 HelpText<"Remove non-allocated sections other than .gnu.warning* sections">;
 def strip_all_gnu : Flag<["-", "--"], "strip-all-gnu">,
                     HelpText<"Compaitable with GNU objcopy's --strip-all">;
+def S : Flag<["-"], "S">,
+        Alias<strip_all_gnu>;
 def strip_debug : Flag<["-", "--"], "strip-debug">,
                   HelpText<"Remove all debug information">;
 def strip_dwo : Flag<["-", "--"], "strip-dwo">,