[Gambas-user] [Gambas Bug Tracker] Bug #746: Debug is not producing output in some cases

bugtracker at ...3416... bugtracker at ...3416...
Fri Sep 18 21:40:54 CEST 2015


http://gambaswiki.org/bugtracker/edit?object=BUG.746&from=L21haW4-

Comment #2 by Moviga TECHNOLOGIES:

This does not print anything at all:

'Loading custom up profiles
  If Exist(CONFIG_FOLDER) Then
    Debug "CONFIG_FOLDER exits"
    For Each f In Dir(CONFIG_FOLDER, "*.conf", gb.File)
      $aProfiles.Add(File.BaseName(f))
      Debug "Found the profile: " & File.BaseName(f)
    Next
  Else
    Shell "mkdir -p " & CONFIG_FOLDER
  Endif


This works as expected and both instances of Print is printing:

'Loading custom up profiles
  If Exist(CONFIG_FOLDER) Then
    Print "CONFIG_FOLDER exits"
    For Each f In Dir(CONFIG_FOLDER, "*.conf", gb.File)
      $aProfiles.Add(File.BaseName(f))
      Print "Found the profile: " & File.BaseName(f)
    Next
  Else
    Shell "mkdir -p " & CONFIG_FOLDER
  Endif

As you can see, I use Debug other places and there it works. It is just here that it doesn't for some reason.






More information about the User mailing list