- Fix build

- Fix PORTDOCS/EXAMPLESDIR mismatch
This commit is contained in:
Pietro Cerutti 2009-04-11 20:41:16 +00:00
parent 08f9e8f9c4
commit ff2c14b75e
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=232118
9 changed files with 195 additions and 23 deletions

View File

@ -42,6 +42,8 @@ do-install:
@${GZIP_CMD} ${DOCSDIR}/RobotManual.ps
@${REINPLACE_CMD} -e 's+/usr/bin+${PREFIX}/bin+ ' \
${WRKSRC}/Demos/*.rob
.endif
.ifndef NOPORTDOCS
@${MKDIR} ${EXAMPLESDIR}
${INSTALL_DATA} ${WRKSRC}/Demos/*.rob ${EXAMPLESDIR}
.endif

View File

@ -0,0 +1,56 @@
--- ARK/arkcplot.c.orig 2009-04-11 21:58:56.000000000 +0200
+++ ARK/arkcplot.c 2009-04-11 22:00:06.000000000 +0200
@@ -3472,7 +3472,7 @@
* no point in plotting blanks */
length = MIN( *n, non_z_length(text));
- text[length] = (char) NULL;
+ text[length] = 0;
/* find length of string */
/* XQueryTextExtents(dpy, cur_font->fid, text, length,
&direction, &ascent, &descent, &overall); */
@@ -3519,7 +3519,7 @@
* no point in plotting blanks */
length = MIN( *n, non_z_length(text));
- text[length] = (char) NULL;
+ text[length] = 0;
/* find length of string */
/* XQueryTextExtents(dpy, cur_font->fid, text, length,
&direction, &ascent, &descent, &overall); */
@@ -4376,7 +4376,7 @@
symbol_size symbol_size rlineto\n\
symbol_size neg_symbol_size rlineto\n\
neg_symbol_size neg_symbol_size rlineto\n\
-neg_symbol_size symbol_size rlineto\n\
+neg_symbol_size symbol_size rlineto\n\
stroke\n} bind def\n");
fprintf(fp,
@@ -5431,7 +5431,7 @@
slen = strlen(text);
for (i = 0; i < slen; i++){
if(text[i] == ']'){
- text[i] = (char) NULL;
+ text[i] = 0;
break;
}
}
@@ -5905,7 +5905,7 @@
slen = strlen(text);
for (i = 0; i < slen; i++){
if(text[i] == '}'){
- text[i] = (char) NULL;
+ text[i] = 0;
break;
}
}
@@ -6090,7 +6090,7 @@
char buff[2];
strncpy(buff, ch, 1);
- buff[1] = (char) NULL;
+ buff[1] = 0;
if(cur_font == NULL){
printf("Robot ERROR: NULL font in chchk!!\n");

View File

@ -1,5 +1,5 @@
--- Robot/main.c.orig Tue May 3 17:14:51 2005
+++ Robot/main.c Wed Dec 28 17:02:15 2005
--- Robot/main.c.orig 2005-05-03 17:14:51.000000000 +0200
+++ Robot/main.c 2009-04-11 21:57:57.000000000 +0200
@@ -561,19 +561,19 @@
|| streq(argv[i], "--help") ){
printf("Robot version %-1.2f patch %d\n\n",
@ -33,3 +33,30 @@
fstop_();
}
@@ -2130,7 +2130,7 @@
/* remove trailing blanks */
for (i = 0; i < strlen(instruction); i++){
if(instruction[i] == ' ')
- instruction[i] = (char) NULL;}
+ instruction[i] = 0;}
activate(instruction);
}
@@ -3063,7 +3063,7 @@
strncpy(direc, dir, *n);
- direc[*n] = (char) NULL;
+ direc[*n] = 0;
/* null directory path is assumed to be cd to home */
@@ -3915,7 +3915,7 @@
&& strlen(sys_buffer) > 4)
sys_buffer[strlen(sys_buffer) - strlen(".rob")]
- = (char) NULL;
+ = 0;
/* Only add a .ps if there isn't one there to start with */
if(!taileq(sys_buffer, ".ps")) strcat(sys_buffer, ".ps");

View File

