File: w47_inline.compilers.reference

package info (click to toggle)
ocaml 5.4.0-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 44,372 kB
  • sloc: ml: 370,196; ansic: 52,820; sh: 27,396; asm: 5,462; makefile: 3,679; python: 974; awk: 278; javascript: 273; perl: 59; fortran: 21; cs: 9
file content (51 lines) | stat: -rw-r--r-- 2,238 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
File "w47_inline.ml", line 30, characters 20-22:
30 |   let[@local never] f2 x = x (* ok *) in
                         ^^
Warning 26 [unused-var]: unused variable f2.

File "w47_inline.ml", line 31, characters 24-26:
31 |   let[@local malformed] f3 x = x (* bad payload *) in
                             ^^
Warning 26 [unused-var]: unused variable f3.

File "w47_inline.ml", line 15, characters 23-29:
15 | let d = (fun x -> x) [@inline malformed attribute] (* rejected *)
                            ^^^^^^
Warning 47 [attribute-payload]: illegal payload for attribute inline.
  It must be either 'never', 'always', 'hint' or empty

File "w47_inline.ml", line 16, characters 23-29:
16 | let e = (fun x -> x) [@inline malformed_attribute] (* rejected *)
                            ^^^^^^
Warning 47 [attribute-payload]: illegal payload for attribute inline.
  It must be either 'never', 'always', 'hint' or empty

File "w47_inline.ml", line 17, characters 23-29:
17 | let f = (fun x -> x) [@inline : malformed_attribute] (* rejected *)
                            ^^^^^^
Warning 47 [attribute-payload]: illegal payload for attribute inline.
  It must be either 'never', 'always', 'hint' or empty

File "w47_inline.ml", line 18, characters 23-29:
18 | let g = (fun x -> x) [@inline ? malformed_attribute] (* rejected *)
                            ^^^^^^
Warning 47 [attribute-payload]: illegal payload for attribute inline.
  It must be either 'never', 'always', 'hint' or empty

File "w47_inline.ml", line 23, characters 15-22:
23 | let k x = (a [@inlined malformed]) x (* rejected *)
                    ^^^^^^^
Warning 47 [attribute-payload]: illegal payload for attribute inlined.
  It must be either 'never', 'always', 'hint' or empty

File "w47_inline.ml", line 31, characters 7-12:
31 |   let[@local malformed] f3 x = x (* bad payload *) in
            ^^^^^
Warning 47 [attribute-payload]: illegal payload for attribute local.
  It must be either 'never', 'always', 'maybe' or empty

File "w47_inline.ml", line 32, characters 17-26:
32 |   let[@local] f4 x = 2 * x (* not local *) in
                      ^^^^^^^^^
Warning 55 [inlining-impossible]: Cannot inline:
  This function cannot be compiled into a static continuation