diff options
| author | aarne <aarne@cs.chalmers.se> | 2007-03-27 16:40:54 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2007-03-27 16:40:54 +0000 |
| commit | 7c30d211c3eda504668c0eab51e99d6e52db2127 (patch) | |
| tree | 90cd0aa1f5d079a58d080da0174b90a5bdb09b96 /devel/compiler/ex.src | |
| parent | 1c1acf1b971d13a496a92b9d8d6b14fde85e28f3 (diff) | |
distinct form for opers that have no value
Diffstat (limited to 'devel/compiler/ex.src')
| -rw-r--r-- | devel/compiler/ex.src | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/devel/compiler/ex.src b/devel/compiler/ex.src index f7b381548..e8f0c6374 100644 --- a/devel/compiler/ex.src +++ b/devel/compiler/ex.src @@ -22,15 +22,15 @@ lin Voiture : CN = { g = (Fem@) } ; -{- + lin Bus : CN = { s = table {$x => "bus"} ; g = (Masc@) } ; - +{- lin Def : CN -> NP = \cn -> { - s = artDef $cn.g ++ $cn.s ! (Sg@) ; + s = &artDef $cn.g ++ $cn.s ! (Sg@) ; a = {g = $cn.g ; n = (Sg@)} } ; -}
\ No newline at end of file |