Mercurial > octave
view test/single-index.tst @ 31646:c6d54dd31a7e stable
maint: Use macros to begin/end C++ namespaces.
* BaseControl.cc, BaseControl.h, ButtonControl.cc, ButtonControl.h,
ButtonGroup.cc, ButtonGroup.h, Canvas.cc, Canvas.h,
CheckBoxControl.cc, CheckBoxControl.h, Container.cc, Container.h,
ContextMenu.cc, ContextMenu.h, EditControl.cc, EditControl.h,
Figure.cc, Figure.h, FigureWindow.cc, FigureWindow.h, GLCanvas.cc,
GLCanvas.h, GenericEventNotify.h, KeyMap.cc, KeyMap.h,
ListBoxControl.cc, ListBoxControl.h, Logger.cc, Logger.h, Menu.cc,
Menu.h, MenuContainer.h, Object.cc, Object.h, ObjectProxy.cc,
ObjectProxy.h, Panel.cc, Panel.h, PopupMenuControl.cc,
PopupMenuControl.h, PushButtonControl.cc, PushButtonControl.h,
PushTool.cc, PushTool.h, QtHandlesUtils.cc, QtHandlesUtils.h,
RadioButtonControl.cc, RadioButtonControl.h, SliderControl.cc,
SliderControl.h, Table.cc, Table.h, TextControl.cc, TextControl.h,
TextEdit.cc, TextEdit.h, ToggleButtonControl.cc,
ToggleButtonControl.h, ToggleTool.cc, ToggleTool.h, ToolBar.cc,
ToolBar.h, ToolBarButton.cc, ToolBarButton.h, annotation-dialog.cc,
annotation-dialog.h, gl-select.cc, gl-select.h, qopengl-functions.h,
qt-graphics-toolkit.cc, qt-graphics-toolkit.h, QTerminal.h,
color-picker.cc, color-picker.h, command-widget.cc, command-widget.h,
community-news.cc, community-news.h, dialog.cc, dialog.h,
documentation-bookmarks.cc, documentation-bookmarks.h,
documentation-dock-widget.cc, documentation-dock-widget.h,
documentation.cc, documentation.h, dw-main-window.cc,
dw-main-window.h, external-editor-interface.cc,
external-editor-interface.h, files-dock-widget.cc,
files-dock-widget.h, find-files-dialog.cc, find-files-dialog.h,
find-files-model.cc, find-files-model.h, graphics-init.cc,
graphics-init.h, gui-settings.cc, gui-settings.h, gui-utils.cc,
gui-utils.h, history-dock-widget.cc, history-dock-widget.h,
interpreter-qobject.cc, interpreter-qobject.h, led-indicator.cc,
led-indicator.h, file-editor-interface.h, file-editor-tab.cc,
file-editor-tab.h, file-editor.cc, file-editor.h, find-dialog.cc,
find-dialog.h, marker.cc, marker.h, octave-qscintilla.cc,
octave-qscintilla.h, octave-txt-lexer.cc, octave-txt-lexer.h,
main-window.cc, main-window.h, news-reader.cc, news-reader.h,
octave-dock-widget.cc, octave-dock-widget.h, octave-qobject.cc,
octave-qobject.h, qt-application.cc, qt-application.h,
qt-interpreter-events.cc, qt-interpreter-events.h, qt-utils.h,
release-notes.cc, release-notes.h, resource-manager.cc,
resource-manager.h, set-path-dialog.cc, set-path-dialog.h,
set-path-model.cc, set-path-model.h, settings-dialog.cc,
settings-dialog.h, shortcut-manager.cc, shortcut-manager.h,
tab-bar.cc, tab-bar.h, terminal-dock-widget.cc,
terminal-dock-widget.h, variable-editor-model.cc,
variable-editor-model.h, variable-editor.cc, variable-editor.h,
welcome-wizard.cc, welcome-wizard.h, workspace-model.cc,
workspace-model.h, workspace-view.cc, workspace-view.h:
Use new macros to begin/end C++ namespaces.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Tue, 06 Dec 2022 14:37:51 -0500 |
parents | 796f54d4ddbf |
children | 597f3ee61a48 |
line wrap: on
line source
######################################################################## ## ## Copyright (C) 2017-2022 The Octave Project Developers ## ## See the file COPYRIGHT.md in the top-level directory of this ## distribution or <https://octave.org/copyright/>. ## ## This file is part of Octave. ## ## Octave is free software: you can redistribute it and/or modify it ## under the terms of the GNU General Public License as published by ## the Free Software Foundation, either version 3 of the License, or ## (at your option) any later version. ## ## Octave is distributed in the hope that it will be useful, but ## WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ## GNU General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with Octave; see the file COPYING. If not, see ## <https://www.gnu.org/licenses/>. ## ######################################################################## %!shared rv,cv,ndv,wm,tm,nd,lrv,lcv,lwm,ltm,lndv1,lndv2,lnd1,lnd2,rrv,rcv,rndv1,rndv2 %! rv = [1,2,3,4,5,6,7,8,9,10,11,12]; %! cv = rv'; %! ndv = reshape (rv, 1, 1, 12); %! wm = reshape (rv, 2, 6); %! tm = reshape (rv, 6, 2); %! nd = reshape (rv, 2, 2, 3); %! lrv = logical ([1,0,0,1,1,0,0,1,1,0,0,1]); %! lcv = lrv'; %! lwm = reshape (lrv, 2, 6); %! ltm = reshape (lrv, 6, 2); %! lndv1 = reshape (lrv, 1, 1, 12); %! lndv2 = reshape (lrv, 1, 1, 1, 12); %! lnd1 = reshape (lrv, 2, 2, 3); %! lnd2 = reshape (lrv, 2, 3, 2); %! rrv = [1,4,5,8,9,12]; %! rcv = rrv'; %! rndv1 = reshape (rrv, 1, 1, 6); %! rndv2 = reshape (rrv, 1, 1, 1, 6); %!assert (rv(lrv), rrv) %!assert (rv(lcv), rrv) %!assert (rv(lwm), rrv) %!assert (rv(ltm), rrv) %!assert (rv(lndv1), rrv) %!assert (rv(lndv2), rrv) %!assert (rv(lnd1), rrv) %!assert (rv(lnd2), rrv) %!assert (cv(lrv), rcv) %!assert (cv(lcv), rcv) %!assert (cv(lwm), rcv) %!assert (cv(ltm), rcv) %!assert (cv(lndv1), rcv) %!assert (cv(lndv2), rcv) %!assert (cv(lnd1), rcv) %!assert (cv(lnd2), rcv) %!assert (ndv(lrv), rndv1) %!assert (ndv(lcv), rndv1) %!assert (ndv(lwm), rndv1) %!assert (ndv(ltm), rndv1) %!assert (ndv(lndv1), rndv1) %!assert (ndv(lndv2), rndv1) %!assert (ndv(lnd1), rndv1) %!assert (ndv(lnd2), rndv1) %!assert (wm(lrv), rrv) %!assert (wm(lcv), rcv) %!assert (wm(lwm), rcv) %!assert (wm(ltm), rcv) %!assert (wm(lndv1), rndv1) %!assert (wm(lndv2), rndv2) %!assert (wm(lnd1), rcv) %!assert (wm(lnd2), rcv) %!assert (tm(lrv), rrv) %!assert (tm(lcv), rcv) %!assert (tm(lwm), rcv) %!assert (tm(ltm), rcv) %!assert (tm(lndv1), rndv1) %!assert (tm(lndv2), rndv2) %!assert (tm(lnd1), rcv) %!assert (tm(lnd2), rcv) %!assert (nd(lrv), rrv) %!assert (nd(lcv), rcv) %!assert (nd(lwm), rcv) %!assert (nd(ltm), rcv) %!assert (nd(lndv1), rndv1) %!assert (nd(lndv2), rndv2) %!assert (nd(lnd1), rcv) %!assert (nd(lnd2), rcv) %!shared rv,cv,ndv,wm,tm,nd,lrv,lcv,lwm,ltm,lndv1,lndv2,lnd1,lnd2,rrv,rcv,rndv1,rndv2 %! rv = [1,2,3,4,5,6,7,8,9,10,11,12]; %! cv = rv'; %! ndv = reshape (rv, 1, 1, 12); %! wm = reshape (rv, 2, 6); %! tm = reshape (rv, 6, 2); %! nd = reshape (rv, 2, 2, 3); %! lrv = logical ([1,1,1,1,1,1,1,1,1,1,1,1]); %! lcv = lrv'; %! lwm = reshape (lrv, 2, 6); %! ltm = reshape (lrv, 6, 2); %! lndv1 = reshape (lrv, 1, 1, 12); %! lndv2 = reshape (lrv, 1, 1, 1, 12); %! lnd1 = reshape (lrv, 2, 2, 3); %! lnd2 = reshape (lrv, 2, 3, 2); %! rrv = [1,2,3,4,5,6,7,8,9,10,11,12]; %! rcv = rrv'; %! rndv1 = reshape (rrv, 1, 1, 12); %! rndv2 = reshape (rrv, 1, 1, 1, 12); %!assert (rv(lrv), rrv) %!assert (rv(lcv), rrv) %!assert (rv(lwm), rrv) %!assert (rv(ltm), rrv) %!assert (rv(lndv1), rrv) %!assert (rv(lndv2), rrv) %!assert (rv(lnd1), rrv) %!assert (rv(lnd2), rrv) %!assert (cv(lrv), rcv) %!assert (cv(lcv), rcv) %!assert (cv(lwm), rcv) %!assert (cv(ltm), rcv) %!assert (cv(lndv1), rcv) %!assert (cv(lndv2), rcv) %!assert (cv(lnd1), rcv) %!assert (cv(lnd2), rcv) %!assert (ndv(lrv), rndv1) %!assert (ndv(lcv), rndv1) %!assert (ndv(lwm), rndv1) %!assert (ndv(ltm), rndv1) %!assert (ndv(lndv1), rndv1) %!assert (ndv(lndv2), rndv1) %!assert (ndv(lnd1), rndv1) %!assert (ndv(lnd2), rndv1) %!assert (wm(lrv), rrv) %!assert (wm(lcv), rcv) %!assert (wm(lwm), rcv) %!assert (wm(ltm), rcv) %!assert (wm(lndv1), rndv1) %!assert (wm(lndv2), rndv2) %!assert (wm(lnd1), rcv) %!assert (wm(lnd2), rcv) %!assert (tm(lrv), rrv) %!assert (tm(lcv), rcv) %!assert (tm(lwm), rcv) %!assert (tm(ltm), rcv) %!assert (tm(lndv1), rndv1) %!assert (tm(lndv2), rndv2) %!assert (tm(lnd1), rcv) %!assert (tm(lnd2), rcv) %!assert (nd(lrv), rrv) %!assert (nd(lcv), rcv) %!assert (nd(lwm), rcv) %!assert (nd(ltm), rcv) %!assert (nd(lndv1), rndv1) %!assert (nd(lndv2), rndv2) %!assert (nd(lnd1), rcv) %!assert (nd(lnd2), rcv) %!shared rv,cv,ndv,wm,tm,nd,irv,icv,iwm,itm,indv1,indv2,ind1,ind2,rrv,rcv,rndv1,rndv2 %! rv = [1,2,3,4,5,6,7,8,9,10,11,12]; %! cv = rv'; %! ndv = reshape (rv, 1, 1, 12); %! wm = reshape (rv, 2, 6); %! tm = reshape (rv, 6, 2); %! nd = reshape (rv, 2, 2, 3); %! irv = [1,3,5,7,9,11]; %! icv = irv'; %! iwm = reshape (irv, 2, 3); %! itm = reshape (irv, 3, 2); %! indv1 = reshape (irv, 1, 1, 6); %! indv2 = reshape (irv, 1, 1, 1, 6); %! ind1 = reshape (irv, 2, 1, 3); %! ind2 = reshape (irv, 1, 3, 2); %! rrv = [1,3,5,7,9,11]; %! rcv = rrv'; %! rndv1 = reshape (rrv, 1, 1, 6); %! rndv2 = reshape (rrv, 1, 1, 1, 6); %!assert (rv(irv), rrv) %!assert (rv(icv), rrv) %!assert (rv(iwm), iwm) %!assert (rv(itm), itm) %!assert (rv(indv1), rrv) %!assert (rv(indv2), rrv) %!assert (rv(ind1), ind1) %!assert (rv(ind2), ind2) %!assert (cv(irv), rcv) %!assert (cv(icv), rcv) %!assert (cv(iwm), iwm) %!assert (cv(itm), itm) %!assert (cv(indv1), rcv) %!assert (cv(indv2), rcv) %!assert (cv(ind1), ind1) %!assert (cv(ind2), ind2) %!assert (ndv(irv), rndv1) %!assert (ndv(icv), rndv1) %!assert (ndv(iwm), iwm) %!assert (ndv(itm), itm) %!assert (ndv(indv1), rndv1) %!assert (ndv(indv2), rndv1) %!assert (ndv(ind1), ind1) %!assert (ndv(ind2), ind2) %!assert (wm(irv), rrv) %!assert (wm(icv), rcv) %!assert (wm(iwm), iwm) %!assert (wm(itm), itm) %!assert (wm(indv1), rndv1) %!assert (wm(indv2), rndv2) %!assert (wm(ind1), ind1) %!assert (wm(ind2), ind2) %!assert (tm(irv), rrv) %!assert (tm(icv), rcv) %!assert (tm(iwm), iwm) %!assert (tm(itm), itm) %!assert (tm(indv1), rndv1) %!assert (tm(indv2), rndv2) %!assert (tm(ind1), ind1) %!assert (tm(ind2), ind2) %!assert (nd(irv), rrv) %!assert (nd(icv), rcv) %!assert (nd(iwm), iwm) %!assert (nd(itm), itm) %!assert (nd(indv1), rndv1) %!assert (nd(indv2), rndv2) %!assert (nd(ind1), ind1) %!assert (nd(ind2), ind2) %!shared rv,cv,ndv,wm,tm,nd,irv,icv,iwm,itm,indv1,indv2,ind1,ind2,rrv,rcv,rndv1,rndv2 %! rv = [1,2,3,4,5,6,7,8,9,10,11,12]; %! cv = rv'; %! ndv = reshape (rv, 1, 1, 12); %! wm = reshape (rv, 2, 6); %! tm = reshape (rv, 6, 2); %! nd = reshape (rv, 2, 2, 3); %! irv = [1,2,3,4,5,6,7,8,9,10,11,12]; %! icv = irv'; %! iwm = reshape (irv, 2, 6); %! itm = reshape (irv, 6, 2); %! indv1 = reshape (irv, 1, 1, 12); %! indv2 = reshape (irv, 1, 1, 1, 12); %! ind1 = reshape (irv, 2, 2, 3); %! ind2 = reshape (irv, 2, 3, 2); %! rrv = [1,2,3,4,5,6,7,8,9,10,11,12]; %! rcv = rrv'; %! rndv1 = reshape (rrv, 1, 1, 12); %! rndv2 = reshape (rrv, 1, 1, 1, 12); %!assert (rv(irv), rrv) %!assert (rv(icv), rrv) %!assert (rv(iwm), iwm) %!assert (rv(itm), itm) %!assert (rv(indv1), rrv) %!assert (rv(indv2), rrv) %!assert (rv(ind1), ind1) %!assert (rv(ind2), ind2) %!assert (cv(irv), rcv) %!assert (cv(icv), rcv) %!assert (cv(iwm), iwm) %!assert (cv(itm), itm) %!assert (cv(indv1), rcv) %!assert (cv(indv2), rcv) %!assert (cv(ind1), ind1) %!assert (cv(ind2), ind2) %!assert (ndv(irv), rndv1) %!assert (ndv(icv), rndv1) %!assert (ndv(iwm), iwm) %!assert (ndv(itm), itm) %!assert (ndv(indv1), rndv1) %!assert (ndv(indv2), rndv1) %!assert (ndv(ind1), ind1) %!assert (ndv(ind2), ind2) %!assert (wm(irv), rrv) %!assert (wm(icv), rcv) %!assert (wm(iwm), iwm) %!assert (wm(itm), itm) %!assert (wm(indv1), rndv1) %!assert (wm(indv2), rndv2) %!assert (wm(ind1), ind1) %!assert (wm(ind2), ind2) %!assert (tm(irv), rrv) %!assert (tm(icv), rcv) %!assert (tm(iwm), iwm) %!assert (tm(itm), itm) %!assert (tm(indv1), rndv1) %!assert (tm(indv2), rndv2) %!assert (tm(ind1), ind1) %!assert (tm(ind2), ind2) %!assert (nd(irv), rrv) %!assert (nd(icv), rcv) %!assert (nd(iwm), iwm) %!assert (nd(itm), itm) %!assert (nd(indv1), rndv1) %!assert (nd(indv2), rndv2) %!assert (nd(ind1), ind1) %!assert (nd(ind2), ind2)