Couple More Questions about Code 1

[jamez05]

I've been converting Fortran code to C++. However, I hit another road block. I'm not sure what the following is doing:

1. Not sure what the last line in the following declaration does:

parameter(maxhead=1000)
integer *4 sl
parameter (sl=10)
character *(sl)psource(maxhead)

2.There is a function named ssenum. Not sure how the following code relates to the function/what its doing:

functn=ssenum('Ro ')
return
functn=ssenum('RC(=O)0 ')
return
functn=ssenum('R{O}C(=O)0 ')
return

 

[xwb]

1)

#define maxhead 1000
#define sl 10
char psource[maxhead][sl]

2) That code wouldn't make much sense in fortran either: not without labels. If it had labels then there is probably a goto/computed goto (switch statement in C) that jumps to it.

 

[jamez05]

I think it may be a switch. Thanks for the insight.