Functions inside Functions, Classes inside Functions

[Charles Pegge]

More encapsulation:

Code Select Expand

'FUNCTIONS INSIDE FUNCTIONS
function f1() as int
  function f2() as int
    static int i
    i++
    return i
  end function 'f2
  int j
  j=f2()
  return j
end function 'f1
print f1()
'print f2() 'not found


Code Select Expand

'CLASSES INSIDE FUNCTIONS
function ff()
  type tt
    float x,y,z
    method mm()
      print "mm"
    end method
  end type
  tt t
  t.mm()
end function
ff()


[Zlatko Vid]

cool