diff --git a/ChangeLog b/ChangeLog
index 6938bbca5..db5f30348 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2004-09-10  Jouk Jansen  <joukj@hrem.stm.tudelft.nl>
+
+	* vms_make.com: Updated.
+
 2004-09-09  Werner Lemberg  <wl@gnu.org>
 
 	Adding OpenType validation module.  The code is based on the
diff --git a/vms_make.com b/vms_make.com
index 12152ad04..319ad24a2 100644
--- a/vms_make.com
+++ b/vms_make.com
@@ -28,7 +28,7 @@ $ s_case  = false
 $ libdefs = ""
 $ libincs = ""
 $ liblist = ""
-$ ccopt   = ""
+$ ccopt   = "/name=as_is/float=ieee"
 $ lopts   = ""
 $!
 $! Check for MMK/MMS
@@ -529,7 +529,7 @@ $ search c.tmp "symbol:"/out=d.tmp
 $ def/user sys$output nl:
 $ edito/edt/command=sys$input d.tmp
 sub/symbol: "/symbol_vector=(/whole
-sub/"/=procedure)/whole
+sub/"/=PROCEDURE)/whole
 exit
 $ ! all data
 $ search b.tmp "EGSY$V_DEF 1"/wind=(0,1) /out=e.tmp
@@ -537,7 +537,7 @@ $ search e.tmp "symbol:"/out=f.tmp
 $ def/user sys$output nl:
 $ edito/edt/command=sys$input f.tmp
 sub/symbol: "/symbol_vector=(/whole
-sub/"/=data)/whole
+sub/"/=DATA)/whole
 exit
 $ sort/nodupl d.tmp,f.tmp 'p2'
 $ delete a.tmp;*,b.tmp;*,c.tmp;*,d.tmp;*,e.tmp;*,f.tmp;*