 
 if anyone knows his stuff and has nothing better to do... did i make any mistakes? other than the ones that caused me to set up that page

http://www.xs4all.nl/~bluez/datatalk/pure1.htm
 
 

Certainly doesn't apply to meblueznl wrote:...if anyone knows his stuff and has nothing better to do...
 
 Code: Select all
test1()  ; can't compile as test1() is not yet defined 
  Procedure test1() 
    test2()  ; can't compile as test2() is not yet defined 
  EndProcedure 
  Procedure test2() 
    ; do nothing 
  EndProcedure 
Code: Select all
Declare test1()
Declare test2()
test1()  ; now compiles without a problem 
test2()  ; 
  Procedure test1() 
    test2()  ; can't compile as test2() is not yet defined 
  EndProcedure 
  Procedure test2() 
    ; do nothing 
  EndProcedure 
Activate in japbe "automatic save declare" and you can do this:blueznl wrote:i will add this, didn't know it, more of this is welcome!
Code: Select all
xincludefile "test.pb.declare"
debug test(1)
procedure test(a)
  procedurereturn test2(a)
endprocedure
procedure test2(a)
  procedurereturn a*a
endprocedure
Code: Select all
xincludefile "test.pb.declare"
structure Dummy
  l.l
endstructure
debug test(1)
procedure test(a)
  procedurereturn test2(@a)
endprocedure
procedure test2(*a.dummy)
  procedurereturn a\l*a\l
endprocedure
Code: Select all
structure Dummy
  l.l
endstructure
xincludefile "test.pb.declare"
debug test(1)
procedure test(a)
  procedurereturn test2(@a)
endprocedure
procedure test2(*a.dummy)
  procedurereturn a\l*a\l
endprocedure
Code: Select all
xincludefile "test.pb.declare"
structure Dummy
  l.l
endstructure
debug test(1)
procedure test(a)
  procedurereturn test2(@a)
endprocedure
procedure test2(*b)
  *a.dummy=*b
  procedurereturn *a\l * *a\l
endprocedure