package ppx_platform

  1. Overview
  2. Docs
Platform-specific code for native and Melange builds

Install

dune-project
 Dependency

Authors

Maintainers

Sources

ppx_platform-0.3.0.tbz
sha256=be1ae7c2cacdef9f21b0822b728d854bc77fa6181276e1b47db06b49a80531e5
sha512=bd428092b3ec062ff294a02619ed4441d451d1965021f3f7074244b2448687f03fa03c0eb320b112a8660cac8bee552bfb711a0bb458deacccccfd3979fda860

doc/src/ppx_platform.runtime/ppx_platform.ml.html

Source file ppx_platform.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
exception Melange_only of string

let fail_melange_only name =
  if Printexc.backtrace_status () then
    Printf.eprintf
      {|'%s' is melange_only and ran in the native build. Call it only from Melange code: inside let%%melange_only, [%%melange_only ...] or the Melange branch of match%%platform.

Call stack:
%s
%!|}
      name
      (Printexc.raw_backtrace_to_string (Printexc.get_callstack 8));
  raise (Melange_only name)