Greetings, I am tracking down some bewildering output from a simple program using SysFileTree.
I am getting very strange output on ooRexx 4.1 x64, and getting the expected output from ooRexx 4.1 x86. The output is as follows, working version first: mdlueck@ldslnx01:/srv/shares/data/Websites/christians-in-recovery.org-VPS/www$ rexx -v Open Object Rexx Version 4.1.0 Build date: Dec 3 2010 Addressing Mode: 32 Copyright (c) IBM Corporation 1995, 2004. Copyright (c) RexxLA 2005-2010. All Rights Reserved. This program and the accompanying materials are made available under the terms of the Common Public License v1.0 which accompanies this distribution or at http://www.oorexx.org/license.html mdlueck@ldslnx01:/srv/shares/data/Websites/christians-in-recovery.org-VPS/www$ rexx ../bin/FindHTMLs.rex . FindHTMLs starting... dirfilespec: /srv/shares/data/Websites/christians-in-recovery.org-VPS/www/ THISfile=>2011-02-04 10:46:49 263 -rw-rw-rw- /srv/shares/data/Websites/christians-in-recovery.org-VPS/www/y_key_e4475ee193c4473a.html< THISdate=>2011-02-04< THIStime=>10:46:49< THISsize=>263< THISattrs=>-rw-rw-rw-< THISfilename=>/srv/shares/data/Websites/christians-in-recovery.org-VPS/www/y_key_e4475ee193c4473a.html< mdlueck@ldslnx01:/srv/shares/data/Websites/christians-in-recovery.org-VPS/www$ Unexpected output: mdlueck@s15355475:/srv/www/sites/christians-in-recovery.org/www$ rexx -v Open Object Rexx Version 4.1.0 Build date: Dec 3 2010 Addressing Mode: 64 Copyright (c) IBM Corporation 1995, 2004. Copyright (c) RexxLA 2005-2010. All Rights Reserved. This program and the accompanying materials are made available under the terms of the Common Public License v1.0 which accompanies this distribution or at http://www.oorexx.org/license.html mdlueck@s15355475:/srv/www/sites/christians-in-recovery.org/www$ ../bin/FindHTMLs.rex . FindHTMLs starting... dirfilespec: /srv/www/sites/christians-in-recovery.org/www/ THISfile=>-rw-rw-r-- /srv/www/sites/christians-in-recovery.org/www/AACC.html< THISdate=>-rw-rw-r--< THIStime=>/srv/www/sites/christians-in-recovery.org/www/AACC.html< THISsize=>< THISattrs=>< THISfilename=>< mdlueck@s15355475:/srv/www/sites/christians-in-recovery.org/www$ Source code snippet: i = 0 do e = 1 to EXTlist.0 THISfilespec = dirfilespec || '*' || EXTlist.e rc = SysFileTree(THISfilespec, Chk., 'FLS') if (rc \= 0) | (Chk.0 = 0) then do iterate e end do s = 1 to Chk.0 THISfile = Chk.s parse var THISfile THISdate THIStime THISsize THISattrs . 0 (THISattrs) ' ' THISfilename say 'THISfile=>' || THISfile || '<' say 'THISdate=>' || THISdate || '<' say 'THIStime=>' || THIStime || '<' say 'THISsize=>' || THISsize || '<' say 'THISattrs=>' || THISattrs || '<' say 'THISfilename=>' || THISfilename || '<' exit 0 end end Why would the x64 version of ooRexx be having troubles running SysFileTree? Has anyone else noticed odd SysFileTree output on x64 architecture? Sincerely, -- Michael Lueck Lueck Data Systems http://www.lueckdatasystems.com/ ------------------------------------------------------------------------------ All the data continuously generated in your IT infrastructure contains a definitive record of customers, application performance, security threats, fraudulent activity, and more. Splunk takes this data and makes sense of it. IT sense. And common sense. http://p.sf.net/sfu/splunk-novd2d _______________________________________________ Oorexx-devel mailing list Oorexx-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/oorexx-devel