@ -1,6 +1,32 @@
--- Robot/subroutines.f~ Wed May 4 00:14:51 2005
+++ Robot/subroutines.f Wed Jan 17 17:55:55 2007
@@ -760,7 +760,7 @@
--- Robot/subroutines.f.orig 2005-05-03 17:14:51.000000000 +0200
+++ Robot/subroutines.f 2009-04-11 21:54:31.000000000 +0200
@@ -51,13 +51,15 @@
subroutine setchars()
include 'typecom'
include 'charcom'
+ CHARACTER :: tab
+ tab = '\t'
ispace = ichar(' ')
ibang = ichar('!')
ihash = ichar('#')
c itab = ichar(' ')
c some versions of g77 get this wrong so use different coding
- itab = ichar('\t')
+ itab = ichar(tab)
ilb = ichar('(')
irb = ichar(')')
ilab = ichar('<')
@@ -699,7 +701,7 @@
integer npts, ntime
if(npts .le. 2)then
- write(tstring,'(a, i, a)')
+ write(tstring,'(a, i5, a)')
+ '***There are only ',NPTS,' points in the data set***'
call totext(tstring)
call xtext('I will not smooth that few data points')
@@ -760,7 +762,7 @@
if(nharm .lt. 0)then
write(tstring, *)hharm, ' harmonics specified'
call xtext(tstring)

View File

@ -0,0 +1,11 @@
--- Robot/fitter.c.orig 2009-04-11 22:10:28.000000000 +0200
+++ Robot/fitter.c 2009-04-11 22:10:41.000000000 +0200
@@ -486,7 +486,7 @@
getamod_(&i, &length, temp_name);
strncpy(model_name, temp_name, length);
- model_name[length] = (char) NULL;
+ model_name[length] = 0;
add_named_model(model_name);

View File

@ -0,0 +1,29 @@
--- Robot/history.c.orig 2009-04-11 22:11:08.000000000 +0200
+++ Robot/history.c 2009-04-11 22:11:30.000000000 +0200
@@ -248,7 +248,7 @@
if (text[i] == '^') {
index = i;
strncpy(htext1, text + 1, index - 1);
- htext1[index - 1] = (char) NULL;
+ htext1[index - 1] = 0;
break;
}
}
@@ -258,7 +258,7 @@
}
strcpy(htext2, text + index + 1);
if (htext2[strlen(htext2) - 1] == '^') {
- htext2[strlen(htext2) - 1] = (char) NULL;
+ htext2[strlen(htext2) - 1] = 0;
}
/* now try to find it in the previous string */
sprintf(htext3, "%s",
@@ -271,7 +271,7 @@
/* think we found the string */
if (i > 0) {
strncpy(htext4, htext3, i);
- htext4[i] = (char) NULL;
+ htext4[i] = 0;
}
else{
strcpy(htext4, "");

View File

@ -0,0 +1,10 @@
--- Robot/rfitsc.c.orig 2009-04-11 22:08:21.000000000 +0200
+++ Robot/rfitsc.c 2009-04-11 22:09:22.000000000 +0200
@@ -2,6 +2,7 @@
#include <fcntl.h>
#include <sys/file.h>
#include <unistd.h>
+#include <stdlib.h>
#define BLOCK 2880

View File

@ -0,0 +1,11 @@
--- Robot/subroutines3.f.orig 2009-04-11 21:56:19.000000000 +0200
+++ Robot/subroutines3.f 2009-04-11 21:56:43.000000000 +0200
@@ -1608,7 +1608,7 @@
end if
return
C ERROR MESSAGES
-992 write(tstring,'(a, i)')'ERROR: THERE IS TOO MUCH DATA IN UNIT', IFIL
+992 write(tstring,'(a, i5)')'ERROR: THERE IS TOO MUCH DATA IN UNIT', IFIL
call totext(tstring)
write(tstring,*)'A MAXIMUM OF',MSIZ,' POINTS IS ALLOWED'
call totext(tstring)

View File

@ -1,22 +1,22 @@
bin/robot
lib/help/robot.info
%%PORTDOCS%%%%DOCSDIR%%/RobotManual.ps.gz
%%PORTDOCS%%%%EXAMPLESDIR%%/3d_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/anime_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/axes_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/color_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/fit1_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/fit1b_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/fit2_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/fit3_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/font_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/insert_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/japan_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/logplot_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/mix_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/simple_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/sinplot_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/style_demo.rob
%%PORTDOCS%%%%EXAMPLESDIR%%/title_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/3d_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/anime_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/axes_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/color_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/fit1_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/fit1b_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/fit2_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/fit3_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/font_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/insert_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/japan_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/logplot_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/mix_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/simple_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/sinplot_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/style_demo.rob
%%PORTEXAMPLES%%%%EXAMPLESDIR%%/title_demo.rob
%%PORTDOCS%%@dirrm %%DOCSDIR%%
%%PORTDOCS%%@dirrm %%EXAMPLESDIR%%
%%PORTEXAMPLES%%@dirrm %%EXAMPLESDIR%%