summaryrefslogtreecommitdiff
path: root/testsuite/compiler/check/lins/lins.gfs.gold
blob: cdec8fbedbd00128560a2cabdc575f555c47fef2 (plain)
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
checking module linsCnc

   Warning: no linearization type for C, inserting default {s : Str}

   Warning: no linearization of test

abstract lins {

  cat C Nat

  cat Float

  cat Int

  cat Nat

  cat String

  fun test : C zero

  fun zero : Nat

}

concrete linsCnc {

  productions

    C0 -> F0[CVar]

    C1 -> F1[CVar]

    C1 -> F2[]

  functions

    F0 := (S0) [__gfV]

    F1 := () [__gfV]

    F2 := () [zero]

  sequences

    S0 := <0,0>

  categories

    C := range  [C0 .. C0]

         labels ["s"]

    Float := range  [CFloat .. CFloat]

             labels ["s"]

    Int := range  [CInt .. CInt]

           labels ["s"]

    Nat := range  [C1 .. C1]

           labels []

    String := range  [CString .. CString]

              labels ["s"]

    __gfVar := range  [CVar .. CVar]

               labels ["s"]

}