Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/branches/arith64/compiler/CodeGen/main/object-desc.sml
ViewVC logotype

Diff of /sml/branches/arith64/compiler/CodeGen/main/object-desc.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 4873, Thu Oct 4 21:39:53 2018 UTC revision 4874, Fri Oct 5 14:33:11 2018 UTC
# Line 5  Line 5 
5   *   *
6   * The encoding of object description headers.   * The encoding of object description headers.
7   *   *
8   * WARNING: this file must agree with the run-time system values and those   * WARNING: this file must agree with the run-time system values and the
9   * used in boot/core.sml and boot/Unsafe/object.sml.   * values used in boot/core.sml and boot/Unsafe/object.sml.
10   *)   *)
11    
12  structure ObjectDesc :> OBJECT_DESC =  structure ObjectDesc :> OBJECT_DESC =
# Line 36  Line 36 
36      val tag_arr_hdr     = mkTag 2      val tag_arr_hdr     = mkTag 2
37      val tag_arr_data    = mkTag 3      val tag_arr_data    = mkTag 3
38      val tag_ref         = tag_arr_data      val tag_ref         = tag_arr_data
39    (* 64BIT: perhaps tag_raw32 should just map to tag_raw64 on 64-bit machines? *)
40      val tag_raw32       = mkTag 4      val tag_raw32       = mkTag 4
41      val tag_raw64       = mkTag 5      val tag_raw64       = mkTag 5
42      val tag_special     = mkTag 6      val tag_special     = mkTag 6
# Line 51  Line 52 
52      val seq_word16 : IntInf.int = 2      val seq_word16 : IntInf.int = 2
53      val seq_word31 : IntInf.int = 3      val seq_word31 : IntInf.int = 3
54      val seq_word32 : IntInf.int = 4      val seq_word32 : IntInf.int = 4
55    (* 64BIT: do we need seq_word64? *)
56      val seq_real32 : IntInf.int = 5      val seq_real32 : IntInf.int = 5
57      val seq_real64 : IntInf.int = 6      val seq_real64 : IntInf.int = 6
58    

Legend:
Removed from v.4873  
changed lines
  Added in v.4874

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0