チェンジセット 1706

差分発生行の前後
無視リスト:
コミット日時:
2008/10/26 11:30:52 (4 年前)
コミッタ:
mzp
ログメッセージ:

script_infoに対応

ファイル:

凡例:

変更無し
追加
削除
更新
コピー
移動

  • ocaml/abc2xml/swfmill.ml

    r1705 r1706  
    200200     
    201201 
    202 let of_script _ = 
    203   elem "???" [] 
     202let of_script scripts = 
     203  elem_with "scripts" 
     204    (fun s -> 
     205       element "ScriptInfo" ["initIndex",Int32.to_string s#init] @@ 
     206         [elem_with "traits" of_trait s#traits] ) 
     207    scripts 
     208   
    204209 
    205210let of_abc abc =