Numerically, the results do not match, but the images look very similar.
An example in Mathematica:

Edit
As a response to @thron's comment in his answer about switching linear filters and add-ons, just consider the following operations.
While switching the Gaussian and Laplacian filters without filling is performed:
list = {1, 3, 5, 7, 5, 3, 1}; gauss[x_] := GaussianFilter[ x, 1] lapl[x_] := LaplacianFilter[x, 1] Print[gauss[lapl[list]], lapl[gauss[list]]] (* ->{5.15139,0.568439,-1.13688,-9.16589,-1.13688,0.568439,5.15139} {5.15139,0.568439,-1.13688,-9.16589,-1.13688,0.568439,5.15139} *)
Performing the same with the addition, we get the difference at the edges:
gauss[x_] := GaussianFilter[ x, 1, Padding -> 1] lapl[x_] := LaplacianFilter[x, 1, Padding -> 1] Print[gauss[lapl[list]], lapl[gauss[list]]] (* ->{4.68233,0.568439,-1.13688,-9.16589,-1.13688,0.568439,4.68233} {4.58295,0.568439,-1.13688,-9.16589,-1.13688,0.568439,4.58295} *)