From 3251e62a23c39a33116e57bc211ef9d25999405b Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 17 May 2009 18:51:53 +0000
Subject: 	* interp/cparse.boot (npTyping): Remove. 
 (npDefaultItemlist): Likewise. 	(npSDefaultItem): Likewise. 
 (npDefaultItem): Likewise. 	(npDefaultDecl): Likewise. 	(npStatement):
 Don't call npTyping. 	(npDefinitionItem): Likewise.

---
 src/interp/cparse.boot | 17 -----------------
 1 file changed, 17 deletions(-)

(limited to 'src/interp')

diff --git a/src/interp/cparse.boot b/src/interp/cparse.boot
index c3b11c5b..673ff21a 100644
--- a/src/interp/cparse.boot
+++ b/src/interp/cparse.boot
@@ -599,7 +599,6 @@ npStatement()==
         npInline() or
         npLocal() or
         npExport() or
-        npTyping() or
         npVoid()
 
 npBackTrack(p1,p2,p3)==
@@ -869,21 +868,6 @@ npTypeVariable()== npParenthesized function npTypeVariablelist or
 
 npTypeVariablelist()== npListing function npSignatureDefinee
 
-npTyping()==
-      npEqKey "DEFAULT" and  (npDefaultItemlist() or npTrap())
-                and npPush pfTyping npPop1()
-
-npDefaultItemlist()== npPC function npSDefaultItem
-                             and npPush pfUnSequence npPop1 ()
-
-npDefaultDecl()== npEqKey "COLON" and (npType() or npTrap()) and
-           npPush pfSpread (pfParts npPop2(),npPop1())
-
-npDefaultItem()==npTypeVariable() and (npDefaultDecl() or npTrap())
-
-npSDefaultItem()== npListing function npDefaultItem
-        and npPush pfAppend pfParts npPop1()
-
 npBPileDefinition()==
      npPileBracketed function npPileDefinitionlist
        and npPush pfSequence pfListOf npPop1 ()
@@ -928,7 +912,6 @@ npSingleRule()==
     false
 
 npDefinitionItem()==
-   npTyping() or
       npImport()  or
           a:=npState()
           npStatement() =>
-- 
cgit v1.2.3