Home My Page Projects Code Snippets Project Openings 3D graphics for Standard ML
Summary Activity SCM

SCM Repository

[sml3d] View of /trunk/sml3d/gen/gen-from-xml/gldb/main.sml
ViewVC logotype

View of /trunk/sml3d/gen/gen-from-xml/gldb/main.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1365 - (download) (annotate)
Mon Mar 31 12:43:29 2014 UTC (5 years, 2 months ago) by jhr
File size: 529 byte(s)
  Working on generation tools
(* main.sml
 *
 * COPYRIGHT (c) 2014 The SML3d Project (http://sml3d.cs.uchicago.edu)
 * All rights reserved.
 *
 * SML/NJ style main program for gldb.
 *)

structure Main =
  struct

    fun main (cmd, args) = (Driver.dispatch args) handle exn => (
          Driver.err (concat [
              "uncaught exception ", General.exnName exn, " [", General.exnMessage exn, "]\n"
            ]);
          List.app (fn s => Driver.err (concat ["  raised at ", s, "\n"])) (SMLofNJ.exnHistory exn);
          OS.Process.failure)

  end

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