On of the first things one learn about FORTRAN: you can very easy write stuff to files without getting worried about file creation of filenames.
\nJust write to a random number, the file handle. You can do this everywhere in the code. The output is append to the file. And the file gets automatic cleaned on program start.
\nHere is one example:<\/p>\n
\r\nprogram debug\r\n integer :: x\r\n x = 1\r\n write(1001,*) "This is string", x\r\n write(1001,*) "The End"\r\nend program\r\n<\/pre>\n$ gfortran debug.f90
\n$ .\/a.out
\n$ cat fort.1001
\n This is string 1
\n The End<\/p><\/blockquote>\nAs you can see, the file handle number get prefixed with \"fort.\". This is pretty nice for some nasty debug session, so lets do this with C++!<\/p>\n
The implementation in C++ is surprisingly easy, just a single line of code and we are done:<\/p>\n
\r\n#include <fstream>\r\n\r\ntemplate<int fhdl>\r\ninline std::ofstream& write() {\r\n static std::ofstream ostrm("cpp."+std::to_string(fhdl), std::ios::out);\r\n return ostrm;\r\n}\r\n\r\nint main() {\r\n int x = 1;\r\n write<1001>() << "This is string " << x << "\\n";\r\n write<1001>() << "The End\\n";\r\n}\r\n<\/pre>\n$ g++ debug.cpp
\n$ .\/a.out
\n$ cat cpp.1001
\nThis is string 1
\nThe End<\/p><\/blockquote>\nThe file handle number is passed as template parameter. I guess it is always know at compile time during the debug session. Then the write()<\/em> function simply returns a reference to a static standard ofstream object. Which is created during the first call to write()<\/em>. The created files are prefixed with \"cpp.\" And you can use this with any custom type with overloaded operator<<.\n\nThats all.\n\n\n<\/p>\n","protected":false},"excerpt":{"rendered":"
On of the first things one learn about FORTRAN: you can very easy write stuff to files without getting worried about file creation of filenames. Just write to a random number, the file handle. You can do this everywhere in the code. The output is append to the file. And the file gets automatic cleaned […]<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[4],"tags":[17,30],"class_list":["post-3627","post","type-post","status-publish","format-standard","hentry","category-allgemein","tag-cpp","tag-fortran"],"_links":{"self":[{"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=\/wp\/v2\/posts\/3627","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=3627"}],"version-history":[{"count":4,"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=\/wp\/v2\/posts\/3627\/revisions"}],"predecessor-version":[{"id":3631,"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=\/wp\/v2\/posts\/3627\/revisions\/3631"}],"wp:attachment":[{"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=3627"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=3627"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/roboblog.fatal-fury.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=3627"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}