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/trunk/src/compiler/Semant/pickle/pickmod-new.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/Semant/pickle/pickmod-new.sml

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

revision 1373, Mon Sep 15 22:16:26 2003 UTC revision 1374, Mon Sep 15 22:17:10 2003 UTC
# Line 947  Line 947 
947    
948          val op $ = PU.$ II          val op $ = PU.$ II
949          fun inl_info i =          fun inl_info i =
950              II.match i { inl_prim = fn p => "A" $ [primop p],   (* PRIMOP *)              II.match i { inl_prim = fn (p, t) => "A" $ [primop p, ty t],
951                           inl_str = fn sl => "B" $ [list inl_info sl],                           inl_str = fn sl => "B" $ [list inl_info sl],
952                           inl_no = fn () => "C" $ [] }                           inl_no = fn () => "C" $ [] }
953    

Legend:
Removed from v.1373  
changed lines
  Added in v.1374

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