Changeset 2bc7fb in git
- Timestamp:
- Feb 23, 2012, 1:25:54 PM (11 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
- Children:
- 0d008df8dfa1be001d06ef204f72682813192e9c
- Parents:
- b417134dc595d20da8372ad2f585d434c48e7a28
- git-author:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2012-02-23 13:25:54+01:00
- git-committer:
- Andreas Steenpass <steenpass@mathematik.uni-kl.de>2013-09-19 10:04:34+02:00
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ipassign.cc
rb41713 r2bc7fb 846 846 return TRUE; 847 847 } 848 if( (rt==DEF_CMD)||(rt==NONE))848 if(rt==NONE) 849 849 { 850 850 WarnS("right side is not a datum, assignment ignored"); … … 858 858 if (lt==DEF_CMD) 859 859 { 860 if (l->rtyp==IDHDL) 861 { 862 IDTYP((idhdl)l->data)=rt; 863 } 864 else if (l->name!=NULL) 865 { 866 sleftv ll; 867 iiDeclCommand(&ll,l,myynest,rt,&IDROOT); 868 memcpy(l,&ll,sizeof(sleftv)); 869 } 870 else 871 { 872 l->rtyp=rt; 873 } 874 lt=rt; 860 if (rt!=DEF_CMD) 861 { 862 if (l->rtyp==IDHDL) 863 { 864 IDTYP((idhdl)l->data)=rt; 865 } 866 else if (l->name!=NULL) 867 { 868 sleftv ll; 869 iiDeclCommand(&ll,l,myynest,rt,&IDROOT); 870 memcpy(l,&ll,sizeof(sleftv)); 871 } 872 else 873 { 874 l->rtyp=rt; 875 } 876 lt=rt; 877 } 878 // else: def=def: silently ignored 875 879 } 876 880 else
Note: See TracChangeset
for help on using the changeset viewer.