Wed Jun 24 11:50:54 1998 Klaus Kaempf <kkaempf@progis.de>

* config/obj-vms.c (Create_VMS_Object_File): Force binary file.
This commit is contained in:
Ian Lance Taylor 1998-06-24 15:54:05 +00:00
parent 5d626b5ece
commit 499ecd2f43
2 changed files with 10 additions and 4 deletions

View file

@ -1,3 +1,7 @@
Wed Jun 24 11:50:54 1998 Klaus Kaempf <kkaempf@progis.de>
* config/obj-vms.c (Create_VMS_Object_File): Force binary file.
start-sanitize-am33 start-sanitize-am33
Wed Jun 24 09:38:10 1998 Jeffrey A Law (law@cygnus.com) Wed Jun 24 09:38:10 1998 Jeffrey A Law (law@cygnus.com)

View file

@ -1,5 +1,5 @@
/* vms.c -- Write out a VAX/VMS object file /* vms.c -- Write out a VAX/VMS object file
Copyright (C) 1987, 1988, 1992, 1994, 1995, 1998 Free Software Foundation, Inc. Copyright (C) 1987, 88, 92, 94, 95, 97, 1998 Free Software Foundation, Inc.
This file is part of GAS, the GNU Assembler. This file is part of GAS, the GNU Assembler.
@ -14,8 +14,9 @@ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details. GNU General Public License for more details.
You should have received a copy of the GNU General Public License You should have received a copy of the GNU General Public License
along with GAS; see the file COPYING. If not, write to along with GAS; see the file COPYING. If not, write to the Free
the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
02111-1307, USA. */
/* Written by David L. Kashtan */ /* Written by David L. Kashtan */
/* Modified by Eric Youngdale to write VMS debug records for program /* Modified by Eric Youngdale to write VMS debug records for program
@ -585,7 +586,8 @@ Create_VMS_Object_File ()
VMS_Object_File_FD = creat (out_file_name, 0777, "var"); VMS_Object_File_FD = creat (out_file_name, 0777, "var");
#else /* eunice */ #else /* eunice */
VMS_Object_File_FD = creat (out_file_name, 0, "rfm=var", VMS_Object_File_FD = creat (out_file_name, 0, "rfm=var",
"mbc=16", "deq=64", "fop=tef", "shr=nil"); "ctx=bin", "mbc=16", "deq=64", "fop=tef",
"shr=nil");
#endif /* eunice */ #endif /* eunice */
/* Deal with errors. */ /* Deal with errors. */
if (VMS_Object_File_FD < 0) if (VMS_Object_File_FD < 0)