diff options
Diffstat (limited to 'src/core_print.sml')
| -rw-r--r-- | src/core_print.sml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/core_print.sml b/src/core_print.sml index 8d8f275c..683b1b90 100644 --- a/src/core_print.sml +++ b/src/core_print.sml @@ -470,8 +470,8 @@ fun p_vali env (x, n, t, e, s) = fun p_export_kind ck = case ck of Link => string "link" - | Action => string "action" - | Rpc => string "rpc" + | Action _ => string "action" + | Rpc _ => string "rpc" fun p_datatype env (x, n, xs, cons) = let |