Difference between revisions of "ArrayDeepDump"
Jump to navigation
Jump to search
Fixed a bug in the code
imported>QQuix (Added a note about a Catch 22 when compiling a recursive function for the first time) |
imported>QQuix (Fixed a bug in the code) |
||
| Line 194: | Line 194: | ||
StringToTxtFile psFile psLine ;#Pluggy# | StringToTxtFile psFile psLine ;#Pluggy# | ||
endif | endif | ||
if | |||
if xDepth > 1 ; stops recursion at the last level initialized | |||
set xNextLevel to xMode * 100 + xLevel + 1 | set xNextLevel to xMode * 100 + xLevel + 1 | ||
let sText := sPrefix + sKey1 | let sText := sPrefix + sKey1 | ||
;;;; Uncomment the next line after the first successful compilation | |||
;;;; call ArrayDeepDump aEntry [Value] , sText , xNextLevel, xDepth - 1 | ;;;; call ArrayDeepDump aEntry [Value] , sText , xNextLevel, xDepth - 1 | ||
elseif | elseif xDepth == 1 && xMode == 2 | ||
let sLine := sPrefix + sKey1 + " . . ." | let sLine := sPrefix + sKey1 + " . . ." | ||
printc "PrintArray>> %z " sLine | printc "PrintArray>> %z " sLine | ||