diff --git a/pharo-porting/changes_for_pharo.st b/pharo-porting/changes_for_pharo.st
new file mode 100644
index 0000000..02425de
--- /dev/null
+++ b/pharo-porting/changes_for_pharo.st
@@ -0,0 +1,10 @@
+
+SMPPConnection extend [
+    createConnection: aHostname port: aPort [
+        <category: 'socket'>
+        ^(SocketStream openConnectionToHostNamed: aHostname port: aPort)
+            binary;
+            noTimeout;
+            yourself
+    ]
+]
diff --git a/pharo-porting/compat_for_pharo.st b/pharo-porting/compat_for_pharo.st
new file mode 100644
index 0000000..460e658
--- /dev/null
+++ b/pharo-porting/compat_for_pharo.st
@@ -0,0 +1 @@
+"Compat code for Pharo"