[Linux-decnet-commit] CVS: dnprogs/libvaxdata/vms make.com, 1.1, 1.2
Brought to you by:
chrissie_c,
ph3-der-loewe
Menu
▾
▴
[Linux-decnet-commit] CVS: dnprogs/libvaxdata/vms make.com, 1.1, 1.2
|
From: Christine C. <chr...@us...> - 2010-08-19 08:39:11
|
Update of /cvsroot/linux-decnet/dnprogs/libvaxdata/vms In directory sfp-cvsdas-2.v30.ch3.sourceforge.com:/tmp/cvs-serv3392/libvaxdata/vms Modified Files: make.com Log Message: New version of libvaxdata: The new version corrects the conversions for doubles (D, G) and double doubles (H); floats (F) were fine. For reference, the USGS web page for libvaxdata is http://pubs.usgs.gov/of/2005/1424/. Index: make.com =================================================================== RCS file: /cvsroot/linux-decnet/dnprogs/libvaxdata/vms/make.com,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -r1.1 -r1.2 *** make.com 25 Oct 2005 07:32:13 -0000 1.1 --- make.com 19 Aug 2010 08:39:00 -0000 1.2 *************** *** 5,9 **** $! data for OpenVMS using DEC/Compaq/HP VAX C or DEC C (CC). ! $! ! ! $! DCL command syntax: @Make [ all | libvaxdata | clean ] ! $! ! $! ! --- 5,9 ---- $! data for OpenVMS using DEC/Compaq/HP VAX C or DEC C (CC). ! $! ! ! $! DCL command syntax: @Make [ all | libvaxdata | test | clean ] ! $! ! $! ! *************** *** 14,20 **** $! ba...@us... ! $! ! ! $! Citation: Baker, Lawrence M., 2005, libvaxdata: VAX Data Format Conver- ! ! $! sion Routines, US Geological Survey, Open-File Report no. ! ! $! 2005-XXX, nn p. ! $! ! $! ! --- 14,20 ---- $! ba...@us... ! $! ! ! $! Citation: Baker, L.M., 2005, libvaxdata: VAX Data Format Conversion ! ! $! Routines: U.S. Geological Survey Open-File Report 2005- ! ! $! 1424, v1.1 (http://pubs.usgs.gov/of/2005/1424/). ! $! ! $! ! *************** *** 30,44 **** $! Modification History: ! $! ! ! $! 12-Oct-2005 L. M. Baker Original version (from make.libvfbb). ! $! ! $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! $! $ lib_name = "LibVAXData" ! $ args = "||all|libvaxdata|clean|" $ P1 = F$Edit( P1, "TRIM,LOWERCASE" ) $ If ( F$Locate( "|''P1'|", args ) .eq. F$Length( args ) ) $ Then $ Write Sys$Error - ! "DCL command syntax: @Make [ all | libvaxdata | clean ]" $ Goto EXIT $ EndIf --- 30,47 ---- $! Modification History: ! $! ! ! $! 2-Sep-2005 L. M. Baker Original version (from make.libvfbb). ! ! $! 30-Jan-2010 L. M. Baker Add test program. ! $! ! $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! $! $ lib_name = "LibVAXData" ! $ args = "|all|libvaxdata|test|clean|" ! $ $ P1 = F$Edit( P1, "TRIM,LOWERCASE" ) + $ If ( P1 .eqs. "" ) Then $ P1 = "all" $ If ( F$Locate( "|''P1'|", args ) .eq. F$Length( args ) ) $ Then $ Write Sys$Error - ! "DCL command syntax: @Make [ all | libvaxdata | test | clean ]" $ Goto EXIT $ EndIf *************** *** 58,62 **** $ Set Default [.'arch'] $ junk = 'F$Verify( 0 )' ! $ If ( P1 .nes. "" ) Then $ Goto 'P1' $! $ALL: --- 61,65 ---- $ Set Default [.'arch'] $ junk = 'F$Verify( 0 )' ! $ Goto 'P1' $! $ALL: *************** *** 83,87 **** $ If ( arch .eqs. "VAX" ) $ Then ! $ blocks = 18 $ modules = 13 $ Else --- 86,90 ---- $ If ( arch .eqs. "VAX" ) $ Then ! $ blocks = 47 $ modules = 13 $ Else *************** *** 145,148 **** --- 148,163 ---- $ EndIf $! + $ If ( P1 .nes. "all" ) Then $ Goto DONE + $! + $TEST: + $! + $ Set NoOn + $ Set Verify + $ CC /Float=IEEE_Float [--.Src]Test + $ Link Test, 'lib_name'/Library + $ Delete Test.obj;* + $ junk = 'F$Verify( 0 )' + $ Set On + $! $ Goto DONE $! *************** *** 151,155 **** $ Set NoOn $ Set Verify ! $ Delete 'lib_name'.olb;* $ Delete From_VAX_I2.obj;* , From_VAX_I4.obj;* , From_VAX_R4.obj;* , - From_VAX_D8.obj;* , From_VAX_G8.obj;* , From_VAX_H16.obj;* , - --- 166,170 ---- $ Set NoOn $ Set Verify ! $ Delete 'lib_name'.olb;* , Test.exe;* , Test.obj;* $ Delete From_VAX_I2.obj;* , From_VAX_I4.obj;* , From_VAX_R4.obj;* , - From_VAX_D8.obj;* , From_VAX_G8.obj;* , From_VAX_H16.obj;* , - |
