mirror of
https://github.com/nineties/planckforth
synced 2024-12-25 21:58:22 +01:00
Add test/export.fs
This commit is contained in:
parent
bb4ab5f431
commit
c7bcd8282e
2 changed files with 33 additions and 0 deletions
|
@ -13,5 +13,7 @@ include test/utilities.fs
|
|||
include test/errorreport.fs
|
||||
include test/coreexttest.fs
|
||||
|
||||
include test/export.fs
|
||||
|
||||
report-errors
|
||||
report-and-exit
|
||||
|
|
31
test/export.fs
Normal file
31
test/export.fs
Normal file
|
@ -0,0 +1,31 @@
|
|||
\ planckforth -
|
||||
\ Copyright (C) 2021 nineties
|
||||
|
||||
testing private and export
|
||||
|
||||
: f1 ;
|
||||
private{
|
||||
|
||||
: f2 ;
|
||||
|
||||
T{ defined? f1 -> true }T
|
||||
T{ defined? f2 -> true }T
|
||||
|
||||
private{
|
||||
|
||||
: f3 ;
|
||||
|
||||
T{ defined? f2 -> true }T
|
||||
T{ defined? f3 -> true }T
|
||||
|
||||
}private
|
||||
|
||||
T{ defined? f1 -> true }T
|
||||
T{ defined? f2 -> true }T
|
||||
T{ defined? f3 -> false }T
|
||||
|
||||
}private
|
||||
|
||||
T{ defined? f1 -> true }T
|
||||
T{ defined? f2 -> false }T
|
||||
T{ defined? f3 -> false }T
|
Loading…
Reference in a new issue