| changeset 62512 | 922e702ae8ca |
| parent 62500 | ff99681b3fd8 |
| parent 62511 | 93fa1efc7219 |
| child 62513 | 702085ca8564 |
| 62500:ff99681b3fd8 | 62512:922e702ae8ca |
|---|---|
1 (* Title: Pure/RAW/ml_heap.ML |
|
2 Author: Makarius |
|
3 |
|
4 ML heap operations. |
|
5 *) |
|
6 |
|
7 signature ML_HEAP = |
|
8 sig |
|
9 val share_common_data: unit -> unit |
|
10 val save_state: string -> unit |
|
11 end; |
|
12 |
|
13 structure ML_Heap: ML_HEAP = |
|
14 struct |
|
15 fun share_common_data () = PolyML.shareCommonData PolyML.rootFunction; |
|
16 val save_state = PolyML.SaveState.saveState o ML_System.platform_path; |
|
17 end; |