《数据结构及应用算法教程》一书的源代码。作者：严蔚敏

				算法 3.5
				void BubbleSort( SqList &L ){
				    // 对顺序表L作起泡排序,
				    RcdType  W；
				      i = L.length;
				      while (i >1) {              // i>1 表明上一趟曾进行过记录的交换
				        lastExchangeIndex = 1;
				        for (j = 1; j < i; j++){
				          if (L.r[j+1].key < L.r[j].key) { 
				            W=L.r[j]；L.r[j] =L.r[j+1]；L.r[j+1] = W；     // 互换记录
				            lastExchangeIndex = j;    
				          } //if                      
				        } //for
				        i = lastExchangeIndex;   // 一趟排序中无序序列中最后一个记录的位置
				      } // while
				} // BubbleSort