summaryrefslogtreecommitdiff
path: root/Build/source/utils/pmx/pmx-2.6.18/PATCH-2.6.18-01
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/utils/pmx/pmx-2.6.18/PATCH-2.6.18-01')
-rw-r--r--Build/source/utils/pmx/pmx-2.6.18/PATCH-2.6.18-0140
1 files changed, 40 insertions, 0 deletions
diff --git a/Build/source/utils/pmx/pmx-2.6.18/PATCH-2.6.18-01 b/Build/source/utils/pmx/pmx-2.6.18/PATCH-2.6.18-01
new file mode 100644
index 00000000000..79b6bf23c46
--- /dev/null
+++ b/Build/source/utils/pmx/pmx-2.6.18/PATCH-2.6.18-01
@@ -0,0 +1,40 @@
+*** pmx2618.for.orig 2012-04-25 13:36:16.590777551 -0400
+--- pmx2618.for 2012-04-25 13:37:15.659777518 -0400
+***************
+*** 753,760 ****
+ read(*,'(a)')jobname
+ numargs = 1
+ else
+! call getarg(1,jobname,idum) ! May need to replace this w/ next line
+! c call getarg(1,jobname)
+ end if
+ 10 ljob = lenstr(jobname,44)
+ if (ljob .gt. 44) then
+--- 753,760 ----
+ read(*,'(a)')jobname
+ numargs = 1
+ else
+! c call getarg(1,jobname,idum) ! May need to replace this w/ next line
+! call getarg(1,jobname)
+ end if
+ 10 ljob = lenstr(jobname,44)
+ if (ljob .gt. 44) then
+***************
+*** 766,773 ****
+ else if (numargs .eq. 2) then
+ if (ljob.eq.2 .and. jobname(1:2).eq.'-o') then
+ optimize = .true.
+! call getarg(2,jobname,idum) ! May need to replace this w/ next line
+! c call getarg(2,jobname)
+ numargs = 1
+ go to 10
+ else
+--- 766,773 ----
+ else if (numargs .eq. 2) then
+ if (ljob.eq.2 .and. jobname(1:2).eq.'-o') then
+ optimize = .true.
+! c call getarg(2,jobname,idum) ! May need to replace this w/ next line
+! call getarg(2,jobname)
+ numargs = 1
+ go to 10
+ else