equal
deleted
inserted
replaced
5 |
5 |
6 use "ML-Systems/universal.ML"; |
6 use "ML-Systems/universal.ML"; |
7 use "ML-Systems/thread_dummy.ML"; |
7 use "ML-Systems/thread_dummy.ML"; |
8 use "ML-Systems/polyml_common.ML"; |
8 use "ML-Systems/polyml_common.ML"; |
9 use "ML-Systems/polyml_old_compiler5.ML"; |
9 use "ML-Systems/polyml_old_compiler5.ML"; |
|
10 use "ML-Systems/polyml_pp.ML"; |
10 |
11 |
11 val pointer_eq = PolyML.pointerEq; |
12 val pointer_eq = PolyML.pointerEq; |
12 |
13 |
13 fun share_common_data () = PolyML.shareCommonData PolyML.rootFunction; |
14 fun share_common_data () = PolyML.shareCommonData PolyML.rootFunction; |
14 |
15 |