projects
/
h316.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Corrected handling for FORTRAN data blocks 3 and 4: added endblock capability.
[h316.git]
/
pc-tools
/
ldc2
/
src
/
data_block_3.cpp
diff --git
a/pc-tools/ldc2/src/data_block_3.cpp
b/pc-tools/ldc2/src/data_block_3.cpp
index 612fdbd69c897b414fe11ecbe9b6cc68f7c4c35b..4fe735a13a63cf691d91ead56fdf56edd380e1a8 100644
(file)
--- a/
pc-tools/ldc2/src/data_block_3.cpp
+++ b/
pc-tools/ldc2/src/data_block_3.cpp
@@
-2,11
+2,14
@@
*
* LDC2 source code
*
*
* LDC2 source code
*
- * $Date: 2007/0
3/26 01:00:39
$
+ * $Date: 2007/0
5/30 01:33:08
$
* $Author: hachti $
*
* $Log: data_block_3.cpp,v $
* $Author: hachti $
*
* $Log: data_block_3.cpp,v $
- * Revision 2.0 2007/03/26 01:00:39 hachti
+ * Revision 2.1 2007/05/30 01:33:08 hachti
+ * Corrected handling for FORTRAN data blocks 3 and 4: added endblock capability.
+ *
+ * Revision 2.0 2007-03-26 01:00:39 hachti
* *** empty log message ***
*
*
* *** empty log message ***
*
*
@@
-34,6
+37,14
@@
vector<string> data_block_3::get_description(){
return result;
}
return result;
}
+/***************************************************************/
+/*!
+ *\brief Determine if the block marks the end of an object
+ *\return true because this block is an end block.
+ */
+bool data_block_3::is_endblock(){
+ return true;
+}